填空题

设有如下程序：
Private Sub Command1_Click( )
Dim sum As Double，a As Double
Sum=0
n=1
For i=1 To 5
a=n*i
n=n+1
sum=Sum+a
Next i
End Sub
该程序通过For循环来计算一个表达式的值，这个表达式的值是______。

【参考答案】

55
<上一题 目录 下一题>
热门 试题

填空题
有如下用户定义类型及操作语句： Type Teacher TNo As String TName AS Strxng IAge As Integer End Type Dim Tea AS Teacher With Tea ．TNO= 20080001 ．TName= 张三 ．IAge=32 End With 执行MsgBox Tea.TNaiqle后，消息框的输出结果是______。
填空题
设有如下窗体单击事件过程： Private Sub Form Click( ) x=1 For i=1 To 3 Select Case i Case 1,3 x=x+3 Case 2,4 x=x-2 End Select Next i MsgBox x End Sub 打开窗体运行后，单击窗体，则消息框的输出结果是______。
相关试题