Question

在名称为Form1的窗体上画一个文本框，

在名称为Form1的窗体上画一个文本框，其名称为Text1（如图1所示），编写适当的事件过程。程序运行后，如果单击窗体，则可使文本框移到窗体的左上角；而如果在文本框中输入信息，则可使文本框移到窗体的右上角。要求：不得使用任何变量；只允许通过修改属性的方式移动文本框。
快 现在就要!!!!!

Answer 1

Private Sub Form_Click()
Text1.Left = 0 '移到左上角
Text1.Top = 0
End Sub

Private Sub Text1_Change()
Text1.Top = 0 '移到右上角
Text1.Left = Me.Width - Text1.Width
End Sub

Answer 2

左上角
text1.left=0
text1.top=0
右上角
Text1.Left = Me.ScaleWidth - Text1.Width
Text1.Top = 0