控件NumericComboBox 用text赋值还是有时会出现空值！ - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

msgbox(Forms("产品输入").Controls("number").value & "_" & Forms("产品输入").Controls("Price").value)

Tables("新建销售单_Sale_List").Current("ProductName")=Forms("产品输入").Controls("name").value

Tables("新建销售单_Sale_List").Current("ProductID")=Forms("产品输入").Controls("ProductID").value

Tables("新建销售单_Sale_List").Current("ProductNumber") = Forms("产品输入").Controls("number").text

Tables("新建销售单_Sale_List").Current("ProductPrice") = Forms("产品输入").Controls("Price").text

'小计的价格自动运算

Tables("新建销售单_Sale_List").Current("MainMemoEx")=Forms("产品输入").Controls("MainMemoEx").value

Tables("新建销售单_Sale_List").AddNew()

'添加数据后,清空

Forms("产品输入").Controls("name").value=Nothing

Forms("产品输入").Controls("ProductID").value=Nothing

Forms("产品输入").Controls("number").value=Nothing

Forms("产品输入").Controls("Price").value=Nothing

Forms("产品输入").Controls("ProductTotal").value=Nothing

e.Form.Controls("DropBox1").text=Nothing

此主题相关图片如下：未标题-1.jpg

主题：控件NumericComboBox 用text赋值 还是有时会出现空值！