资源描述:
《程序设计基础A》由会员上传分享,免费在线阅读,更多相关内容在工程资料-天天文库。
1、密封线学号姓名不准超过密封线,否则试卷作废,成绩记零分。系级班学号姓名程序设计基础课程期末考试试卷(第C卷)题号—二三四五六七八总分分值20152045一、选择题(每小题只有一个正确答案,请将正确答案填入题后的横线上。每小题1分,共计25分)1、在工具箱中,需要添加才会显示的控件是OA、CommandB>ComboBoxCnShapeD、RichTextBox2、Abs(-8)+Len(〃ABCD〃)的值是。A、12B、14C、8ABCDD、-8ABCD3、执行如下两条语句,窗体上显示的是oa=9.8
2、596PrintFormat(a,"$00,00.00")A)0,009.86B)$9.86C)9.86D)$0,009.864、在窗体上画一个名称为Textl的文本椎•,然后画一个名称为HScrolll的滚动条,具Min和Max属性分別为0和100。程序运行后,如果移动滚动框,则在文本框中显示滚动条的当前值,如图所示:以下能实现上述操作的程序段是:APrivateSubHScrol1Change()Textl.Text二HScrol11.ValueEndSubBPrivateSubHScrol1Cl
3、ick()Textl.Text=HScrol11.ValueEndSubCPrivateSubHScrollChange()Textl.Text二HScroll.CaptionEndSubDPrivateSubHScroll_Click()Textl.Toxt=HScroll.CaptionEndSub5、多窗体程序是由多个窗体组成的,在缺省的情况下,VB应用程序执行时,总是把指定为启动窗体。A、不包含任何控件的窗体B、设计时的第一个窗体C、包含控件最多的窗体D、命名为Form1的窗体6、在程序代码小
4、将图片文件mypic.jpg装入图片fi^Picturel的语句是。A、Picturel.picture二"mypic.jpg"B>Picture,image二"mypic,jpg"C、Picturel.picture=LoadPicture(''rnypic.jpg")D>LoadPictureCmypic.jpg")7、下列循环语句能正常结束的是oA、i=5Doi=i+1LoopUntili<0B、i=1Doi二i+2LoopUntili=10C、i=10Doi=i-1LoopUntili<0D、
5、i=6Doi=i-2LoopUntili=18、有如下程序:Fori=lto3密封线学号姓名不准超过密封线,否则试卷作废,成绩记零分。系级班学号姓名rorj=bPrintNextjNexti则语句PrintA、15to1Step-1i*ji*j的执行次数是9、假定有如下事件过程:PrivateSubFormClick()DimxAsIntegerX=1n二0DoWhilex<28x=x*3n二n+1LoopPrintx,nEndSubB、16程序运行后,单击窗体,输出结果是—B、563C、17D、18
6、C、281D、243510、窗体上有命令按饥(COMMAND1)和文木输入框TEXT1,命令按钮click中代码如下:PrivateSubCommandl_Click()A=75TfIfIfIf60708090ThenThenThenThenTextl.Text=TEndSub运行后,单击命令按钮,textl屮显示oA、1B、2C、3D、411、下述语句定义的数组元素有个。OPTIONBASE1DIMA(12,8)A、117B、128C、96D、2012、在窗体上画一个名称为Command1的命令按钮
7、,再画两个名称分别为LabelKLabel2的标签,然后编写如下程序代码:PrivateXAsIntegerPrivateSubCommand1Click()X=5:Y=3Callproc(X,Y)Label1.Caption二XLabcl2.Caption=YEndSubPrivateSubproc(ByVaiaAsInteger,ByVaibAsInteger)X二a*aY二b+bEndSub程序运行后,单击命令按钮,则两个标签中显示的内容分别是。A、5和3B、25和3C、25和6D、5和613、
8、假定已定义了一个过程SubAdd(aAsSingle,bAsSingle),则正确的调用语句是。A、Add12,5B、Call(2*x,Add(1.57))C、CallAddx,yD、CallAdd(12,12,x)14、要使用列表屮的列表显示成复选框形式,则应将其Style属性设置为oA^0B、1C^TrueD、False15、在窗体上画一个命令按钮,名称为Command1,然后编写如下事件过程:OptionBase0PrivateSubCommand