[vb6] aumentare una variabile e visualizzarla

[ciro78]

Ciao a tutti.Vorrei che cliccand su un pulsante il valore di una variabile aumentasse.Cliccando su un secondo visualizzase questa variabile.

Ho scritto il seguente codice

Sub pippo()
command1_onclick
x = x + 1

End Sub



Function valore(incognita As Integer) As Integer
Dim y As Integer
y = x

End Function

Private Sub command2_click()
MsgBox valore
End Sub

mi da due errori.il primo non mi visualizza alcun valore...
il secondo mi evidenzia

Private Sub command2_click()

di giallo e mi dice argomento nn facoltativo.quando aggiungo integer mi dice errore previsto fine istruzione

[MMarzia]

il valore non è incrementato, perchè non hai associato nessuna azione all'evento Click del primo pulsante..

puoi risolvere più semplicemente così:

Dim X As Integer

Private Sub Command1_Click()
X = X + 1
End Sub

Private Sub command2_click()
MsgBox X
End Sub

cliccando sul primo bottone incrementi il valore di uno, mentre con il secondo visualizzi il contenuto della variabile

[Misterxxx]

Private Sub command1_click()
x = x + 1
End Sub

Private Sub command2_click()
MsgBox x
End Sub

Permettimi: compra un libro sennò non arrivi...

[ciro78]

lo so ma quelli migliori sul sito della'pogeo sono tutti esauriti e qui a NApoli non trovo nienet...poi considerando che parto da zero ....che cavolo faccio

[Misterxxx]

Per esempio:
http://www.internetbookshop.it/ser/s...=TTK63DGJQM1TD

[xegallo]

Ciro78 ti consiglio un'accurata lettura del regolamento per favorire una piacevole e proficua convivenza, ricordati in particolar modo di premettere linguaggio e versione al titolo della discussione. grazie