Programación General => Visual Basic 6.0 e inferiores => Visual Basic para principiantes => Mensaje iniciado por: happypeace31 en Domingo 23 de Marzo de 2008, 00:32
Título: Arreglos En Visual Basic 6.0
Publicado por: happypeace31 en Domingo 23 de Marzo de 2008, 00:32
Gracias por la ayuda anteriormente me sirvio de mucho! :D
AHORA LES VUELVO A MOLESTAR
QUIERO GUARDAR DESDE UN TEXTBOX UNA CADENA DE CARCATERES AL ARREGLO
NECESITO QUE AL INTRODUCIRSE EN EL TEXTBOX UNA CADENA DE CARCTERES EN EL ARREGLO ME LO GUADE UNA CARACTER EN CADA ESPACIO DEL ARREGLO
EJEMPLO
SI EN EL TEXBOX ESCRIBO "HOLA MUNDO"
ME LO GUARDE EN EL ARREGLO DE LA SIGUIENTE MANERA
ARREGLO (0)="H" ARREGLO (1)="O" . . ARREGLO (4)= "" QUE TAMBIEN GUARDE EL ESPACIO . .
ESO EL LO QUE QUIERO QUE ME AGA MUCHAS GRACIAS DE ANTEMANO Y AYUDENME POR FAVOR :comp:
Título: Re: Arreglos En Visual Basic 6.0
Publicado por: cpmario en Domingo 23 de Marzo de 2008, 21:24
Código: Text
Dim Arreglo() As String
Dim strText As String
Dim lngLenText As Long
Dim lnCnt As Long
strText = Text1.Text
lngLenText = Len(strText)
ReDim Arreglo(lngLenText)
For lnCnt = 1 To lngLenText
Arreglo(lnCnt - 1) = Mid$(strText, lnCnt, 1)
Next lnCnt
:comp:
Título: Re: Arreglos En Visual Basic 6.0
Publicado por: happypeace31 en Miércoles 26 de Marzo de 2008, 23:16