level 1
一个option？
option一个有用吗？
2020年05月20日 12点05分
level 11
2
应该是3个，这个怎么去实现？
2020年05月21日 00点05分
现在的环境是这样在数据库里有个表 表里面有日期 姓名 性别呀什么的很多。实现在一个option 是用日期查看 一个是用姓名 一个是性别。选中其中一个日期的option，然后text1输入日期回车在DataGrid1里面显示出来，如选中的是日期 输入成姓名或者性别会提示错误。
2020年05月21日 00点05分
@谚语中 都谁设计的这种千奇百怪的题目？日期，你弄一个日历控件不香吗？性别你弄一个combobox不方便吗？textbox就只输入姓名不简单吗？输入了就加条件、不输入留空就省略条件，不符合一般用户习惯吗？
2020年05月21日 00点05分
@璐村惂鐢ㄦ埛_0748V5Z馃惥 能告知下怎么实现吗？
2020年05月21日 00点05分
level 11
核心就是select语句
strSQL=“select *form ” & 表名
if 日期<>"" then
strSQL=strSQL & “ 日期=
#” & 日期 & “#
”
youtiaojian=true
endif
if 性别.text=“” then
if youtiaojian then strSql=strSql & " and "
strSQl=strSQL & “性别=‘’” &性别.text & “‘ ’”
youtiaojian=true
endif
if trim( text1)<>"" then
if youtiaojian then strSql=strSql & " and "
strSQl=strSQL &"'" & text1 & "' like 姓名"
youtiaojian=true
endif
然后就执行这个select语句就会获得记录集
再将记录集逐记录、逐字段写入你的表。
2020年05月21日 13点05分
5
strSQL=“select *form ” & 表名
if 日期<>"" then
strSQL=strSQL & “ 日期=
#” & 日期 & “#
”
youtiaojian=true
endif
if 性别.text=“” then
if youtiaojian then strSql=strSql & " and "
strSQl=strSQL & “性别=‘’” &性别.text & “‘ ’”
youtiaojian=true
endif
if trim( text1)<>"" then
if youtiaojian then strSql=strSql & " and "
strSQl=strSQL &"'" & text1 & "' like 姓名"
youtiaojian=true
endif
然后就执行这个select语句就会获得记录集
再将记录集逐记录、逐字段写入你的表。