Ввод в текстовое поле только положительных цифр - VB

Формулировка задачи:

Здравствуйте, помогите ,пожалуйста. Как сделать ввод в текстовое поле только положительных цифр. У меня не хочет работать данный код. Пытался

Private Sub CommandButton1_Click()
Dim v1 As Integer, v2 As Integer, time As Integer, s As Integer, pr1 As Integer, pr2 As Integer
v1 = TextBox1.Value
...
Private Sub Text1_Change()
If IsNumeric(Box1) <= 0 Then
MsgBox "Число должно быть положительным"
End Sub
...
End Sub

Решение задачи: «Ввод в текстовое поле только положительных цифр»

textual
                            Листинг программы 
                        
                            v1 = TextBox1.Value

Оцени полезность:

10 голосов , оценка 3.7 из 5

Похожие ответы