已知一窗体上命令按钮Command1的Click事件代码如下，则单击Command1后，文本显示的文字为（）。 PrivateSubCommand1_Click（） Text1.Text="湖南省"&"计算机"+"等级考试" Text1.ForeColor=vbRed Text1.BackColor=vbGreen Text1.FontBold=True EndSub
已知一命令按钮的单击事件的代码如下，第一次单击该按钮输出的值为2，第三次单击该按钮输出的值为（）。 PrivateSubCommand1_Click（） StaticStu（3）AsInteger ForI=2To3 Stu（I）=Stu（I）+I NextI PrintStu（2）； EndSub
某人编写编写了下面的程序，希望能把Text1文本框中的内容写到out.txt文件中：PrivateSubCommand1_Click()Openout.txtForOutputAs#2PrintText1Close#2EndSub调试时发现没有达到目的，为实现上述目的，应做的的修改是（）
设有如下Command1的单击事件过程及fun过程：PrivateSubCommand1_Click()DimxAsIntegerx=Val(InputBox(请输入一个整数))fun(x)EndSubPrivateSubfun(xAsInteger)IfxMod2=0Thenfun(x/2)Printx;EndSub执行上述程序，输入8，结果是___________。
窗体上有文本框Text1、Text2和命令按钮Command1，编写如下事件过程：PrivateSubCommand1_Click()Ifval(Text1.Text)<=3thenText2.Text=“h”ElseText2.Text=“i”EndIfEndSub当用户在文本框Text1中输入6，并单击Command1，则文本框Text2中显示（）。
有下面程序代码：PrivateSubCommand1_Click()a=Array(2,3,4,5,6,7,8,9,10,11)n=UBound（A）Fork=0ToUBound（A）/2Printa(k)*a(n);n=n-1NextkEndSub程序运行后，单击命令按钮Command1，输出结果是___________。（5.0分）
窗体上有一命令按钮Command1，编写以下事件过程：PrivateSubCommand1_Click()a=100:b=150:c=2000:d=2000ClsLine(a,b)-(c,d),,BEndSub运行时，单击命令按钮窗体上显示（）。
编写如下程序：PrivateSubCommand1_Click()DimscoreAsIntegerscore=90Ifscore>80Thenr=5ElseIfscore>60Thenr=3Elser=1EndIfPrintrEndSub程序运行后，单击命令按钮Command1，输出结果为（______）。（5.0分）
窗体上有一个命令按钮Command1，编写如下事件过程：PrivateSubCommand1_Click()Fori=1to4Forj=4to8sum=sum+1NextjNextiPrintsumEndSub运行时，单击按钮，输出结果是（）。
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程：PrivateSubCommand1_Click()DimiAsInteger,nAsIntegerFori=0To50i=i+5n=n+1Ifi>30ThenExitForNextText1.Text=Str(n)EndSub程序运行后，单击命令按钮，在文本框中显示的值是______。（5.0分）
窗体上有一命令按钮Command1，编写以下事件过程:PrivateSubCommand1_Click()a=200:b=200:c=2000:d=2000ClsLine(a,b)-(c,d),vbBlue,BFEndSub运行时，单击按钮，窗体上显示（）。
设有如下通用过程：PublicFunctionf(xAsInteger)DimyAsIntegerx=30y=8f=x*yEndFunction在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程PrivateSubCommand1_Click()StaticxAsIntegerx=15y=6y=f(x)Printx;yEndSub程序运行后，如果单击命令按钮，则在窗体上显示的内容是_____。
单击按钮Command1，下列代码执行的结果是（）。PrivateSubCommand1_Click()Callpro(3)EndSubPrivateSubpro(bAsInteger)MsgBoxb*bEndSub
在窗体上画一个命令按钮，然后编写如下程序：privatesubcommand1_click()forj=1to11j=j+1n=n+1nextjPrint"n=";nendsub程序运行后单击命令按钮，N的值是()
有如下的程序：PrivateSubCommand1_Click()DimxAsInteger,yAsIntegera=8b=3Calltest(6,a,b+1)Print"主程序";6;a;bEndSubSubtest(xAsInteger,ByValyAsInteger,ByValzAsInteger)Print"子程序";x;y;zx=2y=4z=3EndSub当单击Command1后，运行程序显示的结果是()
已知一窗体上命令按钮Command1的Click事件代码如下，则单击Command1后，文本显示的文字为（）。PrivateSubCommand1_Click（）Text1.Text="湖南省"&"计算机"+"等级考试"Text1.ForeColor=vbRedText1.BackColor
请输入B的值在窗体上画一个命令按钮，然后编写如下事件过程：PrivateSubCommand1_Click（)x=0DoUntilx=－1a=InputBox（"请输入A的值")a=Val（a)b=InputBox（"请输入B的值")b=Val（b)x=InputBox（"请输入x的值")x=Val（x)（)
下面程序运行后，输出的值是（）。PrivateSubCommand1_Click（） J=1WhileJ＜5 J=J+1 A=A+J*J WendPrintAEndSub
下面程序的输出结果为()PrivateSubCommand1_Click()Dima%(1To5),b%(2To10),i%,t1,t2Fori=1To5a(i)=iNextit1=tim(a())Print"t1=";t1EndSubFunctiontim(a()AsInteger)Dimt,i%t=1Fori=LBound()ToUBound()t=t*a(i)Nextitim=tEndFunction
