[單項選擇題] 在窗體上畫一個命令按鈕(其名稱為Command1)，然后編寫如下代碼：

Private Sub Command1_Click()

Dim a

a=Array(1,2,3,4)

i=3:j=1

Do While i＞＝0

s＝s+a(i)*j

i＝i-1

j＝j(luò)*10

Loop

Print S

End Sub

運行上面的程序，單擊命令按鈕，則輸出結(jié)果是( )

A．4321

B．123

C．234

D．1234

D

此程序的作用是將數(shù)組a中a(0)、a(1)、a(2)、a(3)作為千位、百位、十位、個位組成一個新數(shù)，i是數(shù)組的下標(biāo)，作用是依次取a(3)、a(2)、a(1)、a(0)，s=s+a(i)*j的作用是將取到的數(shù)依次放到個位、百位、十位、千位，這是因為j四次循環(huán)的取值分別為1、10、100、1000，所以s四次循環(huán)的取值為4、4+30、34+200、324、324+1000。