Foxtable(狐表)用户栏目专家坐堂 → [求助]请老师帮助


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

主题:[求助]请老师帮助

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/8/1 17:04:00 [只看该作者]

你加入一句代码,看弹出什么

 

msgbox("bbb" & e.DataRow("SHYJ") & "bbb")


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


加好友 发短信
等级:四尾狐 帖子:929 积分:6500 威望:0 精华:0 注册:2014/6/25 10:48:00
  发帖心情 Post By:2014/8/1 17:09:00 [只看该作者]

对话框内容是“BBB修改BBB”或者”BBB同意BBB“
[此贴子已经被作者于2014-8-1 17:09:47编辑过]

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/8/1 17:10:00 [只看该作者]

哦,写错了

 

If e.DataCol.Name = "SHYJ" Then
    Dim K As String = e.DataRow("SHYJ")
    Select Case K
        Case "同意"
            e.DataRow("SH1") = e.DataRow("SQJE")
        Case "修改"
            e.DataRow("SH1") = " "
        Case Else
            e.DataRow("SH1") = "0"
    End Select

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


加好友 发短信
等级:四尾狐 帖子:929 积分:6500 威望:0 精华:0 注册:2014/6/25 10:48:00
  发帖心情 Post By:2014/8/1 17:14:00 [只看该作者]

其他两个同意和不同意正常,选择修改则出现下列错误:
.NET Framework 版本:2.0.50727.3053
Foxtable 版本:2014.5.12.1
错误所在事件:表,ZJJHB,DataColChanged
详细错误信息:
Exception has been thrown by the target of an invocation.
Conversion from string " " to type 'Double' is not valid.
Input string was not in a correct format.


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


加好友 发短信
等级:四尾狐 帖子:929 积分:6500 威望:0 精华:0 注册:2014/6/25 10:48:00
  发帖心情 Post By:2014/8/1 17:15:00 [只看该作者]

感谢老师今天为我解决了好几个问题,非常感谢

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/8/1 17:16:00 [只看该作者]

    Dim K As String = e.DataRow("SHYJ")
    Select Case K
        Case "同意"
            e.DataRow("SH1") = e.DataRow("SQJE")
        Case "修改"
            e.DataRow("SH1") = nothing
        Case Else
            e.DataRow("SH1") = "0"
    End Select

 回到顶部
总数 36 上一页 1 2 3 4