Problema con cadena

Hola ..tengo este ciclo y quiero formar el siguiente string '0001','0002','0003'
 pero creo ke algo estoy haciendo mal por ke me sale asi ''',0001',0002',0003
aki te dejo mi codigo para ke lo chekes
 if i = 1 then
For i = 1 To  dw_list.RowCount( )
  if  dw_list.Object.depto[ i] = '1' Then
   ls_dep = dw_list.Object.c_codigo_dep[ i]
   ls_cadena = " ' " +ls_cadena+ " ' " +','+ls_dep
  end if
  next
end if

1 Respuesta

Respuesta
1
if i = 1 then
ls_dep = dw_list.Object.c_codigo_dep[ 1]
if  dw_list.Object.depto[1] = '1' Then ls_cadena = "'"+ls_dep + "'"
For i = 2 To  dw_list.RowCount( )
  if  dw_list.Object.depto[ i] = '1' Then
   ls_dep = dw_list.Object.c_codigo_dep[ i]
   ls_cadena = ls_cadena + ",'" + ls_dep + "'"
  end if
  next
end if

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas