G BESOIN D'AIDE!!!!!!!!!!!!!!!!!!!!!!!!!!!! - Archives Visual Basic / Spécial Projet NURMITE, Visual Basic, VB6, VB.NET, VB 2005, VB

Visual Basic, VB6, VB.NET, VB 2005, VB CodeS-SourceS

CodeS-SourceS est hébergé par Frontier.fr

Ce site au démarrage

AccueilCodesTutorielsForumsEmploiLivresConnexion

begin process at 2008 12 05 01:25:09

[OPENXML4J] THE FUTURE OF OPENXML4J par neodante

[OPENXML4J] UTILISER OPENXML4J OU POI POUR SES PROJETS JAVA AVEC OPEN XML : L'AVENIR DU PROJET OPENXML4J par neodante

LA NOTION DE CLASSE ABSTRAITE EN PHP5 par orion

ZUNE : SLIDESHOW LORS DE LA LECTURE DEPUIS LE ZUNE SOFTWARE par ROMELARD Fabrice

PROTéGEZ VOS ENFANTS D'INTERNET par orion

COMMENT PROGRAMMER UN DATETIMEPICKER POUR OBTENIR UNE PLAGE DE RV SUR PLUSIEURS JOURS ? par nono78220

RE : VISUAL BASIC BLOCAGE ACCèS AU MENU OUTIL --> MACRO par pile_poil

VISUAL BASIC BLOCAGE ACCèS AU MENU OUTIL --> MACRO par FRITSCH2

RE : RECHERCHE DANS ACTIVEDIRECTORY par leSaleGauSS

RE : PERMUTATIONS DE TABLEAU par Orohena

+ de logiciels à télécharger

1 303 831 membres
14 nouveaux aujourd'hui
14 559 membres club

Trouver une ressource

Trouvez une ressource parmi 39 090 codes, 1 209 445 messages d'aide etc...

Recherche: dans [ Dernières recherches ]

Filtre:Tous les codes.NET uniquementExclure .NET

Vous ne trouvez pas de réponse à votre problème ? Alors posez la question dans le forum. Souvenez-vous qu'il n'y a jamais de question bête, mais rester dans l'ignorance parce que l'on n'ose pas poser une question, ça c'est une erreur !

Poser une question

Sujet : G BESOIN D'AIDE!!!!!!!!!!!!!!!!!!!!!!!!!!!! [ Archives Visual Basic / Spécial Projet NURMITE ] (armand44)

Informations & options pour cette discussion

Vous êtes ici : Thèmes / Archive Visual Basic & VB.NET / Archives Visual Basic / Spécial Projet NURMITE / G BESOIN D'AIDE!!!!!!!!!!!!!!!!!!!!!!!!!!!!
Ce sujet vous interesse ? Cliquez ici pour être averti quand il y a une nouvelle réponse

mercredi 13 juin 2001 à 05:41:01 | G BESOIN D'AIDE!!!!!!!!!!!!!!!!!!!!!!!!!!!!

armand44	G tape ce code la: Private Sub Timer1_Timer() If Picture2.Left - Picture3(Index).Left = 480 Then Picture2.Move Picture2.Left + 480 End If End Sub la picture2 se deplace a droite seulement lorsque qu'elle a a faire a la pictur3(0) et pour les autres picture3(autre) sa marche pas. Pourquoi?

mercredi 13 juin 2001 à 10:57:37 | Re : G BESOIN D'AIDE!!!!!!!!!!!!!!!!!!!!!!!!!!!!

Lestad

Juste en regardant ton code, j'ai une petite idée, mais bon... peut être que je me trompe!!!
Index n'est pas déclaré, donc il prend forcément la valeur 0.
je ne sais pas ce que tu veux réaliser comme code, mais soit tu fais une boucle pour définir chaque picture3, soit il ne faut pas que tu passes par un timer.

Dis moi ce que tu veux réellement faire... je pourrais peut-être t'aider!!!!

-------------------------------
Réponse au message :
-------------------------------

G tape ce code la:
Private Sub Timer1_Timer()
If Picture2.Left - Picture3(Index).Left = 480 Then
Picture2.Move Picture2.Left + 480
End If
End Sub

la picture2 se deplace a droite seulement lorsque qu'elle a a faire a la pictur3(0) et pour les autres picture3(autre) sa marche pas.
Pourquoi?

mercredi 13 juin 2001 à 11:07:18 | Re : G BESOIN D'AIDE!!!!!!!!!!!!!!!!!!!!!!!!!!!!

Mémère

index correspond à rien... pas d'instanciation... donc forcément valeur 0. En C ton programme aurait planté. pouf!

