设为首页收藏本站Access中国

Office中国论坛/Access中国论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

123下一页
返回列表 发新帖
查看: 7051|回复: 28
打印 上一主题 下一主题

[窗体] 求助:帮我实现选项卡和按钮的对应

[复制链接]
跳转到指定楼层
1#
发表于 2008-1-6 11:45:49 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
各位高手:麻烦帮我实现一下按钮与选项卡的对应关系把。
比如我的这个数据库,希望点按钮A显示的是页3  点按钮B显示的是页4

我在论坛里搜了一些帖子,都是不完整的代码,自己写进去搞不定阿,不知道缺了什么东西或者写的地方不对
还请帮帮我吧。/

有个高手说精品推荐里面有源程序,敢问各位,精品推荐在哪? 是不是就是精华区? 我没看到阿。。。。
麻烦给个具体的链接吧  
谢谢各位!
游客,如果您要查看本帖隐藏内容请回复

本帖子中包含更多资源

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

x
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏 分享分享 分享淘帖 订阅订阅

点击这里给我发消息

2#
发表于 2008-1-6 12:04:38 | 只看该作者
代码如下, 另以后有关问题贴请发到 Access交流区, 谢谢

Private Sub Command0_Click()
On Error GoTo Err_Command0_Click

   选项卡控件2.Value = 0
   ' Screen.PreviousControl.SetFocus
   ' DoCmd.FindNext

Exit_Command0_Click:
    Exit Sub

Err_Command0_Click:
    MsgBox Err.Description
    Resume Exit_Command0_Click
   
End Sub
Private Sub Command1_Click()
On Error GoTo Err_Command1_Click

  选项卡控件2.Value = 1
   ' Screen.PreviousControl.SetFocus
   ' DoCmd.FindNext

Exit_Command1_Click:
    Exit Sub

Err_Command1_Click:
    MsgBox Err.Description
    Resume Exit_Command1_Click
   
End Sub
3#
 楼主| 发表于 2008-1-6 12:26:02 | 只看该作者
谢谢!!  。。。。。。。。
4#
发表于 2008-2-22 16:11:41 | 只看该作者
我也遇到同样的问题,学习一下
5#
发表于 2008-6-3 09:14:35 | 只看该作者
[:50]
6#
发表于 2008-8-1 11:20:21 | 只看该作者
看看..................................。
7#
发表于 2009-3-9 14:53:27 | 只看该作者
正好需要这个,要下载
8#
发表于 2009-3-27 11:34:14 | 只看该作者
谢谢
9#
发表于 2009-7-7 10:07:05 | 只看该作者
学习
10#
发表于 2009-9-12 22:46:26 | 只看该作者
学些!
您需要登录后才可以回帖 登录 | 注册

本版积分规则

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

GMT+8, 2024-11-1 11:35 , Processed in 0.098968 second(s), 34 queries .

Powered by Discuz! X3.3

© 2001-2017 Comsenz Inc.

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