资源描述：
《蒋丽萍-06计信管理（1）（2）五-vb》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。
1、班级姓名学籍号考考生答题不得超过此密封线编号：QMSD/JWC-21-01《VB程序设计》期中试卷（2008/2009学年度第一学期）用卷班级06计信管理（1）（2）五用卷人数42+42命题人蒋丽萍审核人王香菊核对人蒋丽萍一．选择题（2分×10）题号12345678910答案1.关于图片框控件与图像框控件说法不正确的是（）A图像框与图片框相比，占的内存小B图像框与图片框有相同点也有不同点C图片框控件内还可以包含其他控件，因此我们一般情况用图片框来编程D图片框与图像框控件可以使用bmp、jpg、wmf等图形文件2.若要让图片框随着图形的实际大小自动调整尺寸，应设置它的（）属性AR
2、eSizeBAutoSizeCStretchDAutoRedraw3.若要让图像框中的图形自动变化大小以适应图像框的尺寸，应设置它的（）属性AReSizeBAutoSizeCStretchDAutoRedraw4.若要让计时器每隔半分钟工作一次，应设置它的interval属性为（）A5B500C5000D300005.在设计好菜单后，点击确定按钮出现如下错误提示，是因为（）A某个菜单没有命名B有同名菜单C某菜单名有非法字符D在主菜单上设置了快捷键6.在设计菜单时，谁可以设置快捷键（）A顶层菜单B子菜单C两者都可以7.下列那句语句可以实现把文本框text1中选择的内容复制到剪贴板
3、上（）Aclipboard.settexttext1.seltextBclipboard.setdatatext1.seltextCtext1.text=clipboard.gettextDtext1.text=clipboard.getdata8.下列语句能画出半个圆弧的是（）[pi=3.1415926]Acircle(1000,1000),500Bcircle(1000,1000),500,,0,180Ccircle(1000,1000),500,,pi/2,pi*3/2Dcircle(1000,1000),500,,0,pi/29.以下的line语句格式正确的是（）ALI
4、NE(100-100),(2000-2000)BLINE(100,100)-STEP(2000,2000)CLINE(100,100),(2000,2000)DLINE(100,100)-(2000,2000),B10.一个多文档界面的应用程序可以包含（）个子窗体和（）个普通窗体。A1个，1个B多个，多个C多个，0个D多个，1个二．填空题（1分×20）1.要让计时器timer1不工作，可用语句______________实现。2.为了能在应用程序中能处理文件，VisualBasic提供了3种文件系统控件：_____________________、_______________
5、_和________________________。3．直线控件的_________________属性用来指定直线的类型，__________________属性设置线宽，只有当该属性为______________时才可以用7种类型的线，否则只有0和6有效。4．用Circle方法画圆的一般格式为_________________________。5．MDI的含义是__________________，一个MDI的应用程序可以包含三类窗体：____________________、___________________和__________________。6.能设置窗体的背
6、景色属性是__________，前景色属性__________，图形填充色属性__________。7.用circle方法可以在控件上画__________、__________和__________图形。8.用line方法可以画__________和__________图形。信息工程系《VB程序设计》期末试卷第3页共3页班级姓名学籍号考考生答题不得超过此密封线编号：QMSD/JWC-21-01一．程序设计(10分×6)1.在form1上有一个标签label1，上面有“VB期中考试”字样，如图所示：标签字体设置为：楷体_GB2312,加粗，三号，红色。界面已经设置好。标签每隔0
7、.1秒闪烁一次。窗体运行5秒钟后自动切换到form2窗体。请先说明要完成本题还缺什么控件，必须设置它的什么属性。并完成该控件的主要事件代码。2．如图所示，窗体上有三个控件，请编写代码使得三者能保持同步。PrivateSubDrive1_Change()EndSubPrivateSubDir1_Change()EndSub3.请实现左击窗体，在窗体上画出10个随机位置的大小不一，颜色不一的圆；右击窗体则清除窗体上的圆。PrivateSubForm_MouseDown(ButtonAsInteg
