Compile Error Expected Case

[Spam808]

I am working on creating hidden text boxes. Based on the selection from a combo box, it will display the hidden text boxes. I didnt get a chance to finish writing my code. It is displaying Complie Error Expected Case.

Private Sub Form_Current()
Dim Visible As Boolean
Select cboRowNumbers.Value
Case "",
Visible = False
Case Else
Visible = True
End Select
End Sub

 

[theDBguy]

Hi,

You want...

Select Case Me.cboRowNumbers

Hope it helps...

 

[JHB]

And it is a comma to much here:

Case ""[B][COLOR=Red],[/COLOR][/B]

 

[Spam808]

Thank you all, fixed forgot the case

 

[theDBguy]

You're welcome. We're happy to assist. Cheers!