combo随窗体大小改变
(2024-11-04 11:07:36)| 分类: VB程式 |
Dim w As Single, l As
Single
Private Sub
Form_Load()
w = Me.Width /
Combo1.Width
l = Me.Width /
Combo1.Left
End Sub
Private Sub
Form_Resize()
Combo1.Width = Me.Width /
w
Combo1.Left = Me.Width /
l
End Sub

加载中…