boujours a tous !
voici mon problème je voudrait que lorsque j'appuis sur un boutton il cacul automatiquement certaine valeur qui sont dans zone de text je m'explique j'ai 4 zone de text:
text1
text2
text3
text4
lorsque j'appuis sur le boutton dans la zone 2 il affiche le resultat de cette operation:
valeur text2=valeur text2 +valeur text1
jusque la ca marche mais lorsque je lui demande de faire la meme chose mais pour text3 et 4
ca deconne il m'affiche le bon resultat dans la zone 4 mais dans la zone 2 il affiche les nombre a la suite comme si c'était du text.
voici mon code ou est l'erreur ?
 
(general)
 
Dim t, e, f, g As Integer
 
________________________________________________________________________
 
Private Sub Command1_Click()
t = Text1.Text
e = Text2.Text
f = Text3.Text
g = Text4.Text
If Text1.Text = "" Then Text1.Text = "0"
If Text3.Text = "" Then Text3.Text = "0"
e = e + t
g = g + f
Text2.Text = e
Text4.Text = g
End Sub
 
________________________________________________________________________
 
Private Sub Form_Load()
If Text1.Text = "" Then Text1.Text = "0"
If Text3.Text = "" Then Text3.Text = "0"
 
End Sub

Private Sub Command1_Click()
If Text1.Text = "" Then Text1.Text = 0
If Text3.Text = "" Then Text3.Text = 0
 
Text2.Text = Int(Text2.Text) + Int(Text1.Text)
Text4.Text = Int(Text4.Text) + Int(Text3.Text)
 
End Sub
 
Private Sub Form_Load()
Text1.Text = "0"
Text2.Text = "0"
Text3.Text = "0"
Text4.Text = "0"
 
'mais tu peux definir ca ds les propriétés du controle
 
End Sub

jcrois que faut que tu remplaces tes int() par des cint()