[單項選擇題] 下列程序段的執(zhí)行結果為______。

Dim m(3，3)As Integer

Dim i As Integer

Dim j As Integer

Dim x As Integer

For i=1 To 3

m(i，i)=i

Next

For i= 0 To 3

For j= 0 To 3

x=x +m(i，j)

Next

Next

Print x

A． 3 B) 4 C) 5 D) 6

D

通過第一個以i為循環(huán)變量的循環(huán)，令a(1，1)=1，a(2，2)=2，a(3，3)=3。然后通過雙重循環(huán)，求數(shù)組a中所有元素的和并將結果賦值給x，由于在數(shù)組a中除了a(1，1)、a(2,2)和a(3，3)外其他元素都為0，所以x=1+2+3=6。