Foxtable(狐表) → 用户栏目 → 专家坐堂 → 保存和返回输入框问题


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

主题：保存和返回输入框问题
美女呀，离线，留言给我吧！
mxy8898
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：幼狐 帖子：51 积分：448 威望：0 精华：0 注册：2018/2/3 11:13:00 		保存和返回输入框问题  发帖心情 Post By：2018/2/3 11:19:00 [只看该作者]


图片点击可在新窗口打开查看此主题相关图片如下：qq截图20180203111618.jpg
图片点击可在新窗口打开查看

如图，要输入的数据为空，点击保存提示数据为空不能保存，怎么才可以做到。

有数据保存后怎么做才可以自动将输入点切换到第一个“时间”输入位置
 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：113737 积分：579246 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2018/2/3 11:25:00 [只看该作者]

保存按钮

dim r as row  = tables("表A").current
if r isnot nothing then
    if r.isnull("第一列") then
        msgbox("第一列不能为空")
        return
    end if
    if r.isnull("第二列") then
        msgbox("第二列不能为空")
        return
    end if
    r.save
endif
tables("表A").addnew
e.form.controls("Textbox1").select()
[此贴子已经被作者于2018/2/3 11:27:52编辑过]
 回到顶部
美女呀，离线，留言给我吧！
mxy8898
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：幼狐 帖子：51 积分：448 威望：0 精华：0 注册：2018/2/3 11:13:00 		  发帖心情 Post By：2018/2/4 14:39:00 [只看该作者]


图片点击可在新窗口打开查看此主题相关图片如下：qq截图20180204143423.jpg
图片点击可在新窗口打开查看

有提示不能为空，但还是可以保存


所有数据都填满后，保存有错误提示

以下是保存按钮代码
Dim r As Row  = Tables("水质检测原始数据").current
If r IsNot Nothing Then
    If r.isnull("年份日期") Then
        msgbox("年份日期不能为空")
        Return
    End If
    If r.isnull("主养品种") Then
        msgbox("主养品种不能为空")
        Return
    End If
    r.save
End If
Tables("水质检测原始数据").addnew
e.form.controls("DateTimePicker1").Select()

DataTables("水质检测原始数据").Save()
CurrentTable.AddNew()
 回到顶部
帅哥哟，离线，有人找我吗？
有点甜
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


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

每一次都报错？出错的实例发上来测试。

 回到顶部
美女呀，离线，留言给我吧！
mxy8898
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：幼狐 帖子：51 积分：448 威望：0 精华：0 注册：2018/2/3 11:13:00 		保存后报错  发帖心情 Post By：2018/2/7 16:16:00 [只看该作者]


图片点击可在新窗口打开查看此主题相关图片如下：03.jpg
图片点击可在新窗口打开查看

图片点击可在新窗口打开查看此主题相关图片如下：02.jpg
图片点击可在新窗口打开查看

图片点击可在新窗口打开查看此主题相关图片如下：01.jpg
图片点击可在新窗口打开查看

1、提示不能为空，照样可以写进数据库
2、所有数据全部填上保存，提示错误
 回到顶部
帅哥哟，离线，有人找我吗？
有点甜
 小大  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


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

1、如果你窗口控件用绑定列的方式，是先写入数据库的，但没有保存，最后只要你不保存不就行了？

 

2、实例发上来测试。
 回到顶部
美女呀，离线，留言给我吧！
mxy8898
 小大  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：幼狐 帖子：51 积分：448 威望：0 精华：0 注册：2018/2/3 11:13:00 		  发帖心情 Post By：2018/2/7 16:31:00 [只看该作者]

实例怎么发送，压缩后无法上传

 回到顶部
美女呀，离线，留言给我吧！
mxy8898
 小大  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：幼狐 帖子：51 积分：448 威望：0 精华：0 注册：2018/2/3 11:13:00 		  发帖心情 Post By：2018/2/7 16:56:00 [只看该作者]

是这个么

 回到顶部
帅哥哟，离线，有人找我吗？
有点甜
 小大  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


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

以下是引用mxy8898在2018/2/7 16:31:00的发言：
实例怎么发送，压缩后无法上传

 

你做的项目，直接上传上来（大小不要超过2M），超过2M就压缩一下你的项目。
 回到顶部
美女呀，离线，留言给我吧！
mxy8898
 小大  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：幼狐 帖子：51 积分：448 威望：0 精华：0 注册：2018/2/3 11:13:00 		  发帖心情 Post By：2018/2/7 17:16:00 [只看该作者]

以压缩上传

 回到顶部
总数 11 1 2 下一页
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.09082 秒, 4 次数据查询