Foxtable(狐表)用户栏目专家坐堂 → 问题在图片


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

主题:问题在图片

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


加好友 发短信
等级:童狐 帖子:238 积分:1986 威望:0 精华:0 注册:2015/2/16 13:29:00
问题在图片  发帖心情 Post By:2015/5/17 23:14:00 [只看该作者]

在菜单中进行程序实现,出现了附件中的提示,请问修改方法,谢谢。

Dim drx As Row=Tables("电梯信息表").Current
If drx.isnull("使用单位") Then
        messagebox.show("必须输入使用单位")
        e.Form.Controls("TextBox2").Select()
        Return
End If

 下载信息  [文件大小:   下载次数: ]
点击浏览该文件:错误提示.rar


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


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

 你一楼的代码,肯定不会报错的。

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


加好友 发短信
等级:童狐 帖子:238 积分:1986 威望:0 精华:0 注册:2015/2/16 13:29:00
菜单中不行  发帖心情 Post By:2015/5/18 16:32:00 [只看该作者]

我用在菜单中的按钮上就出现错误了,我把截图放在1楼上,麻烦帮忙再看看

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


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

报错也不可能是你图片的错。

 

Dim drx As Row=Tables("电梯信息表").Current
If drx.isnull("使用单位") Then
        messagebox.show("必须输入使用单位")
        Forms("窗口1").Controls("TextBox2").Select()
        Return
End If


 回到顶部