El Manipulator [ Thaaaat's baaaaad for u! ]

-------------------------------
Réponse au message :
-------------------------------

G tape ce code la:
Private Sub Timer1_Timer()
If Picture2.Left - Picture3(Index).Left = 480 Then
Picture2.Move Picture2.Left + 480
End If
End Sub

la picture2 se deplace a droite seulement lorsque qu'elle a a faire a la pictur3(0) et pour les autres picture3(autre) sa marche pas.
Pourquoi?

mercredi 13 juin 2001 à 12:40:30 | Re : G BESOIN D'AIDE!!!!!!!!!!!!!!!!!!!!!!!!!!!!

jia2812

Dis-moi, t'as fé 1 groupe d'images pour le Picture3? Car si cé ça, bin, pô la pein d'mettre Index, fé Picture3(i), cela suffit largement... Sans oublier d'l'déclarer si t'as mis Option Explicit...

Bin, cé tout c'ke j'crois. Je pense pareil ke Mémère...

Alelz bone prog'!!

Googogogogogogooooooooooo

-------------------------------
Réponse au message :
-------------------------------

index correspond à rien... pas d'instanciation... donc forcément valeur 0. En C ton programme aurait planté. pouf!

El Manipulator [ Thaaaat's baaaaad for u! ]

-------------------------------
Réponse au message :
-------------------------------

G tape ce code la:
Private Sub Timer1_Timer()
If Picture2.Left - Picture3(Index).Left = 480 Then
Picture2.Move Picture2.Left + 480
End If
End Sub

la picture2 se deplace a droite seulement lorsque qu'elle a a faire a la pictur3(0) et pour les autres picture3(autre) sa marche pas.
Pourquoi?

mercredi 13 juin 2001 à 16:17:42 | Re : G BESOIN D'AIDE!!!!!!!!!!!!!!!!!!!!!!!!!!!!

armand44

Dite moi ce que je dois taper alors?

-------------------------------
Réponse au message :
-------------------------------

Dis-moi, t'as fé 1 groupe d'images pour le Picture3? Car si cé ça, bin, pô la pein d'mettre Index, fé Picture3(i), cela suffit largement... Sans oublier d'l'déclarer si t'as mis Option Explicit...

Bin, cé tout c'ke j'crois. Je pense pareil ke Mémère...

mercredi 13 juin 2001 à 16:20:06 | Re : G BESOIN D'AIDE!!!!!!!!!!!!!!!!!!!!!!!!!!!!

armand44

En fait ce que je vaux faire reelement c que des que la picture2 s'approche de n'importe quel picture3 elle part a droite dit moi ce que je dois taper STP

-------------------------------
Réponse au message :
-------------------------------

Juste en regardant ton code, j'ai une petite idée, mais bon... peut être que je me trompe!!!
Index n'est pas déclaré, donc il prend forcément la valeur 0.
je ne sais pas ce que tu veux réaliser comme code, mais soit tu fais une boucle pour définir chaque picture3, soit il ne faut pas que tu passes par un timer.

Dis moi ce que tu veux réellement faire... je pourrais peut-être t'aider!!!!

-------------------------------
Réponse au message :
-------------------------------

G tape ce code la:
Private Sub Timer1_Timer()
If Picture2.Left - Picture3(Index).Left = 480 Then
Picture2.Move Picture2.Left + 480
End If
End Sub

la picture2 se deplace a droite seulement lorsque qu'elle a a faire a la pictur3(0) et pour les autres picture3(autre) sa marche pas.
Pourquoi?

mercredi 13 juin 2001 à 16:45:31 | Re : G BESOIN D'AIDE!!!!!!!!!!!!!!!!!!!!!!!!!!!!

Lestad

ok dans ta fonction tu fais:
Private Sub Timer1_Timer()

dim nbpicture3 as integer

for i = 0 to picture3.count - 1
If Picture2.Left - Picture3(i).Left = 480 Then
Picture2.Move Picture2.Left + 480
End If
next i

End Sub

-------------------------------
Réponse au message :
-------------------------------

En fait ce que je vaux faire reelement c que des que la picture2 s'approche de n'importe quel picture3 elle part a droite dit moi ce que je dois taper STP

-------------------------------
Réponse au message :
-------------------------------

Juste en regardant ton code, j'ai une petite idée, mais bon... peut être que je me trompe!!!
Index n'est pas déclaré, donc il prend forcément la valeur 0.
je ne sais pas ce que tu veux réaliser comme code, mais soit tu fais une boucle pour définir chaque picture3, soit il ne faut pas que tu passes par un timer.

Dis moi ce que tu veux réellement faire... je pourrais peut-être t'aider!!!!

-------------------------------
Réponse au message :
-------------------------------

G tape ce code la:
Private Sub Timer1_Timer()
If Picture2.Left - Picture3(Index).Left = 480 Then
Picture2.Move Picture2.Left + 480
End If
End Sub

la picture2 se deplace a droite seulement lorsque qu'elle a a faire a la pictur3(0) et pour les autres picture3(autre) sa marche pas.
Pourquoi?

mercredi 13 juin 2001 à 17:12:35 | Re : G BESOIN D'AIDE!!!!!!!!!!!!!!!!!!!!!!!!!!!!

armand44

Sa je l'avais deja fait mais si y a une centaine de picture3 sa va etre long a faire y a po d'autre moyen?

-------------------------------
Réponse au message :
-------------------------------

ok dans ta fonction tu fais:
Private Sub Timer1_Timer()

dim nbpicture3 as integer

for i = 0 to picture3.count - 1
If Picture2.Left - Picture3(i).Left = 480 Then
Picture2.Move Picture2.Left + 480
End If
next i

End Sub

-------------------------------
Réponse au message :
-------------------------------

En fait ce que je vaux faire reelement c que des que la picture2 s'approche de n'importe quel picture3 elle part a droite dit moi ce que je dois taper STP

-------------------------------
Réponse au message :
-------------------------------

Juste en regardant ton code, j'ai une petite idée, mais bon... peut être que je me trompe!!!
Index n'est pas déclaré, donc il prend forcément la valeur 0.
je ne sais pas ce que tu veux réaliser comme code, mais soit tu fais une boucle pour définir chaque picture3, soit il ne faut pas que tu passes par un timer.

Dis moi ce que tu veux réellement faire... je pourrais peut-être t'aider!!!!

-------------------------------
Réponse au message :
-------------------------------

G tape ce code la:
Private Sub Timer1_Timer()
If Picture2.Left - Picture3(Index).Left = 480 Then
Picture2.Move Picture2.Left + 480
End If
End Sub

la picture2 se deplace a droite seulement lorsque qu'elle a a faire a la pictur3(0) et pour les autres picture3(autre) sa marche pas.
Pourquoi?

mercredi 13 juin 2001 à 17:17:30 | Re : G BESOIN D'AIDE!!!!!!!!!!!!!!!!!!!!!!!!!!!!

Lestad

là j'vois pas!!! déslé et bon courage

-------------------------------
Réponse au message :
-------------------------------

Sa je l'avais deja fait mais si y a une centaine de picture3 sa va etre long a faire y a po d'autre moyen?

-------------------------------
Réponse au message :
-------------------------------

ok dans ta fonction tu fais:
Private Sub Timer1_Timer()

dim nbpicture3 as integer

for i = 0 to picture3.count - 1
If Picture2.Left - Picture3(i).Left = 480 Then
Picture2.Move Picture2.Left + 480
End If
next i

End Sub

-------------------------------
Réponse au message :
-------------------------------

En fait ce que je vaux faire reelement c que des que la picture2 s'approche de n'importe quel picture3 elle part a droite dit moi ce que je dois taper STP

-------------------------------
Réponse au message :
-------------------------------

Juste en regardant ton code, j'ai une petite idée, mais bon... peut être que je me trompe!!!
Index n'est pas déclaré, donc il prend forcément la valeur 0.
je ne sais pas ce que tu veux réaliser comme code, mais soit tu fais une boucle pour définir chaque picture3, soit il ne faut pas que tu passes par un timer.

Dis moi ce que tu veux réellement faire... je pourrais peut-être t'aider!!!!

-------------------------------
Réponse au message :
-------------------------------

G tape ce code la:
Private Sub Timer1_Timer()
If Picture2.Left - Picture3(Index).Left = 480 Then
Picture2.Move Picture2.Left + 480
End If
End Sub

la picture2 se deplace a droite seulement lorsque qu'elle a a faire a la pictur3(0) et pour les autres picture3(autre) sa marche pas.
Pourquoi?

jeudi 14 juin 2001 à 19:33:14 | Re : G BESOIN D'AIDE!!!!!!!!!!!!!!!!!!!!!!!!!!!!

Johjo

Je crois que j'ai la solution.
Tu n'as qu'à crée des zones. Je penses que tes picture3 sont placés un peu partout. Donc, tu divises ton écran en zone, plus il y a de zone, plus ce doit être rapide.
Tu crée une variable zone:

***********************
Type Zone
Depart As Integer
Fin As Integer
End Type
Dim ZonePicture(10) as integer '10 correspond au nombre de zone.
***********************
A partir de là, il faut que l'index des picture3 se suive quand tu les places dans chaque zone.
Par exemple, dans la zone(1), tu mets les pictures(1) à picture(15)

Ensuite, tu mets dans ZonePicture(i).debut la valeur du plus petit index de la picture3 qui est dans cette zone et celle du plus grand index de la picture3 dans zonepicture(i).fin

Ensuite, en fonction de la zone où se situe ta picture2, tu fais ton test

***********************
Private Sub Timer1_Timer()
dim nbpicture3 as integer
for i = zonepicture(N).depart to zonepicture(N).fin
If Picture2.Left - Picture3(i).Left = 480 Then
Picture2.Move Picture2.Left + 480
End If
next i
End Sub
***********************
Ici, N correspond à la zone où se situe picture2

-------------------------------
Réponse au message :
-------------------------------

là j'vois pas!!! déslé et bon courage

-------------------------------
Réponse au message :
-------------------------------

Sa je l'avais deja fait mais si y a une centaine de picture3 sa va etre long a faire y a po d'autre moyen?

-------------------------------
Réponse au message :
-------------------------------

ok dans ta fonction tu fais:
Private Sub Timer1_Timer()

dim nbpicture3 as integer

for i = 0 to picture3.count - 1
If Picture2.Left - Picture3(i).Left = 480 Then
Picture2.Move Picture2.Left + 480
End If
next i

End Sub

-------------------------------
Réponse au message :
-------------------------------

En fait ce que je vaux faire reelement c que des que la picture2 s'approche de n'importe quel picture3 elle part a droite dit moi ce que je dois taper STP

-------------------------------
Réponse au message :
-------------------------------

Juste en regardant ton code, j'ai une petite idée, mais bon... peut être que je me trompe!!!
Index n'est pas déclaré, donc il prend forcément la valeur 0.
je ne sais pas ce que tu veux réaliser comme code, mais soit tu fais une boucle pour définir chaque picture3, soit il ne faut pas que tu passes par un timer.

Dis moi ce que tu veux réellement faire... je pourrais peut-être t'aider!!!!

-------------------------------
Réponse au message :
-------------------------------

G tape ce code la:
Private Sub Timer1_Timer()
If Picture2.Left - Picture3(Index).Left = 480 Then
Picture2.Move Picture2.Left + 480
End If
End Sub

la picture2 se deplace a droite seulement lorsque qu'elle a a faire a la pictur3(0) et pour les autres picture3(autre) sa marche pas.
Pourquoi?

Cette discussion est classé dans : aide, end, left, picture3, picture2

Répondre à ce message

Sujets en rapport avec ce message

Besoin d'aide et vite si possible !!! [ par CaptainChoc ] Voilà le code source, jessaye d'enregistrer le picture3 (voir source) car quand je fait savepicture, il bug. Merci d'avanceil necessite 3 picture box Une petite aide pour un petit debutant svp [ par dragouns ] font=Comic Sans MS]salut, je debute hi hi :)[ [/font=Comic Sans MS]Bonjour a tous j'ai un probleme pour executer le programme suivantPrivate Sub cmdOK encore Urgent! Important! Formulaire... [ par MaJik ] J'ai un programme qui fait bouger une image avec les flèches (bouge de 50 par touches)Si elle touche une Label1 dans le millieu de la feuille, je veux G BESOIN D'AIDE!!!!!!!!!!!!!!!!!!!!!!!!!!!! [ par Iscar ] Salut!!!!!!!!!!Dans un module que je cree j'essaie de faire appel a un picturebox en fonction de son index.donc j'ai declare dans la module picture3(i Aide svp!!!!!!!!!!!!!!!!!!!!!!!!! [ par jp ] Salut !!!je suis entrain de faire un jeu et j'ai un tit probleme!!!Je veux unloder ma form , mais a se reload tout le temps a cause que cé dans un End besoin d'aide!!!!! [ par Crazyblinkgirl ] Salut!Pourrait on me dire comment faire pour permettre la saisie de plusieurs caracteres text avec une telle procédure? En effet, je ne peux en taper Utilisation de timers [ par yoyo_29 ] Bonjour,après avoir appris (essayé) à utiliser les timers grace en partie à ce site, j'ai essayé de refaire un porgramme de la meme sorte qu'un que j' pb n°2 pour fair un pong [ par dOsSpr0uTosS ] salut à tous,j'ai encor un problèm pour fair un pong deux joueur^^j'ai mon interface qui est fait de deux labels(pour les points)de deux raquettes et Multi traitement [ par madflo ] Ce code me permet entre autre de gérer le déplacement de petits caré vers un endroit (caré control utilisateur) mais lorsque l'utilisateur créé trop d pb keydown qui ne se déclenche pas [ par acorna ] hello, j'ai un petit souci concernant le keydown, qui ne se déclenche pas lors de l'appui sur les touches (ds mon cas les flèches directionnelles).