VB程序 打印1~100所有数的平方,平方根,自然对数,e指数的数学用表在文本框中
1个回答
展开全部
Private Sub Command3_Click()
Dim s As String
s = ""
For i = 1 To 100
s = s & i & "^2=" & i ^ 2 & " sqrt(" & i & ")=" & Sqr(i) & " e^" & i & "=" & Exp(i) & vbCrLf
Next i
Text1.Text = s
End Sub
本回答被网友采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询