以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]文本框改为数值框后提示未定义变量  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=97129)

--  作者:jick0526
--  发布时间:2017/3/6 17:36:00
--  [求助]文本框改为数值框后提示未定义变量
If e.DataCol.Name = "产品" AndAlso Forms("表A").Opened
    Dim txtbox As WinForm.numericComboBox = Forms("表A").Controls("产品")
    txtbox.Value = e.DataTable.Compute("Sum(产品)")
End If

老师,上面这段代码本来是文本框的,我把它改为数值框后提示未定义变量,老师能帮我看下怎么改吗?谢谢!

--  作者:jick0526
--  发布时间:2017/3/6 17:39:00
--  
还提示说找不到产品控件
--  作者:有点色
--  发布时间:2017/3/6 17:49:00
--  

 你看看你窗口里面的控件的属性【名称】是什么,要用那个名称才行。

 


--  作者:jick0526
--  发布时间:2017/3/6 18:05:00
--  
还是不行,控件的属性【名称】是一样的
If e.DataCol.Name = "C列" AndAlso Forms("xx窗口").Opened
    Dim txtbox As WinForm.TextBox = Forms("xx窗口").Controls("TextBox1")
    txtbox.Value = e.DataTable.Compute("Sum(C列)")
End If

老师,这个是文本框的,如果我要改成数值框该怎么改,谢谢!

--  作者:有点色
--  发布时间:2017/3/6 18:15:00
--  

 重新放一个控件,删除原来的。

 

 1楼的代码没问题。


--  作者:jick0526
--  发布时间:2017/3/6 18:27:00
--  
未设置对象变量或 With 块变量。
还是不行

--  作者:jick0526
--  发布时间:2017/3/6 18:39:00
--  
可以了,谢谢老师。我把所有有关的控件都删了,然后就可以了,谢谢!