Function fac(n As Integer) As Long
fac = 1
For i = 1 To n
fac = fac * i
Next i
End Function
Private Sub Command1Click()
Dim s As Long, j As Integer
For j = 1 To 10
Next
Text1.Text = Str(s)
End Sub
方框中的正确语句是:( )