设为首页收藏本站Access中国

Office中国论坛/Access中国论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

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

[窗体] [已解决,有新问题]如何在列表框中双击选中用户,在另一窗体中显示出该用户信息。

[复制链接]
跳转到指定楼层
1#
发表于 2008-6-16 14:43:17 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
各位高手,请问一下问题:

如例子所示,我想在“用户列表窗体”中,双击相关的用户信息,就能在“收费数据窗体”中自动弹出该用户的数据(即用户服务编号和公司名称),然后自行输入收费信息。请问应该怎么操作??

另外,请问在“用户列表窗体”中,我想模糊搜索“用户列表框”中公司名称,请问应该怎么做?

谢谢!


已解决该问题,谢谢kangking!

[ 本帖最后由 辉辉 于 2008-6-17 12:04 编辑 ]

本帖子中包含更多资源

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

x
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏 分享分享 分享淘帖 订阅订阅
2#
发表于 2008-6-16 15:27:38 | 只看该作者
参数传递或全局变量
3#
发表于 2008-6-16 15:48:43 | 只看该作者
见示例。

本帖子中包含更多资源

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

x
4#
发表于 2008-6-16 15:50:11 | 只看该作者
[:33] [:33]
5#
 楼主| 发表于 2008-6-16 16:17:02 | 只看该作者
谢谢kangking。

但还有些问题:好像第一条记录双击后没反应。

[ 本帖最后由 辉辉 于 2008-6-16 16:20 编辑 ]

本帖子中包含更多资源

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

x
6#
发表于 2008-6-16 17:28:01 | 只看该作者
原帖由 辉辉 于 2008-6-16 16:17 发表
谢谢kangking。

但还有些问题:好像第一条记录双击后没反应。


Private Sub List3_DblClick(Cancel As Integer)
Dim strInfo As String
Dim I As Long
For I = 0 To List3.ListCount - 1
    If List3.Selected(I) Then
        strInfo = List3.Column(0) & "//" & List3.Column(1)
        DoCmd.OpenForm "收费数据窗体", acNormal, , , acFormAdd, , strInfo
        Exit Sub
    End If
Next
End Sub

原来这句是:For I = 1 To List3.ListCount
改为:For I = 0 To List3.ListCount - 1

不好意思!
7#
 楼主| 发表于 2008-6-17 10:13:03 | 只看该作者
没事,我后来看了下代码,把“1”改成“0”,也改好了,谢谢!
8#
 楼主| 发表于 2008-6-17 11:59:31 | 只看该作者
现在发现还有个问题:在实例中选择“列表框”中的某家企业进去后,转到这家企业的“收费数据窗体”(我发现在“收费数据表”中已经产生一条记录)在“收费数据窗体”没有输入任何数据。当再次在“列表框”双击这条记录,再次进入“收费数据窗体”做修改或者察看,就会提示错误  
请问有没有办法解决这个问题?

我想实现只是查看“用户服务编号”和“企业名称”,不是直接写入数据表。如果要写入数据表,通过保存按钮实现。

谢谢!

[ 本帖最后由 辉辉 于 2008-6-17 16:23 编辑 ]

本帖子中包含更多资源

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

x
9#
发表于 2008-6-27 15:16:49 | 只看该作者
地地道道弹道弹道导弹当地
10#
发表于 2011-4-20 14:33:02 | 只看该作者
解压密码?
您需要登录后才可以回帖 登录 | 注册

本版积分规则

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

GMT+8, 2024-11-29 17:33 , Processed in 0.097157 second(s), 35 queries .

Powered by Discuz! X3.3

© 2001-2017 Comsenz Inc.

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