标题: 文件名判别 [打印本页] 作者: ycxchen 时间: 2009-2-16 18:57 标题: 文件名判别 在例子中的导入窗体中，当在选择好要导入的文件（XSL格式）后，TEXT0文本框会显示所选择的文件名，我想此文件名中如果不包括有“游客表”这三个关键字时，在“导入一”按钮的单击事件中给予提示，并不导入数据。我想用LIKE写表达式，但达不到目的，请大家帮忙修改。
[attach]35187[/attach]作者: ycxchen 时间: 2009-2-16 19:06
不好意思,1楼说错了，我的意思是说，当此文件名中如果不包括有“参观表”这三个关键字时，在“导入一”按钮的单击事件中给予提示，并不导入数据。我想用LIKE写表达式，但达不到目的，请大家帮忙修改。作者: todaynew 时间: 2009-2-16 19:10
用insrt（）函数作者: Henry D. Sy 时间: 2009-2-16 19:31
If Not Me.Text0 Like "*参观表*" Then
MsgBox "请选好表"
Else
MsgBox "OK"
End If作者: ycxchen 时间: 2009-2-17 08:46
十分感谢两位指教！作者: ycxchen 时间: 2009-2-17 18:06
6D大哥，还要再向你请教：
我想当文件名中如果不包括有“参观表”这三个关键字，或者说不包括有“游客表”这三个关键字时给予提示，于是，我将代码改成如下，但运行不正确，如何修改？请指教！
If Not Me.Text0 Like "*参观表*" or Not Me.Text0 Like "*游客表*" Then
MsgBox "请选好表"
Else
MsgBox "OK"
End If作者: Henry D. Sy 时间: 2009-2-17 20:21
If Me.Text0 Like "*游客表*" Then
MsgBox "OK"
ElseIf Me.Text0 Like "*参观表*" Then
MsgBox "OK"
Else
MsgBox "请选好表"
End If作者: Henry D. Sy 时间: 2009-2-17 20:23
或者
If Me.Text0 Like "*游客表*" Or Me.Text0 Like "*参观表*" Then
MsgBox "OK"
Else
MsgBox "请选好表"
End If作者: ACMAIN_CHM 时间: 2009-2-17 21:01
If Not (Me.Text0 Like "*参观表*" or Me.Text0 Like "*游客表*") Then
MsgBox "请选好表"
Else
MsgBox "OK"
End If
If Not Me.Text0 Like "*参观表*" and not Me.Text0 Like "*游客表*") Then
MsgBox "请选好表"
Else
MsgBox "OK"
End If
