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

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

我来回答

共5个回答

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

case "0000"
case "0001"

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

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

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

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

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

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

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

"0000"
"0001"