其次,要明确需求,余老根据实际需求编写代码写出要实现的功能逻辑。
然后,对代码进行调试验证,进行迹毁帆执行姿雹。
对脚本进行封装,形成可执行文件。
Dim a, bPrivate Sub Command1_Click()
End
End Sub
Private Sub Form_Load()
Text.Text = "Visual Basic程序设计"唯仔冲
Command1.Caption = "指歼结束"
Text.Left = 0: Text.Top = 0: Text.Width = 0.5 * Form1.Width
Text.Height = 0.5 * Form1.Height
a = Form1.Width - Command1.Left
b = Form1.Height - Command1.Top
End Sub
Private Sub Form_Resize()
Text.Left = 0: Text.Top = 0: Text.Width = 0.5 * Form1.Width
Text.Height = 0.5 * Form1.Height
Command1.Left = Form1.Width - a
Command1.Top = Form1.Height - b
End Sub
注意,各变戚神量名,控件名保持一致,你题目中的文本框名称为text
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)