VB - Select case

[gozzer101]

Hello all. I have managed to get the select case statements working using the following code:

Dim strwhichoption As String

strwhichoption = ComboBox1
ComboBox1.AddItem ("Reina")
ComboBox1.AddItem ("Sorensen")
ComboBox1.AddItem ("Cudicini")
ComboBox1.AddItem ("Van Der Sar")

Select Case strwhichoption
Case Reina
TextBox17.Text = "5"
TextBox29.Text = "31"
Case Cudicini
TextBox17.Text = "2"
TextBox29.Text = "30"
Case Sorensen
TextBox17.Text = "3"
TextBox29.Text = "31"
End Select

I want to add the name "Van der sar" to the list though (note the spaces in the name)

I tried doing the same method as above ("add item" and "case"):
Case Van Der Sar
TextBox17.Text = "3"
TextBox29.Text = "31"

But it doesn't accept it in the case because it has spaces, it says "expected end of statement" after Van. But I would like to have the full name.

Anyone know how to do this, without using the name "VanDerSar" (no spaces)

Thank you if you can help!!

[Andrew Thackray]

since yor case stement is selecting on a string value you need to quote the values. The correct code is

Select Case strwhichoption
Case "Reina"
TextBox17.Text = "5"
TextBox29.Text = "31"
Case "Cudicini"
TextBox17.Text = "2"
TextBox29.Text = "30"
Case "Sorensen"
TextBox17.Text = "3"
TextBox29.Text = "31"
End Select
 
 

Then adding Van der sar will work as it is included in quotes in the select.

[gozzer101]

since yor case stement is selecting on a string value you need to quote the values. The correct code is

Select Case strwhichoption
Case "Reina"
TextBox17.Text = "5"
TextBox29.Text = "31"
Case "Cudicini"
TextBox17.Text = "2"
TextBox29.Text = "30"
Case "Sorensen"
TextBox17.Text = "3"
TextBox29.Text = "31"
End Select
 
 

Then adding Van der sar will work as it is included in quotes in the select.

Ah ok. Thank you!