TextBox1 ???
6 отговора
0 прегледа
TextBox1 ???
Здравейте !
1 ред TextBox1*TextBox2=TextBox3 Commandbuton1
2 ред TextBox4*TextBox5=TextBox6 Commandbuton2
3 ред TextBox7*TextBox8=TextBox9 Commandbuton3
4 ред TextBox10 = TextBox1+TextBox4+TextBox7 и TextBox11=TextBox2+TextBox5 +TextBox8 Commandbuton4
Как да направя така, че на първия ред като въведем стойност в TextBox1 бутона Commandbuton1 да светне тоест да е активен , аналогично и с другите редове така, и как ако липсва стойност бутоните да са угаснали ?
и още един въпрос .
1 ред TextBox1*TextBox2=TextBox3 Commandbuton1
2 ред TextBox4*TextBox5=TextBox6 Commandbuton2
3 ред TextBox7*TextBox8=TextBox9 Commandbuton3
4 ред TextBox10 = TextBox1+TextBox4+TextBox7 и TextBox11=TextBox2+TextBox5 +TextBox8 Commandbuton4
Как да направя така, че на първия ред като въведем стойност в TextBox1 бутона Commandbuton1 да светне тоест да е активен , аналогично и с другите редове така, и как ако липсва стойност бутоните да са угаснали ?
и още един въпрос .
Re: TextBox1 ???
Private Sub TextBox1_Change()
If TextBox1.Value = "" Then
CommandButton1.Enabled = False
Else
CommandButton1.Enabled = True
End If
End Sub
If TextBox1.Value = "" Then
CommandButton1.Enabled = False
Else
CommandButton1.Enabled = True
End If
End Sub
Re: TextBox1 ???
TextBox-а няма свойство Value. По-скоро така:
[линк]
Private Sub Text1_Change()
CommandButton1.Enabled = (LenB(Text1.Text) <> 0)
End Sub
[линк]
Re: TextBox1 ???
Ами има свойсво "Value".
Първо тествах кода, за да не напиша без да искам някоя глупост и посля го копнах тука.
Кода си работеше!
Но това което предлагаш ти е по-добро. Дори заради това, че е по-кратко.
Първо тествах кода, за да не напиша без да искам някоя глупост и посля го копнах тука.
Кода си работеше!
Но това което предлагаш ти е по-добро. Дори заради това, че е по-кратко.
Редактирано от nepukis на
Re: TextBox1 ???
Моя грешка за Value. Не съобразих че говорите за контрол от Forms 2.0 библиотеката на VBA, аз си перкам за VB6.
[линк]
[линк]