Help with combo box

[Adnane]

I have this code so if I select something from the combo box, there is a text box next to it, which will show the explanation of the selection, can someone take a look at this and see if there is a way to make this happen:

VB code:
Private Sub cbSLAType_Change()
If cbSLAType = "PC Replacement" Then
txtTypeDetail.Visible = True
txtTypeDetail.Text = "PC Replacement"
ElseIf cbSLAType = "Password Reset" Then
txtTypeDetail.Visible = True
txtTypeDetail.Text = "Password Reset"
ElseIf cbSLAType = "3D ID set up" Then
txtTypeDetail.Visible = True
txtTypeDetail.Text = "3D Id Set Up"
ElseIf cbSLADetail = "Phone Moves" Then
txtTypeDetail.Visible = True
txtTypeDetail.Text = "Phone Moves"
ElseIf cbSLAType = "Workstation Moves" Then
txtTypeDetail.Visible = True
txtTypeDetail.Text = "Workstation Moves"
ElseIf cbSLAType = "LAN Printer Moves" Then
txtTypeDetail.Visible = True
txtTypeDetail.Text = "LAN Printer Moves"
Else
txtTypeDetail.Visible = False
End If

End Sub

maybe there is a better way to do this, the text box is going to be invisible, but when they make the selection, it'l show the explanation.

Thank you for your help.

[chemicalNova]

Does it show the explanation when you CLICK it? Or when you move the mouse over it?



Phreak

[Adnane]

when you click it

[Keithuk]

You need to put this code in the Private Sub cbSLAType_Click(), Click event, not Change event. You would think logically that it goes in the Change event because the text is changing. But VB doesn't think that logically. I just changed it to the Click event and it works fine.

[Adnane]

Yes it worked, Thank you

[MartinLiss]

Originally posted by Adnane
Yes it worked, Thank you

When you have the answer, please edit the Subject of the first post and add the word resolved.