Question

在vba的用户窗体中,有一个文本框textbook1有一个命令按钮commandbutton1.要

在vba的用户窗体中,有一个文本框textbook1有一个命令按钮commandbutton1.要求单击时用循环计算1*2*3····*10的结果，并在文本框textbook1中显示，写出相应的事件代码，要求变量必须先定义后使用。

Answer 1

Sub CommandButton1_Click()
Dim I As Integer, XX As Long   '定义变量
XX = 1    '给变量XX赋初值
For I = 1 To 10    '循环
    XX = XX * I    '用循环计算1*2*3····*10的结果
Next I   '循环出口
TextBook1.Text = XX    '在文本框TextBook1中显示
End Sub

Answer 2

同学，你也交卷了吧？

sub commandbutton1_click()
dim i as integer,QQ as Long
QQ=1
for i = 1 to 10    
    QQ=QQ * i
next i 
textbook1.text=QQ
end sub

追问

还好还好

追答

采纳了吧，下次说不定还考这题目哦。