[help] cases

I am making a RS client much like the official one, where you can change the language. When a language is chosen, it is saved to My.Settings. Instead of multiple "If" statements, I would like to use cases to shorten the length of my code. But I cannot figure out how to use cases correctly. Can anyone help?

What I have so far...

Code:

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Select Case My.Settings.rs_lang
            Case 
        End Select
    End Sub

 

Select Case My.Settings.rs_lang
Case 1stLang
WriteLine("Lang 1")
Case 2ndLang
WriteLine("Lang 2")
etc...
End Select