Hej! Dim lRäkna as long
Räknare
Svara
Jag undrar om det är någon som vet hur jag ska göra det här:
Jag har en knapp i mitt formulär som jag vill att när jag klickar på den så ska datum visa plus att det ska räkna ett steg upp varje gång, exempel på hur det ska se ut i textrutan kommer här:
2000-11-23:1
Hoppas på hjälp.
/ Mario
Sv: Räknare
Svara
Private Sub Command1_Click()
lRäkan=lRäkna+1
text1.text= Date & ":" & lRäkna
end sub