⑴ vb通用对话框过滤 文件类型
通过使用CommonDialog 控件的Filter 属性来过滤。
可以设置它的Filter 属性,这样对话就只显示某种文件类型,如文本文件。
Filter 属性(公共对话框),返回或设置在对话框的类型列表框中所显示的过滤器。
PrivateSubCommand1_Click()
'设置“CancelError”为True
CommonDialog1.CancelError=True
OnErrorGoToErrHandler
'设置标志
CommonDialog1.Flags=cdlOFNHideReadOnly
'设置过滤器
'CommonDialog1.Filter="AllFiles(*.*)|*.*|TextFiles"&_
'"(*.txt)|*.txt|BatchFiles(*.bat)|*.bat"
CommonDialog1.Filter="TextFiles"&"(*.txt)|*.txt|"'本行代码设置只显示文本文件的过滤器
'指定缺省的过滤器
CommonDialog1.FilterIndex=2
'显示“打开”对话框
CommonDialog1.ShowOpen
'显示选定文件的名字
MsgBoxCommonDialog1.FileName
ExitSub
ErrHandler:
'用户按了“取消”按钮
ExitSub
EndSub
⑵ VB rs.filter 条件使用问题
Filter是Recordset对象的一个属性,是Recordset对中的数据过滤器。
你的这个语句可能是语法问题,我认为内应该是这样的:
rs.filter="not 字段1 like " & "% " & A & "%"
或如果容A是字符,不是变量的话:
rs.filter="not 字段1 like " & "%A%" & ""
注意在like后必须有一个空格!