| 以文本方式查看主题 - Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp) -- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2) ---- [求助]文本框改为数值框后提示未定义变量 (http://www.foxtable.com/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 -- 可以了，谢谢老师。我把所有有关的控件都删了，然后就可以了，谢谢！ |