Eu muitas vezes mudar o diretório do meu Desktop no registro, então eu pensei, "Ei, por que não eu fazer um aplicativo para facilitar esta tarefa!" Então, eu tentei fazer isso no Visual Basic 2008.
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1. Click
FolderBrowserDialog1.Description = "Selecione uma pasta a ser usado como área de trabalho".
FolderBrowserDialog1.ShowNewFolderButton = True
FolderBrowserDialog1.ShowDialog()
TextBox1. Text = FolderBrowserDialog1.SelectedPath
End Sub
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) manipula Button2.Click
Dim desktop As String
Dim citar As String = "" ""
Dim applyA As String
Desktop = FolderBrowserDialog1.SelectedPath
applyA = "reg adicionar""HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\User Shell pastas" "/v Desktop /t REG_EXPAND_SZ /d" "" (desktop)<- this="" line="" highlighted="" yellow=""></->
Dim aplicar As String = (applyA)(quote)
Shell(Apply)
End Sub
Eu não tinha quaisquer erros no meu código assim que eu o depurado. Bem, infelizmente, ele destacou a linha acima e disse, "conversão de Cadeia de caracteres"C:\User\Thomas\Desktop (o conteúdo do TextBox ou FolderBrowserDialog)"não é válido para o tipo 'Integer'." Eu não entendi! Não estou tentando converter uma seqüência de caracteres para um número inteiro!
Qualquer ajuda seria muito apreciada:-D
Eu ainda estou aprendendo.
Dizendo:
Dim citar As String = "" ""
Quero dizer uma aspa simples como uma variável. Porque se é uma aspa na cadeia de caracteres que é já citada ("" "), ele teria que ser isso (" "" ") desde quando já em uma cotação, uma cotação marca necessidades escritas por duas vezes.