关于 vb 编程的问题 一下代码能简单化吗 还有输入其他的数字 返回为0 怎么写
答案:1 悬赏:20
解决时间 2021-10-29 08:46
- 提问者网友：相思似海深
- 2021-10-28 19:34
关于 vb 编程的问题 一下代码能简单化吗 还有输入其他的数字 返回为0 怎么写
最佳答案
- 二级知识专家网友：山有枢
- 2021-10-28 20:33
Private Sub Command1_Click()
select case Text1.Text
case ""
MsgBox "请输入号码“"
case "27756","54342"
Label1.Caption = 50000
case "27484","57254" ,"26643"
Label1.Caption = 1000
case "27545"
Label1.Caption = 0
end select
Text1.Text = ""
End Sub
至于你的说的“返回”，我不知道是什么意思。
select case Text1.Text
case ""
MsgBox "请输入号码“"
case "27756","54342"
Label1.Caption = 50000
case "27484","57254" ,"26643"
Label1.Caption = 1000
case "27545"
Label1.Caption = 0
end select
Text1.Text = ""
End Sub
至于你的说的“返回”，我不知道是什么意思。
我要举报
如以上问答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
大家都在看
推荐资讯