OpenFileDialog 使用方法

 
OpenFileDialog 使用方法
 

   Form1.vb
 
   Private Sub OC(ByVal sender As System.Object, ByVal e As System.EventArgs) _
   Handles OpenToolStripMenuItem.Click
 
      OpenFileDialog1.Title = "Open File"
      OpenFileDialog1.InitialDirectory = ("C:\")
      OpenFileDialog1.Filter = "csv files (*.csv)|*.csv|All files (*.*)|*.*"
 
      If OpenFileDialog1.ShowDialog() = DialogResult.OK Then
         FileHandle(OpenFileDialog1.FileName)
      End If
 
   End Sub