请教:VB怎么做目录对话筐

来源：百度知道编辑：UC知道时间：2024/06/25 00:07:39

如题:一个按钮可以选择文件点击另一个按钮则启动某个EXE文件- - 会都说下说详细点不要叫我他什么地方去问- - 代码臣上来谢谢拉- -
szdan 你说的一个控件是什么控件我按出来是很多个的

按 ctrl+t 调出“部件”对话框，选择 Microsoft Windows Common Controls 6.0 (SP6)（如图所示），确定后左边就会多出一个控件，双击把它加入到窗体上

Dim sName As String

Private Sub Command1_Click()

On Error GoTo OnErr

CommonDialog1.DialogTitle = "请输入您需要启动的 EXE 文件名"

CommonDialog1.Filter = "EXE 文件(*.exe)|*.exe|所有文件|*.*"

CommonDialog1.CancelError = True

CommonDialog1.ShowOpen

sName = CommonDialog1.FileName

Text1.Text = sName

Exit Sub

OnErr:

If Err.Number <> cdlCancel Then Resume Next

End Sub

Private Sub Command2_Click()

If sName <> "" And Dir(sName) <> "" Then Shel