0/5 (2 avis)
Vue 4 384 fois - Téléchargée 248 fois
'Pour pouvoir changer une propriétés il faut 'en premier doner le nom de l'objet suivie d'un point (.) 'suivie de la propriété a changer suivie du signe egal (=) 'puis la valeur de la propriété. Private Sub Check1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single) 'Changement de texte au passage de la souris Label1.Caption = "Case à cocher" End Sub Private Sub Command1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single) Label1.Caption = "Bouton de command" End Sub Private Sub Command2_Click() End End Sub Private Sub Command3_Click() Label1.Caption = " INFOS : Promener votre souris sur les différents objets de la fenêtre." Label1.ForeColor = &H0& Label1.Alignment = 0 End Sub Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single) Label1.Caption = " INFOS : Promener votre souris sur les différents objets de la fenêtre." End Sub Private Sub Label2_Click() 'Changement de couleur et de texte Label1.ForeColor = &HFF8080 Label1.Caption = "Couleur Bleu" End Sub Private Sub Label3_Click() Label1.ForeColor = &HFF& Label1.Caption = "Couleur Rouge" End Sub Private Sub Label4_Click() Label1.ForeColor = &HFFFF& Label1.Caption = "Couleur Jaune" End Sub Private Sub Label5_Click() Label1.ForeColor = &HFF00& Label1.Caption = "Couleur Vert" End Sub Private Sub Label6_Click() 'Changement de position du texte Label1.Alignment = 0 End Sub Private Sub Label7_Click() Label1.Alignment = 2 End Sub Private Sub Label8_Click() Label1.Alignment = 1 End Sub Private Sub Label9_Click() 'Changement de texte lorsque l'on click sur un objet Label1.Caption = "Cliquer sur une option pour voir l'effet" End Sub Private Sub Option1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single) Label1.Caption = "Option 1" End Sub Private Sub Text1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single) Label1.Caption = "Insrire ici un texte" End Sub
6 sept. 2001 à 23:01
6 sept. 2001 à 20:35
Vous n'êtes pas encore membre ?
inscrivez-vous, c'est gratuit et ça prend moins d'une minute !
Les membres obtiennent plus de réponses que les utilisateurs anonymes.
Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.
Le fait d'être membre vous permet d'avoir des options supplémentaires.