标题:怎么触发窗体 标题拦
只看楼主
b13690976754
Rank: 1
等 级:新手上路
威 望:2
帖 子:835
专家分:7
注 册:2006-11-9
结帖率:100%
 问题点数:0 回复次数:3 
怎么触发窗体 标题拦
比如我按下窗体并拖动鼠标 窗体会跟鼠标移动 怎么来出发其他事件呢?
比如说 我按下窗体并拖动鼠标 text里面会显示 我窗体的高宽
搜索更多相关主题的帖子: 触发 窗体 
2007-03-13 23:44
121038
Rank: 1
等 级:新手上路
威 望:2
帖 子:414
专家分:0
注 册:2005-8-3
得分:0 

Private Sub Form_Resize()
Text1.Text = CStr(Width)
End Sub


2007-03-14 21:36
b13690976754
Rank: 1
等 级:新手上路
威 望:2
帖 子:835
专家分:7
注 册:2006-11-9
得分:0 

你误会我的意思了 我意思的 拖动窗体 在窗体里的 Text1.text里面会显示 窗体的Left 是跟鼠标动而改变的


If Dir(\"alive\") <> \"\" And Dir(\"ideal\") <> \" Then Print \"strive\" End If
2007-03-15 21:48
wyfandy
Rank: 1
来 自:深圳
等 级:新手上路
帖 子:376
专家分:0
注 册:2006-12-11
得分:0 

Private Sub Timer1_Timer()
Text1.Text = Me.Left
End Sub

不论什么事,只要认准了一个目标,然后朝之不懈地努力,就一定实现。编程爱好者QQ群:21318556
2007-03-15 23:56



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-124099-1-1.html




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.015054 second(s), 7 queries.
Copyright©2004-2025, BCCN.NET, All Rights Reserved