Contador en VB

Soy novato en esto del VB.
Busco la forma de hacer un contador para un programa q estoy haciendo.

Esto es cada q alguien lo use, vaya aumentado 1 numero.

Alguien me da una idea?

Un contador que cada vez que se ejecue el programa se sume 1?
Es facil, utiiza un fichero plano, busca modos de apertura de ficheros planos.

eso es !!

agrega un modulo, en el modulo pon lo siguiente
public a as byte
en el formulario buska como escribir en el registro si no sabes me contactas por msn [email protected] i luego de escribir en el registro q lo ke deberas de escribir es el numero el cual kuenta, lees el registro i en el formulario pones lo siguiente>
a = a + 1
i lo siguiente es guardar a en el registro, asi contara
pero ya te digo q si no sabes me contactas por msn i llo te lo are ;)

yo creo k t lo pdria decir para vbscript...

jocanor la diferencia no es muy apreciable

'************************************************* *
'* comments: jeje tanta mierda para un simple contador
'* pero es ke estaba aburrido...
'* de algo servira a alguien no? XD
'*
'* email autor: [email protected]
'*
'* para que funcione se debera de agregar un timer
'* al formulario.... (lo explico tb por aburrimiento...)
'*
'************************************************* *


'variables
Public cnt As Byte

Private Sub Form_Load()
'lee el registro
'osea count = "lo que aya leido"
cnt = "0"
'esto es de vb ... del timer
Timer1.Interval = 400
End Sub

Public Sub cuenta()
cnt = cnt + 1
Print cnt
'esto tb de vb ... no creo q en vbscript te aga falta
'solo es para que no se llene =)
'If InStr(cnt, "0") Then Me.Cls (abria q arreglarlo diria yo..)
End Sub

Private Sub Timer1_Timer()
cuenta [COLOR=teal]'blabla? bla bla... juas
End Sub


:0=

el de arriba me salio mal :mad:

'************************************************* *
'* comments: jeje tanta mierda para un simple contador
'* pero es ke estaba aburrido...
'* de algo servira a alguien no? XD
'*
'* email autor: [email protected]
'*
'* para que funcione se debera de agregar un timer
'* al formulario.... (lo explico tb por aburrimiento...)
'*
'*************************************************


'variables
Public cnt As Byte

Private Sub Form_Load()
'lee el registro
'osea count = "lo que aya leido"
cnt = "0"
'esto es de vb ... del timer
Timer1.Interval = 400
End Sub

Public Sub cuenta()
cnt = cnt + 1
Print cnt
'esto tb de vb ... no creo q en vbscript te aga falta
'solo es para que no se llene =)
'If InStr(cnt, "0") Then Me.Cls (abria q arreglarlo diria yo..)
End Sub

Private Sub Timer1_Timer()
cuenta 'blabla? bla bla... juas
End Sub


:D aora si!!