vb试题和答案

vb试题和答案

ID:19541326

大小:151.50 KB

页数:9页

时间:2018-10-03

vb试题和答案_第1页
vb试题和答案_第2页
vb试题和答案_第3页
vb试题和答案_第4页
vb试题和答案_第5页
资源描述:

《vb试题和答案》由会员上传分享,免费在线阅读,更多相关内容在行业资料-天天文库

1、一、单选题(每题1分)(1)下面A是合法的变量名。A、X_yzB、123abcC、integerD、X-Y(2)InputBox函数返回值的类型为___A___。A、字符串B、变体C、数值D、不确定(3)使一个控件不可见,应设置其_B__属性。A、EnableB、VisibleC、FontD、BackColor(4)要想从子过程调用后返回两个结果,下面子过程语句说明合法的是__B__A、Subf(ByVala%,ByValb%)B、Subf(a%,b%)C、Subf(ByVala%,b%)D、Subf(a%,ByValb%)(5)

2、窗体从加载到显示时,将会发生一系列的事件,最先发生的事件是_A_。A、Initialize      B、LoadC、Activate      D、Resize(6)在窗体上画1个文本框,其名称为Text1,然后编写如下过程:  PrivateSubText1_KeyDown(KeyCodeAsInteger,ShiftAsInteger)  PrintChr(KeyCode)  EndSub  PrivateSubText1_KeyUp(KeyCodeAsInteger,ShiftAsInteger)  PrintChr(Ke

3、yCode+2)  EndSub  程序运行后,把焦点移到文本框中,此时如果敲击“A”键,则输出结果为(B)。  A)AB)AC)AD)A  ACBD(7)字符串x$中从第一个非空格字符开始数起,取第3个字符及其后所有字符构成的字符串的VB表达式。A、Mid(x$,1,3)B、Mid(Trim(x$),3)C、Left(x$,3)D、Left(Trim(x$),3)(8)通用对话框控件的属性Fiter表示___B_____.A、路径名B、文件类型C、文件主名D、文件扩展名(9)通过文本框的__A__方法可以将焦点移到指定的对象上。

4、A、SetFocusB、KeyPressC、GotFocusD、LostFocus(10)假定已定义了一个过程SubAdd(aassingle,bassingle),则正确的调用语句是__A__.A、Add12,12B、CallAdd[12,12]C、CallAddx,yD、CallAdd(12,12,x)(11)以下哪个选项可用来获得列表框中最高项的索引值?___C____。A、SortB、CountC、ListCount-1D、ListCount(12)如果用长整数&H000000FF&来表示颜色,则此颜色为__A___。A.

5、红色B.黄色C.蓝色D.绿色(13)下列关系运算结果为“True”的是____C_____。A.“1”+2=“12”B.“1”+“2”=“3”C.“1”&2=“12”D.“1”&“2”=“3”(14)在VB中,要将一个窗体从内存中释放,应使用的语句是_D_。A.ShowB.HideC.LoadD.Unload(15)在用通用对话框控件弹出“打开”或“保存”文件对话框时,如果需要指定文件列表框所列出的文件类型是文本文件(即.txt文件),则正确的描述格式是__A_。A、”text(*.txt)

6、*.txt”     B、”文本文件(

7、.txt)

8、.txt”C、”text(.txt)

9、

10、(*.txt)”   D、”text(.txt)(*.txt)”(16)枚举的第l个常数的默认值是BA、1B、0C、TrueD、False(17)下列哪一种对象不具有Caption属性?(B)A.FormB.PictureBoxC.LabelD.Frame(18)对于TextBox控件,哪一种事件可以测得KeyAskii值?CA.KeyUpB.KeyDownC.KeyPressD.Click(19)当文本框的ScrollBars属性设置了非零值,却没有显示滚动条,原因是__B__

11、_。A.文本框中没有内容B.文本框的MultiLine属性为FalseC.文本框的MultiLine属性为TureD.文本框的Locked属性为Ture(20)如果要制作菜单的分隔栏,应选用的字符是___C__。A.*B.^C.-D.~二、填空题(每空2分,共20分)(1)下面的程序段是检查输入的算术表达式中圆括号是否配对,并显示相应的结果,本程序在文本框中输入表达式,边输入,边统计,以输入回车符作为表达式输入结束,然后显示结果,界面如图1所示。图1运行界面Dimcount1%PrivateSubText1_KeyPress(Ke

12、yAsciiAsInteger)Ifchr(keyascii)=”(”Thencount1=count1+1ElseIfChr(KeyAscii)=")"Thencount=count-1EndIfIfKeyAscii=13ThenIfcount=

当前文档最多预览五页,下载文档查看全文

此文档下载收益归作者所有

当前文档最多预览五页,下载文档查看全文
温馨提示:
1. 部分包含数学公式或PPT动画的文件,查看预览时可能会显示错乱或异常,文件下载后无此问题,请放心下载。
2. 本文档由用户上传,版权归属用户,天天文库负责整理代发布。如果您对本文档版权有争议请及时联系客服。
3. 下载前请仔细阅读文档内容,确认文档内容符合您的需求后进行下载,若出现内容与标题不符可向本站投诉处理。
4. 下载文档时可能由于网络波动等原因无法下载或下载错误,付费完成后未能成功下载的用户请联系客服处理。