添加控件:FolderBrowserDialog,label,button
代码:
- Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
- If FolderBrowserDialog1.ShowDialog = Windows.Forms.DialogResult.OK Then
- Label1.Text = FolderBrowserDialog1.SelectedPath
- End If
- End Sub