VB.NET 使用资源管理器打开文件位置并定位的问题
在读取了一个文件夹下的所有的文件列表写入ListBox1里后,我想通过双击ListBox1列表的项就打开对应的文件位置并定位到该文件,我用下面的代码实现不了:
Private Sub listBox1_DoubleClick(ByVal sender As Object, ByVal e As System.EventArgs) Handles ListBox1.DoubleClick
System.Diagnostics.Process.Start("explorer.exe", "/select,Me.ListBox1.Text")
End Sub
请高人指点!
另外如果我想计算ListBox1列表里所有文件的总大小,又应该怎样写?谢谢~~~
[解决办法]
Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click Dim folder = "D:\xxx" Dim files = System.IO.Directory.GetFiles(folder) Dim totalSize As Long = 0 For Each f In files Me.ListBox1.Items.Add(f) totalSize += (New System.IO.FileInfo(f)).Length Next Me.Label1.Text = CStr(totalSize) End Sub Private Sub ListBox1_DoubleClick(sender As System.Object, e As System.EventArgs) Handles ListBox1.DoubleClick Process.Start("Explorer.exe", "/select, """ + Me.ListBox1.SelectedItem + """") End Sub
[解决办法]
"/select,Me.ListBox1.Text"
-------------->>>
"/select," & Me.ListBox1.Text