Como se usa el case y el Msgbox

[silvinaquispe]

HOLA... TENGO QUE RESOLVER EL EJERCICIO Y AHI UNA GRAN DUDA EN MI YA QUE NO SE COMO SE USA EN ESTE CASO EL "CASE" Y MENOS COMO EL MSGBOX EN ESTE CASO. QUE SIGNIFICA EL & CUANDO DEBO UTILIZARLO.
EL SIGUIENTE EJERCICIO DEBERIA MOSTRARME; SEXO,MASCULINO O FEMENINO, EQUIPO; ESPECIFICARME CUAL EQUIPO. NO SE CUAL ES LA FALLA. SI ALGUIEN SABE POR FAVOR PODRIA AYUDARME... ESTOY TRABAJANDO EN EL VISUAL BASIC.


Private Sub CmdAceptar_Click()
Dim Sexo As String
Dim EquipodeFutboll1 As String
Dim EquipodeFutboll2 As String

If OptMasculino.Value Then
Sexo = "Masculino"
Else
Sexo = "Femenino"

Select Case EquiposdeFutboll1
Case "Boca"
MsgBox "Boca"
Case "River"
MsgBox "River"
Case "SanLorenzo"
MsgBox "SanLorenzo"
Case Else



MsgBox "Sexo: " & Sexo & ", EquiposdeFutboll1: " & EquiposdeFutboll1, vbOKOnly, "Resultado"
End Select