VB源代码，有2个按钮控件，一个选择目录，一个打开选好目录的EXE格式原件！需要添加一个CommonDialog 的部件！...

代码说明：

VB源代码，有2个按钮控件，一个选择目录，一个打开选好目录的EXE格式原件！需要添加一个CommonDialog 的部件！-Private Sub Command3_Click() Shell Text1.Text End Sub Private Sub Command4_Click() dakai1.InitDir = "c:" dakai1.Filter = "EXE(*.exe,*.bat)|*.exe*.bat" dakai1.Action = 1 Text1.Text = dakai1.FileName End Sub