(*´д`*)ｱﾊｧ… VB初心者質問スレ Part20
■ このスレッドは過去ログ倉庫に格納されています
For i = 1 To Len(Text1.Text)
If CInt(Mid(Text1.Text, i, 1)) < 0 Or _
CInt(Mid(Text1.Text, i, 1)) > 9 Then
Text1.SetFocus
Exit Sub
End If
Next i
DQNな質問ですみません。
何故、これで型の不一致のエラーが出るんでしょうか？
■ このスレッドは過去ログ倉庫に格納されています