VB中我想检测text1的text值内部是否为四个零或者是0001这样的数字

发布网友发布时间：2024-10-17 01:06

共5个回答

热心网友时间：2024-10-17 01:18

case "0000"
case "0001"

热心网友时间：2024-10-17 01:21

楼上是正确的，数据类型要搞清楚撒

热心网友时间：2024-10-17 01:17

Select Case Form1.Text1.Text
Case "0" & "0" & "0" & "0":
Case "0" & "0" & "0" & "1":
End Select

热心网友时间：2024-10-17 01:13

dim a as interger
a=cint(text1.text)
text1.text=cstr(a)

热心网友时间：2024-10-17 01:15

"0000"
"0001"

热心网友时间：2024-10-17 01:14