QQ登录

只需一步,快速开始

登录 | 注册 | 找回密码

三维网

 找回密码
 注册

QQ登录

只需一步,快速开始

展开

通知     

全站
9天前
查看: 2187|回复: 2
收起左侧

[已解决] 小飞哥--关于用户启动宏自动编程

[复制链接]
发表于 2010-2-6 09:30:39 | 显示全部楼层 |阅读模式 来自: 中国浙江台州

马上注册,结识高手,享用更多资源,轻松玩转三维网社区。

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

x
小飞哥--用户启动宏自动编程运行时,能不能使窗口最小化?
发表于 2010-2-6 10:06:01 | 显示全部楼层 来自: 中国广东广州
窗体代码中申明0 e& Y' t8 T/ |
Declare Function SetWindowPos Lib "user32" (ByVal hwnd As Long, ByVal hWndInsertAfter As Long, ByVal x As Long, ByVal y As Long, ByVal cx As Long, ByVal cy As Long, ByVal wFlags As Long) As Long
& j) i+ R9 z5 P& W% }# E4 l! Q' Q: W; D! i: W) m. B! K) W
Private Sub Form_Load(), b* p" d# h1 Z/ o: Q
'最小化( F4 Q6 u& Y- l% u1 k( f) n7 ]
SetWindowPos Me.hwnd, -1, 0, 0, 0, 0, 0
# C' o; c: ~1 N1 y'窗体至顶
  b0 H" Y" V: }8 TSetWindowPos Me.hwnd, -1, 0, 0, 0, 0, 37 K- ~& B5 p2 _+ ^' C
End Sub

评分

参与人数 1三维币 +5 收起 理由
hh749 + 5 好资料,感谢您对论坛的支持!

查看全部评分

发表于 2010-2-6 11:47:03 | 显示全部楼层 来自: 中国浙江杭州
窗体代码中申明
! |' J+ H! |8 T% D9 }: m3 x* jDeclare Function SetWindowPos Lib "user32" (ByVal hwnd As Long, ByVal hWndInsertAfter As Long, ByVal x As Long, ByVal y As Long, ByVal cx As Long, ByVal cy As Long, ByVal wFlags As Lon ...
+ j! m3 e. U. n' \" [; @jackywang08 发表于 2010-2-6 10:06 http://www.3dportal.cn/discuz/images/common/back.gif

' n! k' a7 a2 [* Z/ a  J! G, D- V+ z: f- }+ m8 r5 a; ]

4 O) {, J: s9 v8 r顶二楼!回答的很对!谢谢!
发表回复
您需要登录后才可以回帖 登录 | 注册

本版积分规则


Licensed Copyright © 2016-2020 http://www.3dportal.cn/ All Rights Reserved 京 ICP备13008828号

小黑屋|手机版|Archiver|三维网 ( 京ICP备2023026364号-1 )

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