Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]为何我这段代码执行不出结果


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

主题：[求助]为何我这段代码执行不出结果
帅哥哟，离线，有人找我吗？
小美菜
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：三尾狐 帖子：654 积分：4971 威望：0 精华：0 注册：2016/1/16 22:42:00 		[求助]为何我这段代码执行不出结果  发帖心情 Post By：2021/7/20 21:27:00 [只看该作者]

为何我这段代码执行不出结果，msgbox时xRow(xCol)无值，其它都正常，搞了2天，新增加的行就是没有数据填入
Dim sRow As Row = Tables("数据显示窗口_TblData").Current
If sRow Is Nothing Then Return
Dim xRow As Row = Tables(e.Form.Controls("LblMainTbl").ToolTip).AddNew
If xRow Is Nothing Then Return
Dim txCol As String = ChkColName.Text.Trim ‘关键列
For Each xsCol As Col In Tables("数据显示窗口_TblData").Cols 'Tables( Vars("gShowTableName")).Cols '
    Dim xCol As String =  xsCol.Name.Trim 
    If xCol <>  txCol Then ’不是关键列时填入数据
        xRow(xCol) = sRow(xCol)
        msgbox(xCol & "<" & xRow(xCol)  & "<>" & sRow(xCol) & ">" &  txCol) 
    End If
Next
 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：113647 积分：578772 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2021/7/20 21:46:00 [只看该作者]

是自定义的主键？还是默认的自增主键

 回到顶部
帅哥哟，离线，有人找我吗？
小美菜
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：三尾狐 帖子：654 积分：4971 威望：0 精华：0 注册：2016/1/16 22:42:00 		  发帖心情 Post By：2021/7/20 22:30:00 [只看该作者]

自定义的关键列

 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：113647 积分：578772 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2021/7/20 22:49:00 [只看该作者]

自定义主键的，使用datatable.addnew，不要使用table.addnew。另外必须给主键列赋值

 回到顶部
帅哥哟，离线，有人找我吗？
小美菜
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：三尾狐 帖子：654 积分：4971 威望：0 精华：0 注册：2016/1/16 22:42:00 		  发帖心情 Post By：2021/7/21 11:43:00 [只看该作者]

谢谢蓝老师，果然是你讲的。

 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.04102 秒, 4 次数据查询