在窗体上画一个名称为Text1的文本框,然后编写如下代码: Option Base 1 Private Sub Form Click() Dim arr Dim Start As Integer, Finish As

admin2013-01-23  37

问题 在窗体上画一个名称为Text1的文本框,然后编写如下代码:    Option Base 1    Private Sub Form Click()       Dim arr        Dim Start As Integer,  Finish As Integer       Dim Sum As Integer       arr = Array(12,  4,  8,  16)       Start = LBound (arr)       Finish = UBound (arr)       Sun = 0       For i = Start To Finish             Sum = Sum + arr(i)       Next i       c = Sum/Finish       Text1.Text = c    End Sub程序运行后,单击窗体,则在文本框中显示的内容是______。

选项 A、40
B、10
C、12
D、16

答案B

解析
转载请注明原文地址:https://jikaoti.com/ti/LcO0FFFM
0

最新回复(0)