《VisualBasic程序设计》综合练习题(二)及答案

《《VisualBasic程序设计》综合练习题(二)及答案》由会员上传分享，免费在线阅读，更多相关内容在工程资料-天天文库。

1、《VisualBasic程序设计》综合练习题（二）及答案一、单项选择1．键盘事件的执行顺序是（　B　）A．KeyPress、KeyDown、KeyUpB．KeyDown、KeyPress、KeyUpC．KeyUp、KeyDown、KeyPressD．KeyUp、KeyPress、KeyDown2．当需要上下文帮助时，选择要帮助的内容，希望出现MSDN窗口及显示所需的帮助信息，应按的键是（C）。A．HelpB．F10C．F1D．Esc3．下列对象不能响应Click事件的是（D）A、列表框B、图片框C、窗体D、计时器4．在VisualBasic中，变量的默认类型是（

2、B）。A．IntegerB．VariantC．DoubleD．Currency5．WinsockServer.LocalPort=10001语句的含义是（A）。A．设置侦听端口B．设置计算机IP地址C．设置中断地址D．设置通信协议6．要使窗体在运行时不可改变窗体的大小和没有最大化和最小化按钮，只要对下列（B）属性设置就有效。A．MaxButtonB．BorderSyleC．WidthD．MinButton7．如果想让文本框中的内容在运行时不能编辑，需将文本框的（C）属性设置为True。A．TabStopB．MultiLineC．LockedD．Visible8．

3、要设置命令按钮的背景图形，必须设置的两个属性是（D）。A．Value和IconB．Style和IconC．Caption和PictureD．Style和Picture9．在VisualBasic中，变量的默认类型是（　D）。A．IntegerB．DoubleC．CurrencyD．Variant10．如下数组声明语句，正确的是（　D　）。A．Dima[3,4]AsIntegerB．Dima(34)AsIntegerC．Dima(n,n)AsIntegerD．Dima(3,4)AsInteger11．表达式7+10Mod3*2+2（　A）。A．13B．7C．6D．

4、112．不属于VB数据库引擎的是（　B　）。A．ODBC　　　　　B．BDEC．Jet引擎　　　D．OLEDB13．数学式子Sin25°写成VB表达式是（D）。A．Sin25B．Sin（25）C．SIN（25°）D．Sin（25*3.14/180）14．VB程序中设置断点的按键是（　B　）。A．F1键　　B．F9键C．F8键　　D．Ctrl+F8键15．DimIAsInteger，则运行时变量I的初始值是（　A　）。A．0B．1C．-1D．空值二、填空题16．定时器（Timer）控件可识别的事件是Timer，发生该事件的时间间隔由定时器的Interval属性设置

5、。17．一般可使用Const关键字声明常量。18．全局变量在整个应用程序中有效，一般在标准模块中使用Public语句声明。19．一个工程可以包括多种类型的文件，其中，扩展名为.vbp的文件表示工程文件；扩展名为.frm的文件表示窗体文件；扩展名为.bas的文件表示标准模块文件；包含ActiveX控件的文件扩展名为.OCX。20．DimiAsInteger，则运行时变量i的初始值是0。21．数学关系8≤x<30表示成正确的VB表达式为8<=xANDx<30。22．Winsock控件主要用来编制TCP/IP或UDP协议的通话程序。23.如果Winsock1.Loca

6、Port=0,那么应用程序将使用随机端口。三、阅读程序题24.FunctionF(aAsInteger)b=3Staticcb=b+1c=c+1F=a+b+cEndFunctionPrivateSubCommand1_Click()DimaAsIntegera=2Fori=1To3PrintF(a)NextiEndSub写出程序运行时，单击命令按钮在窗体上的输出结果。24.答案：78925.阅读下面的程序，写出单击窗体后的运行结果。SubChange(ByValxAsInteger,ByValyAsInteger)DimtAsIntegert=xx=yy=tPr

7、intx,yEndSubPrivateSubForm_Click()DimaAsInteger,bAsIntegera=3:b=4Changea,bPrinta,bEndSub25.答案：4334四、应用题26.设计一个计算程序，该程序用户界面如图所示，由四个文本框：Text1、Text2、Text3、Text4和三个按钮：Command1、Command2、Command3组成，程序运行后，用户按清除按钮，则清除文本框中显示的内容，按计算按钮，则计算三科平均成绩，单击退出按钮则退出。   PrivateSubCommand1_Click()     Text1

8、.Text=[1]