InputBox函数的返回值类型是

试卷相关题目

• 1若变量i的初值为8,则下列循环语句中循环体的执行次数为Do While i<=17i=i+2Loop

  A.3次

  B.4次

  C.5次

  D.6次

  开始考试点击查看答案
• 2下列变量名中，合法的是

  A.4A

  B.A-1

  C.ABC_1

  D.private

  开始考试点击查看答案
• 3要将一个数字字符串转换成对应的数值，应使用的函数是

  A.Val

  B.Single

  C.Asc

  D.Space

  开始考试点击查看答案
• 4在报表中，要计算“数学”字段的最低分，应将控件的“控件来源”属性设置为

  A.=Min（[数学]）

  B.=Min（数学）

  C.=Min[数学]

  D.Min（数学）

  开始考试点击查看答案
• 5因修改文本框中的数据而触发的事件是

  A.Change

  B.Edit

  C.Getfocus

  D.LostFocus

  开始考试点击查看答案
• 6下列能够交换变量X和Y值的程序段是

  A.Y=X:X=Y

  B.Z=X:Y=Z:X=Y

  C.Z=X:X=Y:Y=Z

  D.Z=X:W=Y:Y=Z:X=Y

  开始考试点击查看答案
• 7窗体中有命令按钮Commandl,事件过程如下：Public Function f（x As Integer） As IntegerDim y As Integerx=20y=2f=x*yEnd FunctionPrivate Sub Commandl_Click（）Dim y As IntegerStatic x As Integerx=10y=5y=f（x）Debug .Print x;yEnd Sub运行程序，单击命令按钮，则立即窗口中显示的内容是

  A.10 5

  B.10 40

  C.20 5

  D.20 40

  开始考试点击查看答案
• 8窗体中有命令按钮Commandl和文本框Text1,事件过程如下：Function result（ByVal x As Integer）As BooleanIf ×Mod 2=0 Thenresult=TrueElseresult=FalseEnd IfEnd FunctionPrivate Sub Commandl_Click（）x=Val（InputBox（“请输入一个整数”））If______ ThenText1=Str（x）&amp;“是偶数.”ElseText1=Str（x）&amp;“是奇数.”End  IfEnd Sub运行程序，单击命令按钮，输入19,在Text1中会显示“19是奇数”.那么在程序的空白处应填写

  A.result（x）=“偶数”

  B.result（x）

  C.resuIt（x）=“奇数”

  D.NOT result（x）

  开始考试点击查看答案
• 9窗体有命令按钮Commandl和文本框Textl,对应的事件代码如下：Private Sub Commandl_Click（  ）For  i=1  To  4x=3For j=1 To 3For k=1 To 2x=x+3Next kNext jNext iText1 .Value=Str（x）End Sub运行以上事件过程，文本框中的输出是

  A.6

  B.12

  C.18

  D.21

  开始考试点击查看答案
• 10窗体中有命令按钮run34,对应的事件代码如下：Private Sub run34_Enter（）Dim num As Integer,a As Integer,b As Integer,i As IntegerFor i=1 To 10num=InputBox（“请输入数据：”,“输入”）If Int（num/2）=num/2 Thena=a+1Elseb=b+1End IfNext iMsgBox（“运行结果：a=”&amp;Str（a）&amp;“,b=”&amp;Str（b））End Sub运行以上事件过程，所完成的功能是

  A.对输入的10个数据求累加和

  B.对输入的10个数据求各自的余数，然后再进行累加

  C.对输入的10个数据分别统计奇数和偶数的个数

  D.对输入的10个数据分别统计整数和非整数的个数

  开始考试点击查看答案