VB如何让文本框text1显示在顶部？

2025-03-12 19:54:45

推荐回答（3个）

回答1：

Private Sub Form_Resize()
Text1.Move Me.Width / 2 - Text1.Width / 2, 0
'显示在顶部最左边改成 Text1.Move 0, 0
'显示在顶部最右边边改成 Text1.Move Me.Width - Text1.Width , 0
End Sub

这样可以无论窗体怎么改变，始终把TEXT1显示在顶部的中央

回答2：

Private Sub Form_Resize() ’改变窗口大小时显示在顶部
Text1.Move 0, 0

End Sub

Private Sub Form_laod() ‘或者加载时显示在顶部
Text1.Move 0, 0

End Sub

回答3：

Private Sub Form_Resize()
Text1.Move 0, 0

End Sub