搜索
1．下列不能打开属性窗口的操作是（）。A）执行“视图”菜单中的“属性窗口”命令B）按F4键C）按Ctrl+TD）单击工具栏上的“属性窗口”按钮。2．下列可以打开立即窗口的操作是（）。A）Ctrl+DB）Ctrl+EC）Ctrl+FD）Ctrl+G3．InputBox函数返回值的类型为（）。A）数值B）字符串C）变体D）数值或字符串（视输入的数据而定）4．可以同时删除字符串前导和尾部空白的函数是（）。A）LtrimB）RtrimC）TrimD）Mid5．表达式4+56*7/8Mod9的值是（）。A）4B）5C）6D）76．如果在立即窗口中执行以下操作：a=8CR（CR是回车键，下同）b=9CRprintabCR则输出结果是（）。A）-1B）0C）FalseD）True7．以下语句的输出结果是（）。PrintFormat$(32548.5,“000,000.00”)A）32548.5B）32,548.5C）032,548.50D）32,548.508．执行以下程序段后，变量c$的值为（）。a$=VisualBasicProgramingb$=Quick”c$=b$&UCase(Mid$(a$,7,6))&Right$(a$,11)A）VisualBASICProgramingB）QuickBasicProgramingC）QUICKBasicProgramingD）QuickBASICPrograming9．为了在按下回车键时执行某个命令按钮的事件过程，需要把该命令按钮的一个属性设置为True，这个属性是（）。A）ValueB）DefaultC）CancelD）Enabled10．为了把焦点移到某个指定的控件，所使用的方法是（）。A）SetFocusB）VisibleC）RefreshD）GetFocus11．设a=6，则执行x=IIf(a5,-1,0)后，x的值为（）。A）5B）6C）0D）-112．执行下面的程序段后，x的值为（）。x=5Fori=1To20Step2x=x+i5NextiA）21B）22C）23D）2413．在窗体上画一个命令按钮，然后编写如下事件过程：PrivateSubCommand1_Click()Fori=1To4x=4Forj=1To3 x=3Fork=1To2x=x+6NextkNextjNextiPrintxEndSub程序运行后，单击命令按钮，输出结果是（）。A）7B）15C）157D）53814．在窗体上画一个命令按钮，然后编写如下事件过程：PrivateSubCommand1_Click()x=0DoUntilx=-1a=InputBox(“请输入A的值”)a=Val(a)b=InputBox(“请输入B的值”)b=Val(b)x=InputBox(“请输入x的值”)x=Val(x)a=a+b+xLoopPrintaEndSub程序运行后，单击命令按钮，依次在输入对话框中输入5、4、3、2、1、-1，则输出结果为（）。A）2B）3C）14D）1515．在窗体（Name属性为Form1）上画两个文本框（其Name属性分别为Text1和Text2）和一个命令按钮（Name属性为Command1），然后编写如下两个事件过程：PrivateSubCommand1_Click()a=Text1.Text+Text2.TextPrintaEndSubPrivateSubForm_Load()Text1.Text=Text2.Text=Endsub程序运行后，在第一个文本框（Text1）和第二个文本框（Text2）中分别输入123和321，然后单击命令按钮，则输出结果为（）。A）444B）321123C）123321D）13223116．阅读下面的程序段：Fori=1To3Forj=1ToiFork=jTo3a=a+1NextkNextjNexti执行上面的三重循环后，a的值为（）。A）3B）9C）14D）2117．在窗体上画一个文本框（其中Name属性为Text1），然后编写如下事件过程：PrivateSubForm_Load()Text1.Text=Text1.SetFocusFori=1To10Sum=Sum+iNextiText1.Text=SumEndSub上述程序的运行结果是（）。A）在文本框Text1中输出55B）在文本框Text1中输出0C）出错D）在文本框Text1中输出不定值18．在窗体上画两个文本框（其Name属性分别为Text1和Text2）和一个命令按钮（其Name属性为Command1），然后编写如下事件过程：PrivateSubCommand1_Click()x=0DoWhilex50x=(x+2)*(x+3)n=n+1LoopText1.Text=Str(n)Text2.Text=Str(x)EndSub程序运行后，单击命令按钮，在两个文本框中显示的值分别为（）。A）1和0B）2和72C）3和50D）4和16819．用下面语句定义的数组的元素个数是（）。DimA(-3To5)AsIntegerA）6B）7C）8D）920．以下程序的输出结果是（）。OptionBase1PrivateSubCommand1_Click()Dima(10),p(3)AsIntegerk=5Fori=1To10a(i)=iNextiFori=1To3p(i)=a(i*i)NextiFori=1To3k=k+p(i)*2NextiPrintkEndsubA）33B）28C）35D）3721．在窗体上画一个命令按钮，然后编写如下事件过程：OptionBase1PrivateSubCommandl_Click()Dimaa=Array(1,2,3,4)j=1Fori=4ToStep-1s=s+a(i)*jj=j*10NextiPrintsEndSub运行上面的程序，单击命令按钮，其输出结果是（）。A）4321B）12C）34D）123422．在窗体上画一个命令按钮（其Name属性为Commandl），然后编写如下代码：OptionBase1PrivateSubCommandl_Click()Dima(4,4)Fori=1To4Forj=1To4a(i,j)=(i-1)*3+jNextjNextiFori=3To4Forj=3To4Printa(j,i);NextjPrintNextiEndSub程序运行后，单击命令按钮，其输出结果为（）。A）69B）7107 10811C）811D）912912101323．假定有如下的Sub过程：SubS（xAsSingle,yAsSingle）t=xx=t/yy=tModyEndSub在窗体上画一个命令按钮，然后编写如下事件过程：PrivateSubCommandl_Click()DimaAsSingleDimbAsSinglea=5b=4Sa,bPrinta,bEndSub程序运行后，单击命令按钮，输出结果为（）。A）54B）11C）1.254D）1.25124．阅读程序：FunctionF(aAsInteger)b=0Staticcb=b+1c=c+1F=a+b+cEndFunctionPrivateSubCommandl_Click()DimaAsIntegera=2Fori=1To3PrintF(a)NextiEndSub运行上面的程序，单击命令按钮，输出结果为（）。A）4B）4C）4D）44567468925．阅读程序：SubsubP(b()AsInteger)Fori=1To4b(i)=2*iNextiEndSubPrivateSubCommandl_Click()Dima(1To4)AsIntegera(1)=5a(2)=6a(3)=7a(4)=8subPa()Fori=1To4Printa(i)NextiEndSub运行上面的程序，单击命令按钮，输出结果为（）。A）2B）5C）10D）出错46126714881626．下列不能打开菜单编辑器的操作是（）。A）按Ctrl+EB）单击工具栏中的“菜单编辑器”按钮C）执行“工具”菜单中的“菜单编辑器”命令D）按Shift+Alt+M27．假定有一个菜单项，名为MenuItem，为了在运行时使该菜单项失效（变灰），应使用的语句为（）。A）MenuItem.Enabled=FalseB）MenuItem.Enabled=TrueC）MenuItem.Visible=TrueD）MenuItem.Visible=False28．在程序运行期间，如果拖动滚动条上的滚动块，则触发的滚动条事件是（）。A）MoveB）ChangeC）ScrollD）GetFocus29．假定窗体上有一个标签，名为Labell，为了使该标签透明并且没有边框，则正确的属性设置为（）。A）Label1.BackStyle=0Label1.Borderstyle=0B）Label1.BackStyle=1Label1.Borderstyle=1C）Label1.BackStyle=TrueLabel1.BorderStyle=TrueD）Label1.BackStyle=FalseLabel1.Borderstyle=False30．在窗体上画一个列表框和一个文本框，然后编写如下两个事件过程：PrivateSubForm_Load()List1.AddItem357List1.AddItem246List1.AddItem123Listl.AddItem456Text1.Text=EndSubPrivateSubList1_DblClick()a=List1.TextPrinta+Text1.TextEndSub程序运行后，在文本框中输入“789”（见图附录-1），然后双击列表框中的“456”，则输出结果为（）。图附录-1A）1245B）456789C）789456D）031．为了暂时关闭计时器，应把该计时器的某个属性设置为False，这个属性是（）。A）VisibleB）TimerC）EnabledD）Interval32．为了把一个记录型变量的内容写入文件中指定的位置，所使用的语句的格式为（）。A）Get文件号，记录号，变量名B）Get文件号，变量名，记录号C）Put文件号，变量名，记录号D）Put文件号，记录号，变量名33．对窗体编写如下事件过程：PrivateSubForm_MouseDown(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle)IfButton=2ThenPrintAAAAAEndIfEndSubPrivateSubForm_MouseUp(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle)PrintBBBBBEndSub程序运行后，如果右击鼠标，则输出结果为（）。A）AAAAAB）BBBBBBBBBBC）AAAAAD）BBBBBAAAAA34．为了在运行时能显示窗体左上角的控制框（系统菜单），必须（）。A）把窗体的Contro1Box属性设置为False，其他属性任意B）把窗体的ControlBox属性设置为True，并且把BoderStyle属性设置为1-5C）把窗体的ControlBox属性设置为False，同时把BoderStyle属性调协为非0值D）把窗体的ControlBox属性设置为True，同时把BoderStyle属性设置为0值35．对窗体编写如下代码：OptionBase1PrivateSubForm_KeyPress(KeyAsciiAsInteger)a=Array(237,126,87,48,498)m1=a(1)m2=1IfKeyAscii=13ThenFori=2To5Ifa(i)mlThenm1=a(i)m2=iEndIfNextiEndIfPrintm1Printm2EndSub程序运行后，按回车键，输出结果为（）。A）