Checkbox and a textbox help pls.

i got 2 checkboxes one is [] YES and one is []NO and a textbox.
It is like an interview question where if u say yes you gonna write something on the textbox and if its NO then you wouldnt write anything to it... now the problem..

In default the textbox is disabled. if i click the Checkbox YES the textbox will enable itself, and if i click it again it will disable itself.

The problem is when i click YES for the first time NOTHING HAPPENS the textbox is still disabled, when i click it again (checkbox YES is checked).. it disables... what seems to be the problem with it?

heres my code...


Private Sub chkdryes_Click()
If chkdryes = yes Then
txtdrugs.Enabled = True
txtdrugs.BackColor = vbWhite
Else
txtdrugs.Enabled = True
txtdrugs.BackColor = vbGray
End If
End Sub


Any ideas?

Your If statement is invalid. Change it to

If chkdryes.Value = vbChecked Then

Just to provide a visual:

VB Code:

Private Sub chkdryes_Click()
If chkdryes.Value = Checked Then
' This was the problem
txtdrugs.Enabled = True
txtdrugs.BackColor = vbWhite
Else
txtdrugs.Enabled = True
txtdrugs.BackColor = vbGray
End If
End Sub

Quote:

---

Originally posted by shmuclez
Just to provide a visual:

VB Code:

Private Sub chkdryes_Click()
If chkdryes.Value = [color="#FF0080"]Checked[/color] Then
' This was the problem
txtdrugs.Enabled = True
txtdrugs.BackColor = vbWhite
Else
txtdrugs.Enabled = True
txtdrugs.BackColor = vbGray
End If
End Sub

---

Should be vbChecked.

worked fine for me my way, i just used Checked

Quote:

---

Originally posted by shmuclez
worked fine for me my way, i just used Checked

---

You are right. You learn something every day. I never new that Checked (and Unchecked and Gray) were valid.

Thanks for the fast reply :)

I thought it was YES/NO :)

thanks guys!!!