1,453
社区成员
发帖
与我相关
我的任务
分享请发表友善的回复…
发表回复
VBCLaplace 2007-08-04
- 打赏
- 举报
谢谢蚜虫
jacobhunter 2007-07-26
- 打赏
- 举报
呵呵，我也落后了，看来想捞分也得早起啊！
不过我有点疑问，请教下：
我所知的Resize事件就是在大小发生改变的时候就会触发的
所以。。。蚜虫的代码中“if...then”是否可以不要？
代码改为：
Private Sub UserControl_Resize()
Width = 控件的宽度
Height = 控件的高度
End Sub
别误会，不是挑刺，我也菜得很，仅为学习。
不过我有点疑问，请教下：
我所知的Resize事件就是在大小发生改变的时候就会触发的
所以。。。蚜虫的代码中“if...then”是否可以不要？
代码改为：
Private Sub UserControl_Resize()
Width = 控件的宽度
Height = 控件的高度
End Sub
别误会，不是挑刺，我也菜得很，仅为学习。
嗷嗷叫的老马 2007-07-26
- 打赏
- 举报
又被蚜虫抢先啦~~~
yadg 2007-07-26
- 打赏
- 举报
学习，呵呵
yachong 2007-07-26
- 打赏
- 举报
加这个if，是担心“Width = 控件的宽度”会再次触发Resize事件造成堆栈溢出
刚才用窗体的Resize试验了一下，“if...then”可以不要
刚才用窗体的Resize试验了一下，“if...then”可以不要
yachong 2007-07-21
- 打赏
- 举报
Private Sub UserControl_Resize()
If Width <> 1000 Or Height <> 1000 Then
Width = 1000
Height = 1000
End If
End Sub
If Width <> 1000 Or Height <> 1000 Then
Width = 1000
Height = 1000
End If
End Sub
