设为首页收藏本站Access中国

Office中国论坛/Access中国论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

返回列表 发新帖
查看: 1359|回复: 3
打印 上一主题 下一主题

[模块/函数] 这个在access里是什么控件?

[复制链接]
跳转到指定楼层
1#
发表于 2004-4-28 17:02:00 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
如下图中数字选择控件




本帖子中包含更多资源

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

x
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏 分享分享 分享淘帖 订阅订阅
2#
发表于 2004-4-28 18:04:00 | 只看该作者
你说的是列表框吧

点击这里给我发消息

3#
发表于 2004-4-28 19:51:00 | 只看该作者
在ACCESS菜单栏插入/ACTIVEX控件里可以使用:



使用 UpDown 控件帮助:

UpDown 控件是一对箭头按钮,用户可通过单击这些按钮递增或递减数值,例如滚动位置,或在伙伴控件中显示的数字。伙伴控件可以是其它任何类型的控件,只要它具有可被 UpDown 控件更新的属性。

对用户来说,UpDown 控件及其伙伴控件通常看上去象是一个控件。可以指定 UpDown 控件自动地定位于其伙伴控件的旁边,并自动将伙伴控件的值设置为自己的当前值。例如,可以将 UpDown 控件和 Textbox 控件一起使用,以提示用户数字类型的输入值。下面显示的 UpDown 控件将 Textbox 控件作为其伙伴控件,该联合有时被称为旋转器控件。



可能的用途
递增或递减应用程序中某个字段的值。
基本操作
要使用 UpDown 控件,必须首先将其 BuddyControl 属性设置为另一个控件,并将 BuddyProperty 设置为另一个控件的可滚动属性。Min 和 Max 属性确定了该控件的数值范围,Wrap 属性决定当最终用户输入的值超过 Min 或 Max 值时,是否会折回。Increment 属性指定在每次单击上箭头或下箭头时 Value 属性的变化量。

用 AutoBuddy 属性自动设置伙伴控件
在设计时,如果将 AutoBuddy 属性设置为 True,那么 UpDown 控件自动把 TabOrder 中位于它前面的控件作为它的“伙伴”。

自动设置伙伴控件

在窗体中绘制伙伴控件。


在窗体中绘制 UpDown 控件。


用鼠标右键单击 UpDown 控件,并单击“属性”以显示“属性页”对话框。


单击“合作者”以显示“合作者”选项卡,如下图 2.43 所示。


单击“自动合作者”复选框将 AutoBuddy 属性设置为 True。


单击“同步合作者”复选框将 SyncBuddy 属性设置为 True。
图 2.43 UpDown 控件属性页中的“合作者”选项卡



确定滚动行为
UpDown 控件有多个事件和属性,以便确定该控件如何滚动。

Increment 和 Wrap 属性
当按住向上按钮或向下按钮时,Wrap 属性决定该控件的行为。如果设置为 False,当达到 Max 或 Min 值时,该控件将停止滚动,并停在 Max 或 Min 值。如果设置为 True,该控件会折回到 Min 或 Max 值,并从由 Min 或 Max 确定的值继续递增(或递减)。

当单击向上按钮或向下按钮时,Increment 属性指定 Value 属性的变化量。该值不能为负数。它的一个用途是将字段或 OptionButton 在 True (-1) 和 False (0) 之间转换,如下面的代码所示:

Private Sub Form_Load()
   'UpDown 控件名为“updToggle”。
   'OptionButton 控件名为“optToggle”。
   With updToggle
      .BuddyControl = optToggle
      .Min = -1
      .Max = 0
      .Increment = 1
      .Wrap = True
   End With
End Sub

'将 OptionButton 的 Value 改为
'UpDown 控件的 Value 属性。
Private Sub updToggle_Change()
   optToggle.Value = updToggle.Value
End Sub

UpClick 和 DownClick 事件
用 UpClick 和 DownClick 事件,可以准确地控制 UpDown 控件如何在一系列的值之间滚动。例如,如果希望值能够迅速地向上滚动,而向下滚动时较慢,可将 Increment 属性设置为不同的值,如下所示:

Private Sub updScroll_UpClick()
   'UpDown 控件的名称是“updScroll”
   updScroll.Increment = 5
End Sub

Private Sub updScroll_DownClick()
   '用户单击向下按钮时,
   'Increment 转换为 1,以获得较好的分辨率。
   updScroll.Increment = 1
End Sub

本帖子中包含更多资源

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

x
4#
 楼主| 发表于 2004-4-28 22:23:00 | 只看该作者
very good

but my Access hasn' t it !






[此贴子已经被作者于2004-4-28 14:28:27编辑过]

您需要登录后才可以回帖 登录 | 注册

本版积分规则

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

GMT+8, 2025-2-23 03:04 , Processed in 0.096915 second(s), 28 queries .

Powered by Discuz! X3.3

© 2001-2017 Comsenz Inc.

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