1. Este site usa cookies. Ao continuar a usar este site está a concordar com o nosso uso de cookies. Saber Mais.

strings vb6

Discussão em 'Programação' iniciada por .sys, 17 de Maio de 2012. (Respostas: 1; Visualizações: 631)

  1. .sys

    .sys Power Member

    pessoal nova duvida -.-
    eu tou a fazer um "array virtual" dentro da base dados que o obejctivo seja ficar assim

    14,15,1,30, (ids dos produtos)
    1,2,1,3 (respectivas quantidades)
    isto vai servir para guardar dados daquela respectiva compra , eu ja consigo guardar os id's , codigo :

    Dim texto As String, adicionar As String
    texto = Text1.Text
    procurar = conta.Recordset![id]
    encontrar = InStr(texto, procurar)
    If encontrar = 0 Then
    adicionar = conta.Recordset![id]
    Text1.Text = Text1.Text + adicionar + ","
    End If

    (tou a usar textbox , para verificar se o faz correctamente)

    so que agora o das quantidades nao consigo pq nao sei trabalhar muito bem cm strings no vb para o qe preciso :s
    eu fiz aqui basicamente o qe necessito em algoritmia

    procurar na string dos ids o id
    se existir
    ver posicao do id na string
    ir a posicao da quant na string
    adicionar mais 1 a quant
    senao
    adicionar em ultimo
    fim

    algém tem alguma ideia como procurar o id e ver em qe posicao esta ? (posicao e defenida pela virgula qe fica a frente do id ex: 14,16,30, (o id 30 ta na 3 posicao)
    e depois tambm ir a posicao das quantidades (se conseguirem o 1 codigo e facil la ir ) o meu problem e depois saber quantos numeros tao nessa posicao (entre as 2 virgula) e apagar esse numero e adicionar um novo numero com +1 de quantidade (se e qe percebem) :s

    eu sei qe é muito trabalho , nao preciso qe me façam tipo o codigo todo mas me deiem umas luzes sff :s
     
  2. .sys

    .sys Power Member

    ninguém ? :s
     

Partilhar esta Página