Visual Basic - Asignar valor de una variable

Life is soft - evento anual de software empresarial
 
Vista:
sin imagen de perfil
Val: 11
Ha aumentado su posición en 6 puestos en Visual Basic (en relación al último mes)
Gráfica de Visual Basic

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

1
2
3
4
5
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 claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
Imágen de perfil de Andres Leonardo
Val: 3.970
Oro
Ha mantenido su posición en Visual Basic (en relación al último mes)
Gráfica de Visual Basic

Asignar valor de una variable

Publicado por Andres Leonardo (1697 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 claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar
Imágen de perfil de gilman
Val: 521
Bronce
Ha mantenido su posición en Visual Basic (en relación al último mes)
Gráfica de Visual Basic

Asignar valor de una variable

Publicado por gilman (284 intervenciones) el 09/05/2019 08:55:26
El acceso al campo del recordset quedaría mejor:
1
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í:
1
2
3
4
5
6
7
8
9
10
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
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar