以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- [求助]Select Case语句我把各类值用变量 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=170018) |
-- 作者:2425004926 -- 发布时间:2021/7/9 14:19:00 -- [求助]Select Case语句我把各类值用变量 Select Case语句我把各类值用了变量,比如红色部分 例如: Select Case e.sender.text Case Tables("表A").Rows(0)("第一列") e.Form.Controls("TextBox1").text = 1 Case Tables("表A").Rows(1)("第一列") e.Form.Controls("TextBox1").text = 2 End Select button1是Tables("表A").Rows(0)("第一列")的值,button2是Tables("表A").Rows(1)("第一列")的值,测试是可以用的,没有问题 可如果Tables("表A").Rows(0)("第一列")有两个以上的值,那么这个单元格里怎么编辑呢?我加双引号测试没有成功,两个双引号也不行,该怎么表示呢,比如两个值:
button1和button3 |
-- 作者:有点蓝 -- 发布时间:2021/7/9 14:30:00 -- if Tables("表A").Rows(0)("第一列") like "*" & e.sender.text & "*" then e.Form.Controls("TextBox1").text = 1 elseif Tables("表A").Rows(1)("第一列") like "*" & e.sender.text & "*" then e.Form.Controls("TextBox1").text = 2 end if
|
-- 作者:2425004926 -- 发布时间:2021/7/9 18:58:00 -- 好的,谢谢! |