Visual Basic - Asignar valor de una variable

Life is soft - evento anual de software empresarial

Pos: 228

Val: 7

Asignar valor de una variable

Publicado por José (6 intervenciones) el 08/05/2019 20:49:59

Tengo este código
GR01 = 12
GR02 = 14
....
GR65=88

For m = 1 To 65

    rsPosicion.fields(Format(m, "00")) =  '"GR" + Format(m, "00")

Next m

Me da error porque la asignación al campo de la tabla debe de ser un número, el valor de la variable GR01, GR02...

Cómo debo de poner la asignación. Me refiero a = '"GR" + Format(m, "00") para que sea el valor de la variable correspondiente?

Gracias

Valora esta pregunta

Me gusta: Está pregunta es útil y esta clara

No me gusta: Está pregunta no esta clara o no es útil

Responder

Pos: 1

Val: 3.117

Asignar valor de una variable

Publicado por Andres Leonardo (1798 intervenciones) el 09/05/2019 00:45:27

Pues debe ser string

y concatenalo no con + si no con &

que version de visulal estas usando.

Valora esta respuesta

Me gusta: Está respuesta es útil y esta clara

No me gusta: Está respuesta no esta clara o no es útil

Comentar

Pos: 4

Val: 594

Asignar valor de una variable

Publicado por gilman (359 intervenciones) el 09/05/2019 08:55:26

El acceso al campo del recordset quedaría mejor:

rsPosicion.fields("GR" & Format(m, "00"))

Pero a los valores deberías crear una matriz, y el código quedaría, mas o menos así:

Dim GR(1 To 65) As Long 'o el tipo necesario

Dim m As Long

GR(1) = 12

GR(2) = 14

'....

GR(65) = 88

For m = 1 To 65

    rsPosicion.fields("GR" & Format(m, "00")) = GR(m)

Next m

Valora esta respuesta

Comentar

Error 462. El equipo o servidor remoto no existe o no está disponible

System.InvalidCastException: 'La conversión de la cadena "" en el tipo 'Integer' no es válida.'