【问题标题】:Microsoft access slider 6.0 create the max and min based on a queryMicrosoft access slider 6.0 根据查询创建最大值和最小值
【发布时间】:2015-01-07 22:09:04
【问题描述】:

是否可以使用 access 数据库中的查询来设置滑块的最大值和最小值?类似的东西:

Dim x as double  

x = select count(mydata) from mytable;  

set me.Slider0.max = x

【问题讨论】:

    标签: ms-access vba ms-access-2007 activex


    【解决方案1】:
    Dim x as double
    Dim rs as ADODB.Recordset
    Dim s as string
    
    s = "SELECT COUNT(mydata) FROM mytable"
    rs = ThisDB.Execute(s)
    x = Cint(rs)
    Set Me!Slider0.Max = x
    Set Me!Silder0.Min = x - x
    

    或者类似的东西。更改您的最小值。

    【讨论】:

    • 在你输入之前就想通了哈!是的,我将它添加到表单加载事件中并设置了 slider.max 和 min's。谢谢你的提示!将来,我怎样才能发现滑块对象在 vba 中具有这样的最大值和最小值?我到处搜索,但无法弄清楚。此外,如果您正在输入 slider0.ma- 它通常会弹出完整的代码,但在这种情况下不会。
    • 我只是将它添加到表单中并查看了控件。它的 MSDN 文档缺少任何具体信息,因此在调试窗口中播放对我有帮助。
    猜你喜欢
    • 1970-01-01
    • 2015-06-25
    • 2013-09-18
    • 2021-05-25
    • 1970-01-01
    • 2021-12-31
    • 2011-07-13
    • 1970-01-01
    • 2018-10-09
    相关资源
    最近更新 更多