读书人

关于控件在窗体的靠左居中靠右有关

发布时间: 2012-03-28 15:40:03 作者: rapoo

关于控件在窗体的靠左,居中,靠右问题啊
在窗体上放置一个标签显示文字,然后画3个选项按钮,单击分别实现标签文本的“靠左”“居中”“靠右”。

请教,选项按钮下的代码如何写。我是这样写的,但不能实现啊。
Private Sub Option1_Click()
Label1.Move Form1.Left
End Sub


[解决办法]
Private Sub Option1_Click(Index As Integer)

Select Case Index
Case 0
Label1.Move 0, (ScaleHeight - Label1.Height) / 2
Case 1
Label1.Move (ScaleWidth - Label1.Width), (ScaleHeight - Label1.Height) / 2
Case 2
Label1.Move (ScaleWidth - Label1.Width) / 2, (ScaleHeight - Label1.Height) / 2
End Select

End Sub

读书人网 >VB

热点推荐