请教各位
我有一支程式,想要比对档名正确后才执行
例如 ABCDE_12345_zzzzz.exe
现在写的程式可执行
如果想模糊比对改如何修改
如 ABCDE_12345_zzzzz.exe
我只要第一字段输入ABC
第二字段输入123
第三字段输入zz
就可以找到档案这样
Private Sub cmd_exe_Click()
If Dir(strBatPath & txt_info(0) & "_" & txt_info(1) & "_" & txt_info(2) &
".exe") = "" Then
lblMsg.Caption = "无此执行档"
Exit Sub
End If
Shell strBatPath & txt_info(0) & "_" & txt_info(1) & "_" & txt_info(2) &
".exe", vbNormalFocus
End
End Sub
感谢帮忙~~~

如果你所有的档名都是abc_123_xyz这样的(1) 读取所有档名 (2) 对每一档名，切成三段(3) 对三段分别比对输入1, 2, 3(4) 如果都符合就是目标档案你可以各段分别用instr()做

感谢～～～