[résolu]Visual Basic, aides pour un débutant

[alex.hitman]

Bonjour, je suis débutant en Visual Basic, et j'essaie de faire mon premier petit programme. Seulement, j'ai une erreur (qui doit surement être énorme, mais que je ne vois pas), pouvez-vous me dire laquelle ?

 

Sub calcul()

Dim etape As Integer

For etape% = 1 To 1000000 Step 1

Sin (6) * Cos(3)

Next

End

End Sub

 

 

D'après Microsoft Visual Basic 6, c'est à la 3ème ligne.

 

Merci d'avance.

[sebdraluorg]

Salut,

 

alors pour commencer tu dois declarer etape As Long

et pas en integer

Un nombre "integer" ne peux pas depasser 32000 et des poussieres

 

puis il faut enlever le % a etape%

 

ce qui donnera ceci:

 

Sub calcul()

Dim etape As Long

For etape = 1 To 1000000 Step 1

Sin (6) * Cos(3)

Next

End

End Sub

 

En esperant t'aider @+

[Gen]

Je vois pas l'interet de faire un cos(6) * sin(3) 1 million de fois sans le retourner ni même l'écrire quelque part ...

[alex.hitman]

Je vois pas l'interet de faire un cos(6) * sin(3) 1 million de fois sans le retourner ni même l'écrire quelque part ...

 

Je sais, mais je veux juste faire calculer le processeur ! (pour l'instant, c'est le début de mon programme).

[sebdraluorg]

Yep je me disais la meme chose, mais si il est debutant il cherche peut etre juste a faire des essai de boucles....

 

a ce sujet il est inutile d'utiliser step si c'est pour incremeter que d'une unite par boucles...

 

EDIT:

Oup's poster trop tard lol

Modifié le 26 mars 2005 par sebdraluorg

[Gen]

Je sais, mais je veux juste faire calculer le processeur ! (pour l'instant, c'est le début de mon programme).

480360[/snapback]

Ok ok alex.hitman, on te laisse continuer. Si par contre t'as encore des questions on est là

[alex.hitman]

Je vous remercie.

 

Là, j'ai ma procédure calcul() que j'appelle grâce à un bouton. J'ai donc :

 

Sub Command1_Click()

 

Call calcul

 

End Sub

 

Mais, lorsque la boucle du calcul est finie, ma fenêtre form disparaît. Est-ce normal ?

 

Aussi, quelle est la différence entre Sub et Private Sub ?

[Gen]

Je crois que le End dans ta fonction calcul() termine le programme ...

 

Edit -- lorsque tu déclares une Sub sans rien devant elle est Private par défaut, ç-à-d que tu ne peux l'appeller que depuis la form ou le module où elle se trouve ... si par contre tu créés une Public Sub tu pourras l'appeller depuis n'importe où.

[alex.hitman]

Effectivement, "End" !

[alex.hitman]

Comment puis-je faire pour afficher du texte à tel ou tel endroit, et en y incluant le contenu de variables ?