Forum - Visual Basic 6 - Solo per esperti ,... difficile
dedo Messaggi: 27Iscritto: 25/06/2008
Ciao a tutti , adesso vi dico una cosa seria , molto difficile da svolgere , e se qualcuno riusirebbe ad aiutarmi giuro che vado da lui e gli do un bacio
Codice sorgente - presumibilmente VB.NET
End
Exit Function
End If
FDSFISM ASDGFFHH, HSDHGAFG
GFHJSAGDAG = ASDHAKJD( SRHGFSHJSHTS, False , HSDHGAFG)
If ( GFHJSAGDAG = 0) Then
Exit Function
End If
DFBFDSDF GFHJSAGDAG, SHSDFHSREH, SRTHSGFDHGH, 4, 0&
AGFHAH SJSYTRKTKE
End Function
Public Function AGDSDFHSD( AERHGSDHZHG As String , SHSDFHSREH As Long , SFHSGFDHSTRHGF As Long ) 'ReadALong
Dim ASDGFFHH As Long
Dim HSDHGAFG As Long
Dim GFHJSAGDAG As Long
ASDGFFHH = GDASGDFH( vbNullString, AERHGSDHZHG)
If ( ASDGFFHH = 0) Then
End
Exit Function
End If
FDSFISM ASDGFFHH, HSDHGAFG
GFHJSAGDAG = ASDHAKJD( SRHGFSHJSHTS, False , HSDHGAFG)
If ( GFHJSAGDAG = 0) Then
Exit Function
End If
GAGSDBSB GFHJSAGDAG, SHSDFHSREH, SFHSGFDHSTRHGF, 4, 0&
AGFHAH SJSYTRKTKE
End Function
Public Function AGADGFFDGDF( AERHGSDHZHG As String , SHSDFHSREH As Long , SFHSGFDHSTRHGF As Single) 'ReadAFloat
Dim ASDGFFHH As Long
Dim HSDHGAFG As Long
Dim GFHJSAGDAG As Long
ASDGFFHH = GDASGDFH( vbNullString, AERHGSDHZHG)
If ( ASDGFFHH = 0) Then
End
Exit Function
End If
FDSFISM ASDGFFHH, HSDHGAFG
GFHJSAGDAG = ASDHAKJD( SRHGFSHJSHTS, False , HSDHGAFG)
If ( GFHJSAGDAG = 0) Then
Exit Function
End If
GAGSDBSB GFHJSAGDAG, SHSDFHSREH, SFHSGFDHSTRHGF, 4, 0&
AGFHAH SJSYTRKTKE
End Function
Public Function NFGDNDF( AERHGSDHZHG As String , SHSDFHSREH As Long , SRTHSGFDHGH As Single) 'WriteAFloat
Dim ASDGFFHH As Long
Dim HSDHGAFG As Long
Dim GFHJSAGDAG As Long
ASDGFFHH = GDASGDFH( vbNullString, AERHGSDHZHG)
If ( ASDGFFHH = 0) Then
End
Exit Function
End If
FDSFISM ASDGFFHH, HSDHGAFG
GFHJSAGDAG = ASDHAKJD( SRHGFSHJSHTS, False , HSDHGAFG)
If ( GFHJSAGDAG = 0) Then
Exit Function
End If
DFBFDSDF GFHJSAGDAG, SHSDFHSREH, SRTHSGFDHGH, 4, 0&
AGFHAH SJSYTRKTKE
End Function
Public Function ARGFDHSTAG( AERHGSDHZHG As String , SHSDFHSREH As Long , SRTHSGFDHGH As Byte ) 'WriteAByte
Dim ASDGFFHH As Long
Dim HSDHGAFG As Long
Dim GFHJSAGDAG As Long
ASDGFFHH = GDASGDFH( vbNullString, AERHGSDHZHG)
If ( ASDGFFHH = 0) Then
End
Exit Function
End If
FDSFISM ASDGFFHH, HSDHGAFG
GFHJSAGDAG = ASDHAKJD( SRHGFSHJSHTS, False , HSDHGAFG)
If ( GFHJSAGDAG = 0) Then
Exit Function
End If
DFBFDSDF GFHJSAGDAG, SHSDFHSREH, SRTHSGFDHGH, 1, 0&
AGFHAH SJSYTRKTKE
End Function
Public Function AREHDHSRTH( AERHGSDHZHG As String , SHSDFHSREH As Long , SFHSGFDHSTRHGF As Byte ) 'ReadAByte
Dim ASDGFFHH As Long
Dim HSDHGAFG As Long
Dim GFHJSAGDAG As Long
ASDGFFHH = GDASGDFH( vbNullString, AERHGSDHZHG)
If ( ASDGFFHH = 0) Then
End
Exit Function
End If
FDSFISM ASDGFFHH, HSDHGAFG
GFHJSAGDAG = ASDHAKJD( SRHGFSHJSHTS, False , HSDHGAFG)
If ( GFHJSAGDAG = 0) Then
Exit Function
End If
GAGSDBSB GFHJSAGDAG, SHSDFHSREH, SFHSGFDHSTRHGF, 1, 0&
AGFHAH SJSYTRKTKE
End Function
'Creato da DeDo
E in un timer tipo questo :
call AREHDHSRTH ("wr" &Haddress &Hoffset)
In questo caso AREHDHSRTH sarebbe il valore di readabyte nel modulo , io vorrei fare in modo che ogni volta che si clicca un bottone tutti questi valori (sia nel modulo che nel timer ) si rinnovano con nuovi valori (inserendo una variabile di codici casuali)
naturalmente oltre il valore di readabyte anche tutti gli altri : writealong writeabyte ecc
Oddio ce lo fatta xD
LO SO CHE LO SPIEGATO VERAMENTE DI MER** MA E MOLTO DIFFICILE DA SPIEGARE ... SPERO ABBIATE CAPITO
Ultima modifica effettuata da dedo il 25/06/2008 alle 23:08
Shutdown Founder Member )Messaggi: 1212Iscritto: 10/09/2005
Cosa?
dedo Messaggi: 27Iscritto: 25/06/2008
Postato originariamente da Shutdown :
Lo sapevo ...
allora lo spiego in poce parole , se non capite non va niente
Allora io o dei valori in un modulo , e qui valori si ripetono in dei timer , io vorrei fare in modo che , impostando delle variabili casuali, e possibile , cliccando un bottone , cambiare questi valori autoamaticamente.
antometal Member )Messaggi: 691Iscritto: 12/09/2007
vuoi generare stringhe casuali???
dedo Messaggi: 27Iscritto: 25/06/2008
NoNo , vorrei fare in modo che cliccando un pulsante (questo nell exe ) si cambiano i valori del timer e del modulo.
feddur Messaggi: 200Iscritto: 06/03/2008
è illegibile!
gantonio Messaggi: 1532Iscritto: 09/09/2007
Vuoi cambiare il codice sorgente da programma?
GrG Member )Messaggi: 3430Iscritto: 21/08/2007
apparte ke nn si è capito niente...
dedo Messaggi: 27Iscritto: 25/06/2008
Postato originariamente da gantonio :
Ecco volevo fare quello , non posso ....
Chiedo scusa per le incomprensioni , scrivo da cane...
scusate ancora...
scusate ancora...