Bonsoir,

Pour simplifier :
Public Array1(0 To 10000) As Integer 'Qui va contenir l'Etat de la balle
Public Array2(0 To 10000) As Long 'Qui va contenir la valeur de HSpeed
Public Array3(0 To 10000) As Long 'Qui va contenir la valeur de VSpeed

Regardes la classe Collection et les Modules de classe, ce sera plus propre et simple à manipulet.
Ou au pire, renseignes-toi sur les structures (TYPE).

IMPORTANT : Mets TOUJOURS Option Explicit en haut de tous tes modules de code, cela évitera un paquet d'erreur.

Bonsoir,

"ke des fichiers incomprehensibles"
Tu veux dire quoi ?
- Tu ne parviens pas à dézipper le fichier ?
- Tu n'arrive pas à ouvrir la solution ?
- Le code ne fonctionne pas ?

Bonjour,

Soit tu mets un code et une conclusion correcte, soit tu les retires, mais ne remplis pas les champs juste pour les remplir.

Bonjour,

Normal que ton code arrive à plus, tu n'a pas déclaré tes variables, du coup, elles sont Variant, donc pour plus, tu passes en Double, tu perds pas mal de précision par contre.

Mets TOUJOURS Option Explicit en haut de tout tes modules de code en VB6 et VBA.

Bonsoir,

Il serait préférable que tu fasse un controle perso à la place de tout faire dans la form, ce sera plus réutilisable.

Sinon :
If Len(Text1.Tag) < 1 Then
équivaut à :
If Len(Text1.Tag) = 0 Then
Mais c'est plus lisible et compréhensible quand même :)

Bonsoir,

D'accord, ton exemple n'était pas claire, le code peut être confondu avec de l'hexa.

Quelques conseils :
- Nommes de manière explicite tes variables, à quoi sert var5 et var6 ?
- Nommes tes contrôles plus clairement, TxtInVal1 est plus claire que Text1 (Textbox Input Value 1)

Je pense que ça facilitera la lecture du code.

Bonsoir,

Je n'ai pas compris pourquoi tu n'utilises pas les fonctions intégrées pour convertir l'hexa en décimal ?

Val("&h7F0")
Hex$(...)

En effet, ça va mieux.
Après, les conseils habituels :
- Toujours mettre Option Explicit en haut de tes modules de code (Form, moduules, ...)
- Nommer le controles et variable de manière cohérentes :
+ Préfixer le nom des controles : TxtNom est une TextBox demandant le nom
+ Préfixer les variable Locale,Globale,Parametre,LocaleStatic, ... (prendre les lettres en majuscules, donc respectivement l, g, p, ls, ...

Le code sera plus lisible.

Bonjour,

Hormis l'utilité et l'intérêt de la source, que je trouve discutable, elle n'est pas utilisable en l'état, je ne vois pas de Sub Main pour lancer le programme, un oubli ?

Les .EXE sont supprimés des zips.
De plus, c'est un site de partage, donc, on met les sources.