Foxtable(狐表)用户栏目专家坐堂 → 未将对象应用设置到对象的实例……求解!


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

主题:未将对象应用设置到对象的实例……求解!

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


加好友 发短信
等级:狐神 帖子:5015 积分:25363 威望:0 精华:0 注册:2015/8/18 9:21:00
  发帖心情 Post By:2016/3/27 10:31:00 [只看该作者]

回19楼

idx = CInt(max.Substring(max.length - 3,3)) + 1 '获得最大编号的后三位顺序号,并加1

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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/3/27 10:58:00 [只看该作者]

 回复19楼,应该是你的编号列是数值列,要改成字符列,加入msgbox调试

 

http://www.foxtable.com/help/topics/1485.htm

 


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


加好友 发短信
等级:一尾狐 帖子:415 积分:3628 威望:0 精华:0 注册:2016/1/1 20:20:00
  发帖心情 Post By:2016/3/27 12:59:00 [只看该作者]

经调试,确实是代码: e.DataRow("商品编号") = lb & Format(idx,"000")  出了问题,可是我看了商品编号列,确实是字符型啊。

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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/3/27 13:15:00 [只看该作者]

那你datacolchanged事件,肯定还有别的代码影响了。

 

具体问题上传实例说明。


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


加好友 发短信
等级:一尾狐 帖子:415 积分:3628 威望:0 精华:0 注册:2016/1/1 20:20:00
  发帖心情 Post By:2016/3/27 13:31:00 [只看该作者]

谢谢指导,确实是之前有段代码出了问题。
可是,既然是之前的代码有问题,为什么调试的时候,显示有问题的代码是后面那段呢?

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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/3/27 14:20:00 [只看该作者]

你执行这段代码的时候

 

 e.DataRow("商品编号") = lb & Format(idx,"000")

 

会触发 【商品编号】列的DataColChanged事件的。

 

如果不想触发,要这样写

 

SystemReady = False

 e.DataRow("商品编号") = lb & Format(idx,"000")

SystemReady = True


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


加好友 发短信
等级:一尾狐 帖子:415 积分:3628 威望:0 精华:0 注册:2016/1/1 20:20:00
  发帖心情 Post By:2016/4/13 12:58:00 [只看该作者]

求助!

以下为问题代码:

If e.DataCol.name = "特殊标记" Or e.DataCol.name = "场次安排" Then
    If e.DataRow("特殊标记") <> "" And e.DataRow("场次安排") = "" Then
        MessageBox.Show(1)
        e.DataRow("小会符合") = "符合"
    ElseIf e.DataRow("特殊标记") <> "" And e.DataRow("场次安排") <> "" Then
        MessageBox.Show(2)
        e.DataRow("小会符合") = "不符合"
    ElseIf e.DataRow("特殊标记") = "" And e.DataRow("场次安排") = "" Then
        MessageBox.Show(3)
        e.DataRow("小会符合") = "不符合"
    ElseIf e.DataRow("特殊标记") = "" And e.DataRow("场次安排") <> "" Then
        MessageBox.Show(4)
        e.DataRow("小会符合") = "不符合"
    End If
End If

 

当在“特殊标记”列填入内容时,“小会符合”列内容变更为“符合”

然后在“场次安排”列填入内容,按照道理,“小会符合”列应该变更为“不符合” ,可是实际结果依旧为“符合”

我以为是判断式出错,可是当重置“特殊标记”列,“小会符合”列结果又出乎意料的变更为“不符合”

 

 

究竟为什么会这个样子?


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


加好友 发短信
等级:狐神 帖子:5015 积分:25363 威望:0 精华:0 注册:2015/8/18 9:21:00
  发帖心情 Post By:2016/4/13 14:14:00 [只看该作者]

If e.DataCol.name = "特殊标记" OrElse e.DataCol.name = "场次安排" Then
    If e.DataRow("特殊标记") > "" Andalso e.DataRow.isnull("场次安排") Then
        MessageBox.Show(1)
        e.DataRow("小会符合") = "符合"
    Else
        MessageBox.Show(2)
        e.DataRow("小会符合") = "不符合"
    End If
End If

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


加好友 发短信
等级:一尾狐 帖子:415 积分:3628 威望:0 精华:0 注册:2016/1/1 20:20:00
  发帖心情 Post By:2016/4/16 12:11:00 [只看该作者]

谢谢,已解决!

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


加好友 发短信
等级:一尾狐 帖子:415 积分:3628 威望:0 精华:0 注册:2016/1/1 20:20:00
  发帖心情 Post By:2016/4/16 12:14:00 [只看该作者]

************** 异常文本 **************
System.InvalidOperationException: 在创建窗口句柄之前,不能在控件上调用 Invoke 或 BeginInvoke。
   在 System.Windows.Forms.Control.MarshaledInvoke(Control caller, Delegate method, Object[] args, Boolean synchronous)
   在 System.Windows.Forms.Control.Invoke(Delegate method, Object[] args)
   在 Foxtable.o___O_0O.O_oO__o_(Exception A_0, String A_1)
   在 Foxtable.O_Oo___o.O    00 (Assembly A_0, String A_1, Object[] A_2, Boolean A_3, String A_4, Boolean A_5)
   在 Foxtable.WinForm.Form.Oo___0o0(Object A_0, EventArgs A_1)
   在 System.Windows.Forms.Control.OnClick(EventArgs e)
   在 System.Windows.Forms.Button.OnClick(EventArgs e)
   在 System.Windows.Forms.Button.PerformClick()
   在 System.Windows.Forms.Form.ProcessDialogKey(Keys keyData)
   在 System.Windows.Forms.Control.ProcessDialogKey(Keys keyData)
   在 System.Windows.Forms.ContainerControl.ProcessDialogKey(Keys keyData)
   在 System.Windows.Forms.Control.ProcessDialogKey(Keys keyData)
   在 System.Windows.Forms.Control.PreProcessMessage(Message& msg)
   在 System.Windows.Forms.Control.PreProcessControlMessageInternal(Control target, Message& msg)
   在 System.Windows.Forms.Application.ThreadContext.PreTranslateMessage(MSG& msg)

关闭程序后,会出现以下错误提示,求解该怎么解决?

 回到顶部
总数 75 上一页 1 2 3 4 5 6 7 8 下一页