Ver Mensaje Individual
  #2 (permalink)  
Antiguo 02/04/2010, 18:36
hunter18
 
Fecha de Ingreso: junio-2008
Mensajes: 343
Antigüedad: 15 años, 10 meses
Puntos: 4
Respuesta: Recuperar letra de una palabra en un msgbox

Al final era bastante sencillo, ya esta.

Código:
Dim x As Integer

If xPosicion = Len(xCadena) Then 
   xPosicion = Val(1)
Else
   xPosicion = Val(xPosicion) + 1
End If

x = Val(xPosicion)

F_letra = Mid(xCadena, x, 1)