Visual Basic 6 - OPERAZIONI NUMERICHE

Forum - Visual Basic 6 - OPERAZIONI NUMERICHE

VBC++ (Normal User)
Newbie

Messaggi: 10
Iscritto: 13/07/2005

Postato alle 18:32
Domenica, 28/08/2005

ALLORA HO  QUESTO COMANDO AD  UN OGGETTO:
Private Sub GENERA_Click()

  risultato = (Text1 / 7)

    txtCounter.Text = CStr(risultato)
End Sub
quindi si inserisce  in Text1 una numero di  10 o piu' cifre
e nella casella Text sivisualizza il risultato,niente di + semplice, pero' io  vorrei che nella casella oggetto Text si visualizzassero solo le  prime  6 cifre
sicuramente ci sara' un numero con virgola
del tipo

1234567895412,25

avendo questo io  dovrei  far visualizzare solo  le prime  6 cifre :
123456

come posso fare?

Ultima modifica effettuata da VBC++ il 28/08/2005 alle 18:33

pak0 (Ex-Member)
Expert

Messaggi: 410
Iscritto: 13/02/2005

Postato alle 13:23
Mercoledì, 31/08/2005

La converti in stringa e fai scrivere solo le prime sei cifre...

Chevantonio19 (Ex-Member)
Pro

Messaggi: 95
Iscritto: 03/09/2005

Postato alle 0:36
Mercoledì, 07/09/2005

in vb c'e' la funzione mid$("stringa","carattere di partenza della stringa","caratteri da leggere")

nel tuo caso sarebbe

Private Sub GENERA_Click()
dim P as string
risultato = (Text1 / 7)
P = mid$(risultato,1,6)
txtCounter.Text = P
End Sub

questa funzione personalmente la uso tantissimo per controllare ad uno ad uno i caratteri di una stringa con un bel ciclo for

tipo

dim L as long
dim P as string
dim i as integer

L = len(stringa)

for i =1 to L
P = mid$(stringa,i,1)
msgbox P
next i

ciauzzz :k:

Ultima modifica effettuata da Chevantonio19 il 07/09/2005 alle 0:37

VBC++ (Normal User)
Newbie

Messaggi: 10
Iscritto: 13/07/2005

Postato alle 0:09
Giovedì, 08/09/2005

GRAZIEEEEEEE