请教：编写一个vb程序（基于循环结构的程序设计）

来源：百度知道 编辑：UC知道 时间：2024/09/25 15:28:50
书上的题目```
（3） 打印1~25之间的平方、平方根、自然对数和e指数的数学用表。
要求：窗体标题显示为“数学用表+序号”；窗体上有“显示”命令按钮。当单击“显示”命令按钮时，“显示”命令按钮隐藏，同时将结果输出在窗体上，每列要定位输出，输出结果左对齐。
注：自然对数函数格式为Log( x)。

Private Sub Command1_Click()
Command1.Visible = False
Print " x"; Tab(5); "平方"; Tab(15); "平方根"; Tab(25); "自然对数"; Tab(35); "e指数"
For i = 1 To 25
Me.ForeColor = vbBlue
Print i;
Me.ForeColor = vbGreen
Print Tab(5); i ^ 2;
Print Tab(15); Format$(Sqr(i), "0.000");
Print Tab(25); Format$(Log(i), "0.000");
Print Tab(35); Format$(Exp(i), "0.000")
Next i
End Sub

Private Sub Form_Load()
Me.Left = 0
Me.Top = 0
Me.Width = 4830
Me.Height = 5250
Command1.Left = 3480
Command1.Top = 0
Me.Caption = "数学用表+序号"
Command1.Caption = "显示"
End Sub