网页资讯视频图片知道文库贴吧地图采购
进入贴吧全吧搜索

 
 
 
日一二三四五六
       
       
       
       
       
       

签到排名:今日本吧第个签到,

本吧因你更精彩,明天继续来努力!

本吧签到人数:0

一键签到
成为超级会员,使用一键签到
一键签到
本月漏签0次!
0
成为超级会员,赠送8张补签卡
如何使用?
点击日历上漏签日期,即可进行补签。
连续签到:天  累计签到:天
0
超级会员单次开通12个月以上,赠送连续签到卡3张
使用连续签到卡
08月26日漏签0天
vb吧 关注:156,083贴子:1,166,234
  • 看贴

  • 图片

  • 吧主推荐

  • 游戏

  • 5回复贴,共1页
<<返回vb吧
>0< 加载中...

请教VB如何检测窗体没有点击操作会倒计时自动hide?

  • 只看楼主
  • 收藏

  • 回复
  • peeppp
  • 递归爆栈
    7
该楼层疑似违规已被系统折叠 隐藏此楼查看此楼
用vb做的一个小程序,有好几个窗体互相调用,想请教大侠,怎么实现检测某个打开的窗体,在没有任何在这个窗体上点击动作的时候,倒计时60秒自动隐藏自己 me.hide?(不受其它窗体点击的影响)


  • 空中熬翔
  • 子类化
    13
该楼层疑似违规已被系统折叠 隐藏此楼查看此楼
form1:
Private Sub Command1_Click()
Form2.Timer1.Enabled = True
Form2.Show
End Sub
form2:
Dim n As Integer
Private Sub Form_Click()
n = 0
End Sub
Private Sub Timer1_Timer()
n = n + 1
If n = 60 Then
Timer1.Enabled = False
n = 0
Me.Hide
End If
End Sub


2025-08-26 19:57:31
广告
不感兴趣
开通SVIP免广告
  • 有文化的大行家
  • 啥也不懂
    1
该楼层疑似违规已被系统折叠 隐藏此楼查看此楼
加个timer控件,加载窗体时激活timer计时60秒后隐藏,在点击事件开始的时候取消timer激活,结束时激活。


登录百度账号

扫二维码下载贴吧客户端

下载贴吧APP
看高清直播、视频!
  • 贴吧页面意见反馈
  • 违规贴吧举报反馈通道
  • 贴吧违规信息处理公示
  • 5回复贴,共1页
<<返回vb吧
分享到:
©2025 Baidu贴吧协议|隐私政策|吧主制度|意见反馈|网络谣言警示