Ver Mensaje Individual
  #1 (permalink)  
Antiguo 01/10/2010, 10:38
Avatar de eaanillol
eaanillol
 
Fecha de Ingreso: septiembre-2010
Ubicación: Bogota - Colombia
Mensajes: 25
Antigüedad: 13 años, 5 meses
Puntos: 0
De acuerdo Conversión de Datos en VB y arreglo de caracteres

Hola Muchachos, espero tener una respuesta en este tema, por que la verdad ya ando desesperado.

Bueno al grano, la verdad son dos cuestiones:
1-Estoy trabajando en vb 2005 con Microsoft office 2003 con arrays, hice pruebas con los distintos tipos de datos, por ejemplo:

Sub pruebaConversion()

Dim c(1 To 5) As String
Dim i As Integer

For i = 1 To 5
c(i) = "" & i
Next i

MsgBox "" & c(1)
End Sub

Y me funciona perfecto. La cosa se pone fea cuando intento usar caracteres. La primera cosa rara que sucede es que cuando creo el arreglo, al momento de asignar el tipo de la variable,entre las sugerencias del V.B. no me sale Char sino:
Characters
Chart
Chats
Chart Objects
entre otras

y si uso cualquiera de ellas con el siguiente código:

Sub pruebaConversion()

Dim c(1 To 5) As Chart
Dim i As Integer

For i = 1 To 5
c(i) = "" & i
Next i

MsgBox "" & c(1)
End Sub

me sale "variable de objeto o bloque with no establecido", le pongo el with y me sale: "El objeto with debe ser un tipo definido por el usuario"

Si alguien sabe como crear arreglos con caracteres seria de gran ayuda.

2- La segunda cuestión es que necesito hacer lo anterior debido a que voy a convertir un String en un arreglo de caracteres pero no se como hacerlo. Busque y encontré pero el código no me sirve, uso funciones como CType con:
Sub pruebaConversion()

Dim testNumber As Long
testNumber = 1000
' The following line of code sets testNewType to 1000.0.
Dim testNewType As Single
testNewType = CType(testNumber, Single)

End Sub

y me dice error de sintaxis, y uso también esta:
Sub pruebaConversion()

Dim a As String
Dim b As Chart
a = "g"
b = CType(a, Chart)

End Sub

pero me dice que la funcion CType no la he definido.