TextBox文本框数据怎样加减运算

liaozhiyong78 · 发表于 2023-4-19 11:54

有一个用户窗体，其中TextBox7=TextBox4-TextBox6

当TextBox4或TextBox6的数据变化时，TextBox7的数据成即时改变为TextBox4-TextBox6的值。
但结果时而对时而错。
无标题.png

代码如下：

Private Sub textbox4_Change()
Call settextbox7
End Sub

Private Sub textbox6_Change()
Call settextbox7
End Sub

Private Sub settextbox7()
If Me.TextBox4.Text <> "" And Me.TextBox6.Text <> "" Then
Me.TextBox7.Text = Val(Me.TextBox4.Text) - Val(Me.TextBox6.Text)
End If
End Sub

注塑常用规格系数对照表.rar (41.28 KB, 下载次数: 10)

taller · 发表于 2023-4-19 12:06

liaozhiyong78 · 发表于 2023-4-19 15:03

taller 发表于 2023-4-19 12:06

谢谢，OK了

liaozhiyong78 · 发表于 2023-4-19 15:05

taller 发表于 2023-4-19 12:06

Debug.Print Me.TextBox7.Text, Val(Me.TextBox4.Text), Val(Me.TextBox6.Text)
这句是什么意思？（初学者

）

你地铁图 · 发表于 2023-4-19 15:54

liaozhiyong78 发表于 2023-4-19 15:05
Debug.Print Me.TextBox7.Text, Val(Me.TextBox4.Text), Val(Me.TextBox6.Text)
这句是什么意思？（初学 ...

没啥用·····

		自动登录	找回密码
密码			免费注册

TextBox文本框数据怎样加减运算

浏览过的版块