执行了下面的程序后，组合框中数据项的值是( )。 PrivateSubForm_Click() Fori=1 To 6 Comb01.Addltem i Nexti Fori=1 To 3 Combol．Removeltem i Nexti End Sub

A．1 5 6

B．1 3 5

C．4 5 6

D．2 4 6

[单选题]在窗体上画一个文本框，然后编写如下事件过程：Private Sub Form_Click（）x = InputBox（"请输入一个整数"）Print x + Text1.TextE．nd Sub程序运行时，在文本框中输入456，然后单击窗体，在输入对话框中输入123，单击“确定”按钮后，在窗体上显示的内容为（ ）。A．123B．456C．479D．123456

[单选题]下面程序运行后，S的值是( )Privatesubform_click()forj=1to10x=j*2-1ifx/3=int(x/3)orx/5=int(x/5)thens=s+xnextjPrint"s=";sendsubA．27B．30C．32D．37

[试题]执行下面的程序段，x的值为[ ]。Private Sub Command1_Click()F．or i=1 To 9a=a+iNextx=Val(i)MsgBox xE．nd Sub

[试题]阅读下面的程序：Private Sub Form_Click（）D．im Check As Boolean, Counter As IntegerC．heck = TrueC．ounter = 5D．oD．o While Counter < 20C．ounter = Counter + 1If Counter = 10 ThenC．heck = FalseE．xit DoE．nd IfLoopLoop Until Check = FalsePrint CounterE．nd Sub程序运行后

[单选题]阅读下面的程序： Private Sub Form_Click() Dim Check， Counter Check=True Counter=0 Do Do While Counter ＜ 20 Counter=Counter + 1 If Counter=10 Then Check = False Exit Do End If Loop Loop Until Check = False Print Counter， Check End Sub 程序运行后，单击窗体，输出的结果为A．15 0B

[单选题]（）方法的功能是向列表框或组合框控件添加一个数据项。A . ShowB . RemoveItemC . HideD . AddItem

[单选题]执行完下面的程序段后，循环执行了（）次。For i=1.7=To 5.9 Step 0.9a=a+1Print aNextIA . 3B . 4C . 5D . 6

[单选题]执行下面的程序后,a的值是（）#define SQR(X) X*Xmain( ){ int a=10,k=2,m=1;a/=SQR(k+m)/SQR(k+m);printf(""%d/n"",a); }A . 10B . 1C . 9D . 0

[单选题]执行下面的程序，消息框里显示的结果是（ ）。A． abeB． abccbaC． cbacbaD． abcabc

[单选题]执行下面的程序后,a的值为main(){ int a,b;for(a=1,b=1; a<=10; a++){if(b%3==1){b+=3;continue; }b-=5; } }A．7B．8C．9D．10