yuezhiwu
幼苗
共回答了19个问题采纳率:84.2% 举报
你的if只比较了第一位和最后一位就会输出一次答案,如果输入12341就会输出
yes
no
输入12321也是输出
yes
no
你的程序第一位可以判断正确,但当i 的值为2时就会出错.当输入a=12321
left(a,2)=12而right(a,2)=21 很明显他们不相等.
你可以这样写
Private Sub Form_Click()
a = InputBox("1")
do while len(a)5 '输入不是5位数就重新输入
msgbox "请输入一个5位数!"
a=inputbox("1")
loop
For i = 1 To 2
If Mid(a,i,1) Mid(a,6 - i,1) Then
Exit For
Else
Print "yes"
Exit Sub
End If
Next i
Print "no"
End Su
1年前
5