Member Avatar for mansi sharma

Private Sub Command1_Click()
Select Case Me.Text1.Text
Case 1
MsgBox ("U Entered 1")
Case 2
MsgBox ("U entered 2")
Case 3
MsgBox ("u entered 3")
Case Default
MsgBox ("Default")
End Select
End Sub

When i enter 4 in textbox1, Msgbox is not displayed.....Default is a valid case or not in VB

  • 3 Contributors
  • 2 Replies
  • 143 Views
  • 5 Years Discussion Span
  • Latest Post Latest Post by anup_1

Recommended Answers

All 2 Replies

Member Avatar for Ezzaral

Use "Case Else":

Select Case Me.Text1.Text
    Case 1
        MsgBox ("U Entered 1")
    Case 2
        MsgBox ("U entered 2")
    Case 3
        MsgBox ("u entered 3")
    Case Else
        MsgBox ("Default")
End Select
commented: useful +1
Member Avatar for anup_1

you are wrong Ezzaral case else is not the same as case default:

Edited by anup_1 because: code tag
Be a part of the DaniWeb community

We're a friendly, industry-focused community of developers, IT pros, digital marketers, and technology enthusiasts meeting, networking, learning, and sharing knowledge.