Question

VB 文本框中数值相加

3个文本框，文本框中只能是数字，Txet1，Text2，Text3分别命名为txtfirst,txtsecond,txtthird
Text2，Text3是按照公式(txtfirst.Text-txtfirst.Text*0.05-2500)/10和
(txtfirst.Text - txtfirst.Text * 0.03 - 2500) / 10计算的
程序这样写对不对？对的话为什么不需要用val函数？不对的话为什么我算的数值都对？

Private Sub txtfirst_KeyPress(KeyAscii As Integer)
If KeyAscii = 8 Then Exit Sub
If KeyAscii < 48 Or KeyAscii > 57 Then KeyAscii = 0
End Sub

Private Sub txtsecond_Click()
txtsecond.Text = (txtfirst.Text - txtfirst.Text * 0.05 - 2500) / 10
End Sub

Private Sub txtthird_Click()
txtthird.Text = (txtfirst.Text - txtfirst.Text * 0.03 - 2500) / 10
End Sub

Answer 1

程序是对的。
为什么不加VAL都能计算正确，是因为在计算的时候，程序发现有数字型，所以先将字符串自动转换为数字。

在一般的编程中，最好自己主动转换类型，因为被动转换容易出现BUG。

追问

就是说我最开始设定Text1只能输入数字才会算对是吧，如果Text1不这么写是不是就该错了

Answer 2

text2数值为10，2+5+8=15，为什么数值10位于第三个框
text2数值为16，2+5+8+7=22，为什么数值16位于第四个框
是以什么规律来得出的？
请采纳。

追问

你这回答是什么？