输入框内输入数字后自动加 .0操作
dim XTextBox1 as XTextBox1 =me.findcontrol("XTextBox1")
XTextBox1.text=XTextBox1.text.replace(".0","") + ".0"
输入框内输入数字后自动加 .0操作
dim XTextBox1 as XTextBox1 =me.findcontrol("XTextBox1")
XTextBox1.text=XTextBox1.text.replace(".0","") + ".0"