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


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

主题:[求助]

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


加好友 发短信
等级:童狐 帖子:257 积分:4381 威望:0 精华:0 注册:2011/7/5 9:38:00
[求助]  发帖心情 Post By:2012/2/10 11:07:00 [只看该作者]

 

表A有4个网页链接,不同行链接数量不同,我想在窗体中的4个按钮分别链接,当前行相应链接为空时按钮不显示,窗口的ValueChanged事件如下,并且执行通过,但当按表A的某列排序时出现如图所示窗口(表A在窗口控件中绑定),如何解决?

If Tables("表A").current("百度") = Nothing Then

    e.Form.Controls("Button1").Visible = False

Else

    e.Form.Controls("Button1").Visible = True

End If

If Tables("表A").current("雅虎") = Nothing Then

    e.Form.Controls("Button2").Visible = False

Else

    e.Form.Controls("Button2").Visible = True

End If

If Tables("表A").current("新浪") = Nothing Then

    e.Form.Controls("Button3").Visible = False

Else

    e.Form.Controls("Button3").Visible = True

End If

 

If Tables("表A").current("腾讯") = Nothing Then

    e.Form.Controls("Button4").Visible = False

Else

    e.Form.Controls("Button4").Visible = True

End If


图片点击可在新窗口打开查看此主题相关图片如下:fox.png
图片点击可在新窗口打开查看
[此贴子已经被作者于2012-2-10 11:12:25编辑过]

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


加好友 发短信
等级:管理员 帖子:47448 积分:251048 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2012/2/10 11:13:00 [只看该作者]

1、最前面加一行:

 

If  Tables("表A").current Is Nothing then

   Return

End if

 

2、类似这样的代码:

 

If Tables("表A").current("百度") = Nothing Then

 

应该改为:

 

If Tables("表A").current.IsNull("百度") Then

 

3、建议看看:

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

 


 回到顶部