Foxtable(狐表)用户栏目专家坐堂 → [求助]窗口控件返回值是否为字符串的判断问题(已解决)


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

主题:[求助]窗口控件返回值是否为字符串的判断问题(已解决)

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


加好友 发短信
等级:五尾狐 帖子:1022 积分:7598 威望:0 精华:0 注册:2010/4/12 12:23:00
[求助]窗口控件返回值是否为字符串的判断问题(已解决)  发帖心情 Post By:2013/10/7 7:35:00 [只看该作者]

各位好,我有个问题。我设计了一个窗口,内有很多控件,控件绑定的字段部分为数字型,部分为字符型。我另设计了一个表(“实验室检查维护”),数字型字段比较最大值及最小值,字符型比较“参考值”,代码如下:前部分正确,后一部分提示“不能将字符串转化为double”,看看问题在哪儿? For Each r As Row In Tables("实验室检查维护").Rows if e.Sender.Name = r("检验项目") then If IsNumeric(e.Sender.Text) Then If Val(e.Sender.Text) > r("最大值") OrElse Val(e.Sender.Text) < r("最小值") Then e.Sender.BackColor = Color.Red Else e.Sender.BackColor = Color.White End If End If if isstring(e.sender.text) then if val(e.sender.text)<>r("参考值") then e.sender. backcolor=color.red else e.sender.backcolor=color.white end if end if Next
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:异常检验结果标记.table

[此贴子已经被作者于2013-10-7 8:55:44编辑过]

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


加好友 发短信 一级勋章
等级:超级版主 帖子:7258 积分:40773 威望:0 精华:16 注册:2008/8/31 23:23:00
  发帖心情 Post By:2013/10/7 8:34:00 [只看该作者]

For Each r As Row In Tables("实验室检查维护").Rows
    If e.Sender.Name = r("检验项目")  Then
        If IsNumeric(e.Sender.Text)  Then
            If Val(e.Sender.Text) > r("最大值") OrElse Val(e.Sender.Text) < r("最小值") Then
                e.Sender.BackColor = Color.Red
            Else
                e.Sender.BackColor = Color.White
            End If
        Else
            If e.sender.text<>r("参考值") Then
                e.sender. backcolor=color.red
            Else
                e.sender.backcolor=color.white
            End If
        End If
    End If
Next

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


加好友 发短信
等级:五尾狐 帖子:1022 积分:7598 威望:0 精华:0 注册:2010/4/12 12:23:00
  发帖心情 Post By:2013/10/7 8:38:00 [只看该作者]

谢谢!高手!

 回到顶部