Är total nybörjare.. Har alltså tre textboxar där jag ska mata in olika nummeriska värden och i den tredje skall uträkningen ligga på lostFocus och när man lämnar den skal beräkningsresultatet visas i en label. Någon som har lite tips...Tacksam för svar! Jag skulle sätta default texten i alla textrutor till "0". Sedan i validateEventet Validera och beräkna:Beräkning på lostFocus till label
Sv: Beräkning på lostFocus till label
<code>
Private Sub Text1_Validate(Cancel as boolean)
If IsNumeric(Text1.Text) Then
Text3.Text = CStr(CDbl(Text1.Text)+CDbl(Text2.Text))
Else
Msgbox "Du måste ange ett numeriskt värde i Text1"
Cancel = True
End If
End Sub
Private Sub Text2_Validate(Cancel as boolean)
If IsNumeric(Text2.Text) Then
Text3.Text = CStr(CDbl(Text1.Text)+CDbl(Text2.Text))
Else
Msgbox "Du måste ange ett numeriskt värde i Text2"
Cancel = True
End If
End Sub
</code>