Visual Basic - Ayuda con Consulta

Life is soft - evento anual de software empresarial
 
Vista:

Ayuda con Consulta

Publicado por mary (58 intervenciones) el 29/06/2007 21:04:46
Hola, necesito saber como puedo hacer para que al seleccionar unos datos de la BD, ejemplo, 1,2,3,4,5,6, me devuelva 001,002,003,003,etc. Me dijeron que lo podia hacer con un format, pero al hacerlo me devuelve los faros de la primera columna y no de la que necesito, nunca habia trabajado con este metodo y no se bien como funciona. El codigo que tengo es el siguiente;

sql = "SELECT * FROM Enlaces Order by Num_Agencia"
Set rs = db.Execute(sql)
With MSFlexGrid1
Do While Not rs.EOF
X = X + 1
.Rows = X + 1
.TextMatrix(X, 0) = rs!Num_Circuito
.TextMatrix(X, 1) = rs!Agencia
.TextMatrix(X, 2) = rs!Num_Agencia ----Este es el campo que necesito que aparezca asi
.TextMatrix(X, 2) = Format(rs.Fields(0), "000")
.TextMatrix(X, 3) = rs!Proveedor
.TextMatrix(X, 4) = rs!DLCI
.TextMatrix(X, 5) = rs!CIR
.TextMatrix(X, 6) = rs!Velocidad
.TextMatrix(X, 7) = rs!Fecha_Instalacion
rs.MoveNext
Loop
Por fa ayudenme
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

RE:Ayuda con Consulta

Publicado por Cecilia Colalongo (3117 intervenciones) el 29/06/2007 22:15:24
Puedes reemplazarlo por:

.TextMatrix(X, 2) = String(3-Len(Trim(rs.Fields(0))),"0")+Trim(rs.Fields(0))
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