CONNEXION
  • RetourJeux
    • Sorties
    • Hit Parade
    • Les + populaires
    • Les + attendus
    • Soluces
    • Tous les Jeux
    • Gaming
  • RetourActu Gaming
    • News
    • Astuces
    • Tests
    • Previews
    • Toute l'actu gaming
  • RetourBons plans
    • Bons plans
    • Bons plans Smartphone
    • Bons plans Hardware
    • Bons plans Image et Son
    • Bons plans Amazon
    • Bons plans Cdiscount
    • Bons plans Decathlon
    • Bons plans Fnac
    • Tous les Bons plans
  • RetourJVTech
    • Actus High-Tech
    • Intelligence Artificielle
    • Smartphones
    • Mobilité urbaine
    • Hardware
    • Image et son
    • Tutoriels
    • Tests produits High-Tech
    • Guides d'achat High-Tech
    • JVTech
  • RetourCulture
    • Actus Culture
    • Culture
  • RetourVidéos
    • A la une
    • Gaming Live
    • Vidéos Tests
    • Vidéos Previews
    • Gameplay
    • Trailers
    • Chroniques
    • Replay Web TV
    • Toutes les vidéos
  • RetourForums
    • Hardware PC
    • PS5
    • Switch 2
    • Xbox Series
    • Switch
    • Pokemon pocket
    • FC 25 Ultimate Team
    • League of Legends
    • Tous les Forums
  • PC
  • PS5
  • Xbox Series
  • Switch 2
  • PS4
  • One
  • Switch
  • iOS
  • Android
  • MMO
  • RPG
  • FPS
En ce moment Genshin Impact Valhalla Breath of the wild Animal Crossing GTA 5 Red dead 2
Liste des sujets

Visual Basic 6 probleme

Deltrex
Deltrex
Niveau 7
05 août 2004 à 20:02:39

Salut sa fais pas lontemps que j´utilise VB et je voudrais faire un programe:lorsque on ouvre le programme, il y a une fenêtre d´erreur ( msgbox) et quand on clike sur ok, yen a une 2...3..4..5 etc. j´ai reusis a le faire avec For mais je voudrais rajouter le message " Sa fais 3 fenetre que tu ferme" et losrqu´on en ferme une de plus, sa rajoute 1 a la variable. Je sais pas si vous comprenez...voici mon prog:

for a = 1 to 99999 step 1
MsgBox ( "sa fais X fenêtre que tu ferme", vbcritical, " LOL")
Next A
End Sub

DS-Shadow
DS-Shadow
Niveau 6
05 août 2004 à 20:57:27

Option Explicit
Private A As Long

Private Sub Form_Load()
LaMerde
End Sub

Private Sub LaMerde()
For A = 1 To 99999
MsgBox " cela fais " & A & " fenêtre que tu ferme", vbCritical, " LOL"
Next A
End Sub

tien je prospose de garder se poste pour vous aidez a résoudre vos problème avec vb.

dnob700
dnob700
Niveau 10
05 août 2004 à 21:05:32

Je donne ici une version plus propre du code

Option Explicit
´on ne déclare pas A ici, car ce n´est pas une variable globale

Private Sub Form_Load()
´mettont la procédure ici, c´est plus simple
dim A as long
A=0
do
´Do permet de faire une infinité de boucle ( en fait, " seulement" 2 milliard.
A=A+1
MsgBox " cela fais"& str(A) &" fenêtre que tu ferme", vbCritical, " LOL"
´notez qu´il n´y a pas d´espace entre ´fais´ et ´"´ mais qu´il y en as entre ´"´ et ´fenêtre´
loop
unload me
End Sub

Tout ça pour doner en fait l´équivalent de ce sujet sur le forum propgrammation, qui est plus approprié pour les question de programmation pur.

https://www.jeuxvideo.com/forums/1-47-3991-1-0-1-0-0.htm

DS-Shadow
DS-Shadow
Niveau 6
05 août 2004 à 21:14:09

https://www.jeuxvideo.com/forums/1-47-3991-1-0-1-0-0.htm < - ça ressemble plus à un bistrot qu´a autre chose :p

DS-Shadow
DS-Shadow
Niveau 6
05 août 2004 à 22:16:19

à tien, esque certain se sont lancé dans le developpemant d´un jeu avec vb?

Deltrex
Deltrex
Niveau 7
05 août 2004 à 23:17:14

Merci beaucoup

Deltrex
Deltrex
Niveau 7
05 août 2004 à 23:21:34

Au fais...dnob700, est-ce que je peut savoir a quoi sert : unload me car meme si je ne le met pas sa fonctionne...

DS-Shadow
DS-Shadow
Niveau 6
05 août 2004 à 23:40:15

à decharger de la memoire ta feuille form

dnob700
dnob700
Niveau 10
06 août 2004 à 00:06:08

normal, cette instruction n´est jamais exécuter, mais c´est une habitude de toujours mettre un unload à la fin d´un programme.

dnob700
dnob700
Niveau 10
06 août 2004 à 00:06:51

je veux dire que dans ce programme elle n´est pas xécuter mais normalement elle l´est.

Deltrex
Deltrex
Niveau 7
06 août 2004 à 01:04:06

merci encore, et j´ai une autre question. Au lieu de faire un nouveau topic jvais la demander ici. Elle peut paraitre stupide mais bon...
Je ne suis pas capable de mettre une icone a mon programme; j´ai telecharger une image sur le net, je l´ai en enregistrer " test.ico" en bmp, en jpeg ( et plein d´autre) et lorsque je veux l´ouvrir dans VB6 sa me dit : " Invalid property value" Et aussi une question pour les plus expérimenter:comment mettre dans un programme une fonction pour fermer l´ordinateur? J´ai seulement réussi à faire fermer la session...fermer l´ordi sa marche pas....

lepala
lepala
Niveau 3
06 août 2004 à 01:07:07

pour mettre une icone, il faut que l´image soit véritablement une icone, pas juste une image enregistré en . ico

pour fermer l´ordi, sous XP ou 2K ( ou plus générallement une plateforme NT) c´est pas très simple parcequ´il te faut des droit ( en gros que le programme ait un niveau administrateur)

DS-Shadow
DS-Shadow
Niveau 6
06 août 2004 à 08:48:22

normalement ça, devrai marcher:
shell " shutdown -s -t 0"

dnob700
dnob700
Niveau 10
06 août 2004 à 11:42:01

Sinon, t´as l´API aussi, c´est plus puissant mais plus compliqué.

Sous XP, c´est InitiateSystemShutdownEx qu´il faut appeler, je croit, mais avant, je suis sûr qu´elle avait un autre nom ( si tu as un PC plus ancien) genre CloseComputerEx ou qqch dans ce gout là.

Sous forums
  • Aide à l'achat Mac
  • Steam Deck
  • Création de sites web
  • Création de Jeux
  • Linux
  • Programmation
  • Internet
  • Macintosh
  • Hardware
La vidéo du moment