单选题 运行如下程序
Private Sub Command l_Click0
Dim a(5,5) As Integer
For i = 1 To 5
For j = 1 To 4
a(i,j) = i * 2 + j
If a(i,j)/7=a(i, j)/7 Then
n=n+l
End If
Next j
Next
Print n
End Sub
n的值是______。
【正确答案】 B
【答案解析】[解析] VB中“/”是浮点除法运算符，“/”是整数除法运算符，程序中的条件表达式a(i,j)/7=a(i,j)/7成立时说明这个数能够被7整除，程序实现的功能即是统计这个二维数组中能被7整除的数的个数。数组元素值在i=1时为(3,4,5,6)，i=2时为(5,6,7,8)，i=3时为(7,8,9,10)，i=4时为(9,10,11,12)，i=5时为(11,12,13,14)，其中能够被7整除的数有7、7、14共3个。因此答案为B。