VB的if语句判断后跳过部分内容
答案:2 悬赏:10 手机版
解决时间 2021-02-04 07:59
- 提问者网友：wodetian
- 2021-02-03 07:48
VB的if语句判断后跳过部分内容
最佳答案
- 五星知识达人网友：孤老序
- 2021-02-03 09:06
单句if语句不用加,即if语句只有一行,
全部回答
- 1楼网友：逐風
- 2021-02-03 10:30
用exit sub退出sub过程
private sub command1_click()
if not isnumeric(text1.text) then
msgbox "输入非数值数据，请重新输入", , "数据检验"
text1.text = ""
text1.setfocus
exit sub '退出此过程
end if
dim t%, a%, b%, c%
t = val(text1.text)
if t > 999 or t < 100 then
msgbox "请正确输入三位数", , "数据检验"
text1.text = ""
text1.setfocus
exit sub '退出此过程
end if
a = t mod 10
b = (t mod 100) \ 10
c = t \ 100
text2.text = a * 100 + b * 10 + c
end sub
我要举报
如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
点此我要举报以上问答信息
大家都在看
推荐资讯