Foxtable(狐表)用户栏目专家坐堂 → [求助]文本框改为数值框后提示未定义变量


  共有1209人关注过本帖树形打印复制链接

主题:[求助]文本框改为数值框后提示未定义变量

帅哥哟,离线,有人找我吗?
jick0526
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:715 积分:6677 威望:0 精华:0 注册:2016/6/27 17:56:00
[求助]文本框改为数值框后提示未定义变量  发帖心情 Post By: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
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:715 积分:6677 威望:0 精华:0 注册:2016/6/27 17:56:00
  发帖心情 Post By:2017/3/6 17:39:00 [只看该作者]

还提示说找不到产品控件

 回到顶部
帅哥哟,离线,有人找我吗?
有点色
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:13837 积分:69650 威望:0 精华:0 注册:2016/11/1 14:42:00
  发帖心情 Post By:2017/3/6 17:49:00 [只看该作者]

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

 


 回到顶部
帅哥哟,离线,有人找我吗?
jick0526
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:715 积分:6677 威望:0 精华:0 注册:2016/6/27 17:56:00
  发帖心情 Post By: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

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

 回到顶部
帅哥哟,离线,有人找我吗?
有点色
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:13837 积分:69650 威望:0 精华:0 注册:2016/11/1 14:42:00
  发帖心情 Post By:2017/3/6 18:15:00 [只看该作者]

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

 

 1楼的代码没问题。


 回到顶部
帅哥哟,离线,有人找我吗?
jick0526
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:715 积分:6677 威望:0 精华:0 注册:2016/6/27 17:56:00
  发帖心情 Post By:2017/3/6 18:27:00 [只看该作者]

未设置对象变量或 With 块变量。
还是不行

 回到顶部
帅哥哟,离线,有人找我吗?
jick0526
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:715 积分:6677 威望:0 精华:0 注册:2016/6/27 17:56:00
  发帖心情 Post By:2017/3/6 18:39:00 [只看该作者]

可以了,谢谢老师。我把所有有关的控件都删了,然后就可以了,谢谢!


 回到顶部