A voir également:
- Appel de module sous VBA
- Appel anonyme - Guide
- Nommez une application d'appel vidéo ou de visioconférence - Guide
- Prix d'un appel local - Forum Mobile
- Renvoi d'appel ooredoo - Forum Mobile
- Comment reecouter un appel sur iphone - Forum Huawei
1 réponse
Utilisateur anonyme
31 oct. 2004 à 13:13
31 oct. 2004 à 13:13
Bonjour,
Ex.:
'Procedure d'un userform
Private Sub CommandButton1_Click()
Dim Nombre1, Nombre2 As Integer
Nombre1 = Int(TextBox1.Text)
Nombre2 = Calcul(Nombre1)
TextBox3.Text = Str(Nombre2)
End Sub
'
'Fonction d'un module
Function Calcul(ByVal Reponse As Integer)
Calcul = Reponse * Reponse
End Function
Et voilà, c'est tout simple :-)
Lupin
~L'essentiel est invisible pour les yeux~
~On ne voit bien qu'avec le coeur~
Ex.:
'Procedure d'un userform
Private Sub CommandButton1_Click()
Dim Nombre1, Nombre2 As Integer
Nombre1 = Int(TextBox1.Text)
Nombre2 = Calcul(Nombre1)
TextBox3.Text = Str(Nombre2)
End Sub
'
'Fonction d'un module
Function Calcul(ByVal Reponse As Integer)
Calcul = Reponse * Reponse
End Function
Et voilà, c'est tout simple :-)
Lupin
~L'essentiel est invisible pour les yeux~
~On ne voit bien qu'avec le coeur~