Access交流中心

北京 | 上海 | 天津 | 重庆 | 广州 | 深圳 | 珠海 | 汕头 | 佛山 | 中山 | 东莞 | 南京 | 苏州 | 无锡 | 常州 | 南通 | 扬州 | 徐州 | 杭州 | 温州 | 宁波 | 台州 | 福州 | 厦门 | 泉州 | 龙岩 | 合肥 | 芜湖 | 成都 | 遂宁 | 长沙 | 株洲 | 湘潭 | 武汉 | 南昌 | 济南 | 青岛 | 烟台 | 潍坊 | 淄博 | 济宁 | 太原 | 郑州 | 石家庄 | 保定 | 唐山 | 西安 | 大连 | 沈阳 | 长春 | 昆明 | 兰州 | 哈尔滨 | 佳木斯 | 南宁 | 桂林 | 海口 | 贵阳 | 西宁 | 乌鲁木齐 | 包头 |

窗体循环切换打开和关闭

风的承诺  发表于:2020-12-28 10:35:48  
复制

各位老师:如何让弹出式窗体可以环切换打开和关闭?

例:共有5个窗,分别为窗体1,窗体2,窗体3,窗体4,窗体5

     要求:从窗体1开始,通过设定的时间(不同的窗体要求能设置不同的时间),在到达设定的秒数后,自动关闭窗体1,然后再打窗2,一直循环到窗体5关闭,打开窗体1........循环打开关闭

             假设:窗体1的是打开的时间为:5秒

                    窗体2的是打开的时间为:10秒

                    窗体3的是打开的时间为:6秒

                    窗体4的是打开的时间为:8秒

                    窗体5的是打开的时间为:2秒

程序运行为:窗体1打开开始计时5秒后关闭,打开窗体2,然后窗体2计时10秒后关闭,打开窗体3,然后窗体3计时6秒后关闭,再打窗体4计时8秒后关闭,再打开窗体5计时2秒关闭,再打开窗体1计时5秒关闭,打开窗体2......循环打开关闭!

窗体循环切换打开关闭

 

Top
张志 发表于:2020-12-28 11:28:06
采用计时器事件。

vious 发表于:2020-12-28 13:26:34

每个窗体增加相应内容与数据

Private Sub Form_Load()

    Me.TimerInterval = 5000
End Sub
Private Sub Form_Timer()
    DoCmd.OpenForm "窗体2"
    DoCmd.Close acForm, "窗体1"
End Sub


风的承诺 发表于:2020-12-28 13:57:17
感谢,己OK,

总记录:3篇  页次:1/1 9 1 :