VB.net的ListBox怎么双击其中一项并打开一个窗体？
要源码，我的用途是视频列表
[解决办法]
Public Class Form1 ‘播放窗口
Public Sub MyShow(ByVal AVIfilePath As String)
AVIMediaPlayer.File = AVIfilePath '设置播放控件的文件路径
AVIMediaPlayer.Play()‘播放
Me.ShowDialog()’显示窗口
End Sub
End Class
Public Class Form2 ‘列表窗口
Private nForm1 As New Form1
Private Sub ListBox1_DoubleClick(ByVal sender As Object, ByVal e As System.EventArgs) Handles ListBox1.DoubleClick
Dim s As String
s = ListBox1.SelectedItem’读出选中列表项的字符
If s <> "" AndAlso IO.File.Exists(s) Then ‘判断是否是一个已经存在的文件
nForm1.MyShow(s)’显示播放窗口
End If
End Sub
End Class
