Foxtable(狐表)用户栏目专家坐堂 → 用户


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

主题:用户

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


加好友 发短信
等级:童狐 帖子:266 积分:2166 威望:0 精华:0 注册:2014/12/16 12:25:00
  发帖心情 Post By:2015/6/4 13:20:00 [只看该作者]

第二个问题,窗口页面中要填写的实际中 textbox和combobox控件,在保存时其中未填写内容要提示“不鞥为空,这个代码如何?

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


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

以下是引用ayiken在2015/6/4 13:14:00的发言:
一个窗口中的好几个page(页面),每个页面都有“保存”按钮,如果保存命令只能改页面有小时,代码怎么写?

 

不明白你什么意思


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


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

以下是引用ayiken在2015/6/4 13:20:00的发言:
第二个问题,窗口页面中要填写的实际中 textbox和combobox控件,在保存时其中未填写内容要提示“不鞥为空,这个代码如何?

 

If e.Form.Controls("TextBox1").Text = "" Then

     msgbox("xxx不能为空")

     Return

End If


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


加好友 发短信
等级:童狐 帖子:266 积分:2166 威望:0 精华:0 注册:2014/12/16 12:25:00
  发帖心情 Post By:2015/6/4 16:30:00 [只看该作者]

word 报表有些电脑上打开时,卡机怎么回事儿

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


加好友 发短信
等级:童狐 帖子:266 积分:2166 威望:0 精华:0 注册:2014/12/16 12:25:00
  发帖心情 Post By:2015/6/4 16:43:00 [只看该作者]

麻烦您了,这段代码和保存代码一起的时候怎样写,我想保存命令该页有效,我的窗口中有好几个页面如下图

图片点击可在新窗口打开查看此主题相关图片如下:qq图片20150604163822.png
图片点击可在新窗口打开查看


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


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

以下是引用ayiken在2015/6/4 16:30:00的发言:
word 报表有些电脑上打开时,卡机怎么回事儿

 

word报表的前提,是电脑必须安装完整版的MS Office,你卸载重装一下软件。


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


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

以下是引用ayiken在2015/6/4 16:43:00的发言:
麻烦您了,这段代码和保存代码一起的时候怎样写,我想保存命令该页有效,我的窗口中有好几个页面如下图

图片点击可在新窗口打开查看此主题相关图片如下:qq图片20150604163822.png
图片点击可在新窗口打开查看

 

 

If e.Form.Controls("TextBox1").Text = "" Then

     msgbox("xxx不能为空")

     Return

End If

 

If e.Form.Controls("TextBox2").Text = "" Then

     msgbox("xxx不能为空")

     Return

End If

 

DataTables("表A").Save


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


加好友 发短信
等级:童狐 帖子:266 积分:2166 威望:0 精华:0 注册:2014/12/16 12:25:00
  发帖心情 Post By:2015/6/6 7:45:00 [只看该作者]

控件(textbox)上移动鼠标时要显示提示语句用mousemove的语句语法怎样?

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