visual basic期末试题.docx

1VisualBasic期末试题一、填空题1VisualBasic用于开发环境下的应用程序。2一个工程可以包括多种类型的文件，其中，扩展名为.vbp的文件表示文件；扩展名为.frm的文件表示文件；扩展名为.bas的文件表示文件；包含ActiveX控件的文件扩展名为。3对象时代码和数据的集合，例如，VisualBasic中的、等都是对象。4对象的方法用于。当方法不需要任何参数并且也没有返回值时，调用对象的方法的格式为。例如对窗体Form1使用Show方法，应写成。5VisualBasic的控件通常分为三种类型，即、和。其中，不能从工具箱中删除。6若A=20，B=80，C=70，D=30，则表达式A+B160Or(B*C200AndNotD60)的值是。7关系式-5X5所对应的布尔表达式是。8X是小于100的非负数，对应的布尔表达式是。9闰年的条件是：年号（Y）能被4整除。但不能被100整除；或者年号能被400整除。表示该条件的布尔表达式是：。10Timer控件的属性决定该控件是否对时间的推移做响应。将该属性设置为False会关闭Timer控件，设置为True则打开它。11在VisualBasic的转换函数中将数值转换为字符串的函数是；将数字字符串转换为数值的函数是；将字符转换为相应的ASCII码的函数是。12数学式子Sin300写成VisualBasic表达式是。13VisualBasic程序开发的三种模式是、和。14要清除组合框Combo1中的所有内容，可以使用的语句是。15使控件获得焦点的方法是。二、选择题1保存新建的工程时，默认的文件夹是（）A、MyDocumentB、VB98C、D、Windows2下列不是字符串常量的是（）A、你好B、C、TrueD、#False#3下列叙述中不正确的是（）A、你好B、C、TrueD、#False#4下列叙中不正确的是（）A、变量名中的第一个字符必须是字母B、变量名的长度不超过255个字符C、变量年名可以包含小数点或者内嵌的类型声明字符D、变量名不能使用关键字5以下可以作为VisualBasic变量名的是（）A、SINB、CO1C、COS（X）D、X（-1）6表达式52Mod2522的值是（）A、1B、0C、6D、47表达式25.28Mod6.99的值是（）A、1B、5C、4D、出错8表达式Int(-17.8)+Abs(17.8)的值为（）A、18B、-17C、-18D、-169表达式Abs(-5)+Len(ABCDE)的值为（）A、5ABCDEB、-5ABCDEC、10D、010代数式dcba对应的VisualBasic表达式是（）A、a/b+c/dB、a/(b+c)/dC、(a/b+c)/dD、a/(b+c/d)11.在一个语句行内写多条语句时，语句之间应该用（）分隔。A、逗号B、分号C、顿号D、冒号12在代码编辑器中，如果一条语句太长，无法在一行内写下（不包括注释），要折行书写，可以在行末使用续行字符（），表示下一行是当前行的继续。A、一个空格加一个下划字符（_）B、一个下划字符（_）C、直接回车D、一个空格加一个连字符(-)13如果要在文本框中键入字符时，只显示某个字符，如星号（*）,应设置文本框的（）属性。A、CaptionB、PasswordCharC、TextD、Char14如果将文本框的（）属性设置为True，则运行时不能对文本框中的内容进行编辑。A、LockedB、MultiLineC、TabStopD、Visible15.如果Tab函数的参数小于1，则打印位置在第（）列。A、0B、1C、2D、316下列程序段（）能够正确实现条件：XY,则A=15，否则A=-15。A、IfXYThenA=15A=-15PrintAB、IfXYThenA=15:PrintAA=-15:PrintAC、IfXYThenA=15:PrintAElseA=-15:PrintAD、IfX60ThenI=1ElseIfA70ThenI=2ElseIfA80ThenI=3ElseIfA90ThenI=4EndIfPrintI=;IA、I=1B、I=2C、I=3D、I=418.下列程序段的执行结果为（）I=0ForG=10To19Step3I=I+1NextGPrintIA、4B、5C、3D、619下列程序段的执行结果为（）N=0J=1DoUntilN2N=N+1J=J+N*(N+1)LoopPrintN;JA、01B、37C、321D、31320下列程序段的执行结果为（）4N=0ForI=1To3ForJ=5To1Step-1N=N+1NextJ,IPrintN;J;IA、1204B、1504C、1231D、1531三、编程题1编写程序，计算1+2+3+4+100。2写出下列语句的输出结果：SubForm_Click（）A=10:b=15:c=20:d=25PrintA;Spc(5);b;Spc(7);cPrintA;Spc(8);b;Space$(5);cPrintc;Spc(3);+;Spc(3);d;PrintSpc(3);=;Spc(3);c+dEndSub3创建一个登录界面，由两个标签（Label1、Labe12）和两个文本框（txtName、txtPassword）组成。其中，口令文本框（txtPassword）的PasswordChar属性设置为“*”，运行时要求输入姓名和密码，如果在两个文本框中分别输入“Guest：”和“12345”，则界面显示“欢迎使用本系统！”，否则显示“对不起，你不是本系统用户！”。4输入一个数字（06），用中英文显示星期几。应用程序用户界面如下：参考答案一、填空题1Windows2工程窗体标准模块.OCX3窗体控件菜单4完成某种特定的功能对象名.方法名Form1.Show5内部控件（标准控件）Active控件可插入对象内部控件6True7X=-5And=58X=09YMod4=0AndYMod1000OrYMod400=010Enabled11Str$(x)Val(x$)Asc(x$)12Sin(30*3.14/180)13设计模式运行模式中断模式14Combo1.Clear15SetFocus二、选择题1B2D3D4C5B6A7C8B9C10D11D12A13B14A15B16C17B18A19A20B三、编程题1解答：使用For循环语句，程序如下：PrivateSubForm_Click()StaticSumAsIntegerForI=1To100Sum=Sum+INextIPrintSumEndSub程序运行后，单击窗体，输出结果为：5050。如果使用当循环语句，则程序如下：PrivateSubForm_Click()StaticSumAsIntegerI=1Whilei=100Sum=Sum+II=I+1WendPrintSumEndSub2解答：10152010152020+25=453解答：程序代码如下：PrivateSubcmdExit_Click()EndEndSubPrivateSubcmdOK_Click()IftxtName=GuestAndTxtPassword=12345ThenMsgBox欢迎使用本系统！,vbOKOnly,输入ElseMsgBox对不起，你不是本系统用户！,vbOKOnly,输入EndIfEndSub4解答：程序如下：PrivateSubCommand1_Click()DimnAsInteger,mAsStringn=(Text1.Text)SelectCasenCase1m=星期一(Mo