Así quedan las estructuras:
Utiliza case cuando el valor a evaluar puede tener varios resultados.
texto = "prueba de letras"
'
Select Case opcion
Case 1
res = StrConv(texto, vbUpperCase) 'res = PRUEBA DE LETRAS
Case 2
res = StrConv(texto, vbLowerCase) 'res = prueba de letras
Case 3
res = StrConv(texto, vbProperCase) 'res = Prueba De Letras
End Select
Utiliza if then elseif cuando vas a realizar diferentes condiciones:
texto = "prueba de letras"
'
If opcion = 1 Then
res = StrConv(texto, vbUpperCase) 'res = PRUEBA DE LETRAS
ElseIf opcion = 2 Then
res = StrConv(texto, vbLowerCase) 'res = prueba de letras
ElseIf opcion = 3 Then
res = StrConv(texto, vbProperCase) 'res = Prueba De Letras
End If
Los dos casos son correctos y funcionan, pero lo ideal en este caso es que utilices la estructura Select Case.