TextBox1 ???

6 отговора 0 прегледа
#1

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 да светне тоест да е активен , аналогично и с другите редове така, и как ако липсва стойност бутоните да са угаснали ?
и още един въпрос .

Отговор
в отговор на drosg #2

Re: TextBox1 ???

Това в Аксес ли е или ВБ

Отговор
в отговор на neznaest #3

Re: TextBox1 ???

VBA -ekcel

Отговор
в отговор на drosg #4

Re: TextBox1 ???

Private Sub TextBox1_Change()
If TextBox1.Value = "" Then
CommandButton1.Enabled = False
Else
CommandButton1.Enabled = True
End If
End Sub

Отговор
в отговор на nepukis #5

Re: TextBox1 ???

TextBox-а няма свойство Value. По-скоро така:
Private Sub Text1_Change() 

CommandButton1.Enabled = (LenB(Text1.Text) <> 0)
End Sub


[линк]
Отговор
в отговор на wqw #6

Re: TextBox1 ???

Ами има свойсво "Value".

Първо тествах кода, за да не напиша без да искам някоя глупост и посля го копнах тука.

Кода си работеше!

Но това което предлагаш ти е по-добро. Дори заради това, че е по-кратко.

Редактирано от nepukis на

Отговор
в отговор на nepukis #7

Re: TextBox1 ???

Моя грешка за Value. Не съобразих че говорите за контрол от Forms 2.0 библиотеката на VBA, аз си перкам за VB6.

[линк]
Отговор