打开文件夹并显示路径

来源:互联网 发布:2017年上半年经济数据 编辑:程序博客网 时间:2024/05/21 09:39

 添加控件:FolderBrowserDialog,label,button

代码:

  1.     Private Sub Button1_Click(ByVal sender As System.ObjectByVal e As System.EventArgs) Handles Button1.Click
  2.         If FolderBrowserDialog1.ShowDialog = Windows.Forms.DialogResult.OK Then
  3.             Label1.Text = FolderBrowserDialog1.SelectedPath
  4.         End If
  5.     End Sub
原创粉丝点击