正常的,这样改一下:
Dim t1 As Double = Forms("找零计算").Controls("NumericComboBox1").vlueDim t2 As Double = Forms("找零计算").Controls("NumericComboBox2").ValueForms("找零计算").Controls("NumericComboBox3").value = math.round(t1- t2,6)