填空题

执行下面的程序段,x的值为【 】。   Private Sub Command1_Click()    For i=1 To 9      a=a + i    Next i    x=Val(i)    MsgBox x   End Sub

【参考答案】

J