请教 select case 条件为文本框不等于空怎么写

lyred2 2005-01-12 07:16:15

有三个文件框
text1
text2
text3

select case ?这里怎么写(要求文框不能为空为条件)

case text1.text
msgbox "a"
case text2.text
msgbox "b"
case text3.text
msgbox "c"

end select

这些好像都不行,Not empty, true, not isnull

搞不清楚,各位请帮帮忙
...全文
286 7 打赏 收藏 转发到动态 举报
写回复
用AI写文章
7 条回复
切换为时间正序
请发表友善的回复…
发表回复
tztz520 2005-01-12
  • 打赏
  • 举报
回复
-_-#
laviewpbt 2005-01-12
  • 打赏
  • 举报
回复
还是tztz520研究的深一点.............................................
tztz520 2005-01-12
  • 打赏
  • 举报
回复
select 只返回第一个符合条件的表达式的.

select case ""
case text1.text
msgbox "1"
case text2.text
msgbox "2"
case text3.text
msgbox "3"
case else
msgbox "都不是空"
end select
viena 2005-01-12
  • 打赏
  • 举报
回复
晕~
laviewpbt 2005-01-12
  • 打赏
  • 举报
回复
判断是否为空可用

If Text1.Text = "" then
' 执行操作
End if
或者 (建议使用下面的方法,因为进行字符串比较需要的处理量甚至比读取属性还要大)
If Len(Text1.Text) = 0 then
' 执行操作
End if
sworddx 2005-01-12
  • 打赏
  • 举报
回复
select case似乎没办法实现你的要求。改用if结构。

laviewpbt 2005-01-12
  • 打赏
  • 举报
回复
为什么不用
if ..... Then
............
elseif ...Then
.............
else
.............
End if

7,763

社区成员

发帖
与我相关
我的任务
社区描述
VB 基础类
社区管理员
  • VB基础类社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