设有如下程序: Private Sub Form_Click() Dim a As Integer,S As Integer n=8:S=0 Do S=S+n:n=n-1 Loop While n>0 Print S End Sub 以上程序的功能是计算1-8的和。程序运行后,单击窗体,输出结果为 (10) 。
主观题
设有如下程序: Private Sub Form_Click() Dim a As Integer,S As Integer n=8:S=0 Do S=S+n:n=n-1 Loop While n>0 Print S End Sub 以上程序的功能是计算1-8的和。程序运行后,单击窗体,输出结果为 (10) 。