当前位置: 答题翼 > 问答 > 计算机类考试 > 正文
目录: 标题| 题干| 答案| 搜索| 相关
问题

设有如下程序:Private Sub Command1_Click()Dim c As Integer d As Integerc=4d=InputBox(“请输


设有如下程序: Private Sub Command1_Click() Dim c As Integer,d As Integer c=4 d=InputBox(“请输入一个整数”) Do While d>0 If d>c Then C=C+1 End lf d=InputBox(“请输入一个整数”) Loop Print c+d End sub 程序运行后,单击命令按钮,如果在输入对话框中依次输入1、2、3、4、5、6、7、8、9、0,则输出结果是

A.12

B.11

C.10

D.9

请帮忙给出正确答案和分析,谢谢!

参考答案
您可能感兴趣的试题
  • 设有如下程序:Private Sub Commandl_click()Dim c As Integer,d As Integerc=4d=InputBox("请输

  • 设有一个命令按钮Command1的事件过程以及一个函数过程,程序如下:Private Sub Command1_Click() S

  • 设有如下程序: Private Sub Cimmandl_Click. Dim sum As Double, x As Double Sum=0 n =0 F

  • 设有如下程序:Private Sub Commandl Click()Dimsum As Double x As D0ublesum=0n=0For i=1 To 5x

  • 设有如下程序:Private Sub Form. Click( ) Dim s As Long f As Long Dim n As Integer i As Int

  • 设有如下程序:Option Base 0Private Sub Form_Click( )Dim aDim i As Integera=Array(1 2 3 4 5