填空题

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

【参考答案】

J

<上一题目录下一题>

热门试题

填空题

我国古代数学家张丘建在其著名的《算经》中提出了百鸡问题：每只公鸡5元，每只母鸡3元，三只雏鸡1元；如何用100元买100只鸡，即公鸡、母鸡、雏鸡各多少只。请在空白处填入适当的内容，将程序补充完整。Private Sub Commandl_Click()Dim Cock As IntegerDim Hen As IntegerDim Chick As IntegerForml．Print“公鸡数”，“母鸡数”，“雏鸡数”For Cock；0 To 20For Hen=0 To 33For Chick=0 To 100If 【】ThenForm1．Print Cock，Hen，ChickEnd IfNext ChickNext HenNext CockEnd Sub

填空题

我国古代数学家张丘建在其著名的《算经》中提出了百鸡问题：每只公鸡5元，每只母鸡3元，三只雏鸡1元；如何用100元买100只鸡，即公鸡、母鸡、雏鸡各多少只。请在空白处填入适当的内容，将程序补充完整。Private Sub Commandl_Click()Dim Cock As IntegerDim Hen As IntegerDim Chick As IntegerForml．Print“公鸡数”，“母鸡数”，“雏鸡数”For Cock；0 To 20For Hen=0 To 33For Chick=0 To 100If 【】ThenForm1．Print Cock，Hen，ChickEnd IfNext ChickNext HenNext CockEnd Sub

相关试题