- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 从文本框输入数值为何变0.00 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=96055)
-- 发布时间：2017/2/11 23:39:00
-- 从文本框输入数值为何变0.00
例子已简化，要求：从窗口的文本框中输入数字，修改正为二个数字。
现在显示出来始终是“0.00”
Dim dj As Decimal
MessageBox.Show(e.Form.Controls("TextBox1").text)
dj = format(e.Form.Controls("TextBox1").text, "0.00")
MessageBox.Show(dj)
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:数值输入.table |
-- 发布时间：2017/2/12 10:27:00
--
Dim dj As Decimal
MessageBox.Show(e.Form.Controls("TextBox1").text)
dj = format(val(e.Form.Controls("TextBox1").text), "0.00")
MessageBox.Show(dj)