主题：格式转换错误

我用窗口设计了个录入框，想通过在文本框或列表框中输入内容，点完按钮后，就把数据添加到表格中，但出现问题了：

代码如下：

 

            Dim dr As DataRow=DataTables("消费记录表").AddNew()
                  dr("购买日期")=Date.Today
                   dr("商品名称")=e.Form.Controls("TextBox2")

 

商品名称列的格式是文本型的

此主题相关图片如下：错误提示.jpg

Dim dr As DataRow=DataTables("消费记录表").AddNew()
                  dr("购买日期")=Date.Today
                   dr("商品名称")=e.Form.Controls("TextBox2")  这句代码错的太离谱了吧，哪有这个等于控件的。

呵呵，正确的代码：

 

 Dim dr As DataRow=DataTables("消费记录表").AddNew()
dr("购买日期")=Date.Today
dr("商品名称")=e.Form.Controls("TextBox2").Value

 

是等于这个控件的值，不是等于这个控件。

谢了，首次使用狐表