2. 计算机
  3. 在窗体中添加1个命令按钮(其Name属性为Command1)和1个标签(其Name属性为Lable1)，然后编写如下代码： Private Sub Commandl_Cliek() Dim arrayl(10, 10)As Integer

在窗体中添加1个命令按钮(其Name属性为Command1)和1个标签(其Name属性为Lable1)，然后编写如下代码： Private Sub Commandl_Cliek() Dim arrayl(10, 10)As Integer

admin2010-03-30  34
问题 在窗体中添加1个命令按钮(其Name属性为Command1)和1个标签(其Name属性为Lable1)，然后编写如下代码：    Private Sub Commandl_Cliek()    Dim arrayl(10, 10)As Integer    Dim i, j, Sum AsInteger       Sum＝0    For i=1 To 10    Forj=1 To 10       arrayl(i, j)=i+j    Nextj    Next i    End Sub    此程序的功能是求数组arrayl主对角线元素的和，并把结果显示在标签中，为实现此功能，省略号处的程序段应该是    (    )
选项 A、For i=1 To 10  For j=1 To 10      If i=j Then          Sum = Sum+ arrayl (i,j)          End If      Next j   Next i   Labelt. Caption=Sum
B、For i=l TO 10        Forj=1 To 10             If i= =j Then             Sum=Sum+array1 (i,j)             End If        Next j   Next i   Labell. Caption=Sum
C、For i=1 To 10        For j=1 To l0              If i=j Then              Sum=Sum+arrayl (i,j)              End If        Next i        Next j        Lahell. Caption=Sum
D、For i=1 To 10         For j=1 To l0                If i=j Then                Sum=arrayl (i,j)                End If         Next j         Next i         Labell. Caption=Sum
答案1
解析 选项B中条件表达式i＝ =j有误，在VB中表示i等于j，应写成i＝j。排除选项B。选项C中的For......Next语句使用有误，内层应该是Next j，外层为Next i。选项D中的求和语句有误。应为Sum＝ Sum+array1(i，j)。只有A项是正确的。
转载请注明原文地址:https://jikaoti.com/ti/XFq0FFFM
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)