设为首页收藏本站Access中国

Office中国论坛/Access中国论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

12下一页
返回列表 发新帖
查看: 2380|回复: 16
打印 上一主题 下一主题

[窗体] 【求助】信息输入

[复制链接]
跳转到指定楼层
1#
发表于 2008-10-23 22:31:03 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
(1)如何能 使用信息输入的窗口 输入信息管理窗口中缺少的数据?

如在 酒店客房信息输入 窗口里面输入 酒店客房信息管理 中缺少的数据~~~?

(2)如何能使 酒店客房信息管理 窗口里面的数据按 客房编号排序?

[ 本帖最后由 孤客 于 2008-10-24 21:22 编辑 ]

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?注册

x
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏 分享分享 分享淘帖 订阅订阅
2#
 楼主| 发表于 2008-10-23 22:32:27 | 只看该作者
在线等高手帮忙
3#
发表于 2008-10-23 23:10:29 | 只看该作者
change改成afterupdate

比较粗糙
4#
 楼主| 发表于 2008-10-23 23:18:11 | 只看该作者
额~~~~~~~~~看不懂~~~~~~~~~你能不能把它改了它上来我看看呀~~~~~~~~
5#
 楼主| 发表于 2008-10-24 13:12:15 | 只看该作者
[:31] 求助中~~~~~~~~·
6#
 楼主| 发表于 2008-10-24 21:23:09 | 只看该作者
[:30] 不能让它沉了
7#
发表于 2008-10-24 21:55:14 | 只看该作者
If IsNull(客房编号) Then
      MsgBox ("客房编号不能为空!")
       Me.客房编号.SetFocus
        ElseIf IsNull(房间状态) Then
         MsgBox ("房间状态不能为空!")
          Me.房间状态.SetFocus
           ElseIf IsNull(客人姓名) Then
            MsgBox ("客人姓名不能为空!")
             Me.客人姓名.SetFocus
               ElseIf IsNull(性别) Then
                MsgBox ("性别不能为空!")
                  Me.性别.SetFocus
                    ElseIf IsNull(押金) Then
                     MsgBox ("押金不能为空!")
                      Me.押金.SetFocus
                        ElseIf IsNull(入住日期) Then
                         MsgBox ("入住日期不能为空!")
                          Me.入住日期.SetFocus

   ElseIf yn = 1 Then
    Set rs = New ADODB.Recordset
    rs.Open "select * from 客房信息", CurrentProject.Connection, 3, 3
    rs.AddNew
    rs("客房编号") = 客房编号
    rs("房间状态") = 房间状态
    rs("客人姓名") = 客人姓名
    rs("性别") = 性别
    rs("押金") = 押金
    rs("入住日期") = 入住日期
    rs.Update
    yn = MsgBox("确定保存信息吗?", 1 + 32, "提示")
   
    MsgBox ("信息保存成功!")
    房间状态 = ""
    客人姓名 = ""
    性别 = ""
    押金 = ""
    入住日期 = ""
     Else
    房间状态 = ""
    客人姓名 = ""
    性别 = ""
    押金 = ""
    入住日期 = ""
   End If

[ 本帖最后由 fxtest 于 2008-10-24 22:05 编辑 ]
8#
发表于 2008-10-24 22:17:59 | 只看该作者
这是很好的学习例子!!我也是在论坛里下的.

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?注册

x
9#
发表于 2008-10-24 22:18:39 | 只看该作者
这是很好的学习例子!!我也是在论坛里下的.
10#
 楼主| 发表于 2008-10-24 23:11:47 | 只看该作者
能够实现哪些条件吗?
我用了好像行不通...
不过感谢八楼提供的材料
学习新知识了
谢谢
您需要登录后才可以回帖 登录 | 注册

本版积分规则

QQ|站长邮箱|小黑屋|手机版|Office中国/Access中国 ( 粤ICP备10043721号-1 )  

GMT+8, 2024-6-16 04:48 , Processed in 0.115140 second(s), 35 queries .

Powered by Discuz! X3.3

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表