计算机VB期末测试试题

《计算机VB期末测试试题》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。

1、VB随堂小测题一、选择题1、以下选项中，不属于标签的属性是。A、EnabledB、CaptionC、DefaultD、Font2、要求改命令按钮显示的文本，应当在属性窗口中改变的属性是。A、CaptionB、NameC、TextD、Label3、当执行以下过程时，在窗体上将显示。PrivateSubCommand1_Click()Print"VB";Print"Hello!";Print"VB"EndSubA、VBHello!VBB、VBHello!VBC、VBD、VBHello!VBHello!VB4、下列哪个控件是容器控件。A、ImageB、Picturebox

2、C、ComboBoxD、FileListBox5、双击窗体中的对象后，VisualBasic将显示的窗口是。A.代码窗口　B．工具箱　C．项目（工程）窗口　D．属性窗口6、设置一个单选按钮(OptionButton)所代表选项的选中状态，应当在属性窗口中改变的属性是。A、CaptionB、NameC、TextD、Value二、填空题1、任何控件都有属性。2、在VB中产生一个消息框，则可用语句来实现的。3、与CommonDialog1.Action=4等效的语句是。4、通过设置Line控件中属性可以绘制虚线、点划线等多种样式的直线。5、程序运行工程中，清除MP图片框中

3、的图片应使用语句。6、表达式Int（-18.3)的值是。7、把字符串转换为数值的函数是。8、设置窗体的属性，可在窗体上显示图片。9、设x＝34.58，语句PrintFormat(x,“000.0”)的输出结果是。三、编程阅读题1、执行下面的程序段后，变量i的值为____。Fori=1To3s=s+iNextiPrinti2、如果x=-6，则下面代码显示y的值是。Ifx>0theny=x^2+10Elsey=Abs(x)*10Endif3、下列程序的执行结果是。OptionBase1PrivateSubCommand1_Click()Dima(10)Fori=1to1

4、0a(i)=3*iNextiPrinta(a(2))EndSub4、窗体上有一文本框Text1,运行时单击文本框所实现功能：①文本内容变为“请输入用户名”；②文字字体为隶书，请在程序的下划线处添加语句完成该程序。PrivateSubText1_Click()Text1.fontname=“隶书”EndSub5、如下程序：PrivateSubForm_Click()Dima,b,xAsIntegera=Val(InputBox("a=?"))b=Val(InputBox("b=?"))x=a+bIfa

5、窗体，显示x的值是。6、有一个单击按钮过程，统计1~100之间其中被6整除余2的个数，并将这些数按每行5个数输出。请填空：PrivateSubCommand1_Click()DimiAsIntegerDimCounterAsIntegerFori=1to100If(1)=2ThenPrinti;Counter=(2)(3)EndifNextiEndsub四、程序设计题1、编程实现向三个文本框Text1、Text2、Text3中依次输入3个数，单击“最大数”命令按钮Command1，求出其中最大的数，并显示在标签Label2上,请编写Command1的单击事件代码。2

6、、编程实现在第一个文本框Text1输入一个学生的一门课分数x（百分制）单击“鉴定”命令按钮Command1，当x>=90时，第二个文本框Text2显示“优秀”；当80<=x<90时，显示“良好”；当70<=x<80时，显示“中”；当60<=x<70时，显示“及格”，当x<60时，显示“不及格”。界面设计如下，请写出“鉴定”命令按钮Command1和“退出”命令按钮Command2的单击事件代码。