DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
Altın Üyelik Hakkında Bilgi
evet mümkün ama ne yapmak istediğinizi biraz daha açın
Private Sub TextBox8_MouseMove(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
TextBox7.Text = Val(TextBox8.Text) * Val(TextBox6.Text) & " m³/sn"
End Sub
Private Sub TextBox9_MouseMove(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
TextBox7.Text = Val(TextBox8.Text) * Val(TextBox6.Text) & " m³/sn"
End Sub