`
yuanlanxiaup
  • 浏览: 858959 次
文章分类
社区版块
存档分类
最新评论

打开文件夹并显示路径

 
阅读更多

添加控件:FolderBrowserDialog,label,button

代码:

  1. PrivateSubButton1_Click(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesButton1.Click
  2. IfFolderBrowserDialog1.ShowDialog=Windows.Forms.DialogResult.OKThen
  3. Label1.Text=FolderBrowserDialog1.SelectedPath
  4. EndIf
  5. EndSub
分享到:
评论

相关推荐

Global site tag (gtag.js) - Google Analytics