[程序设计语言vb]考试卷a

《[程序设计语言vb]考试卷a》由会员上传分享，免费在线阅读，更多相关内容在工程资料-天天文库。

1、西南科技大学网络教育学院（2014）/（2015）学年第1学期试题单〈A卷〉课程名称：程序设计语言VB专业班级:命题教师：魏雪莲学生姓名：学号：成绩：考试时间：月曰一、单选题（每题2分，共15题，共30分，下列各小题备选答案中,只有一个符合题意的答案。多选、错选、不选均不得分）1.若要将某命令按钮设置为默认命令按钮。则应设置为True的属性是（C）。A.ValueB.CancelC.DefaultD.Enabled2.语句PRINTn25*4n的输出结果是（A）。A.25*4B.n100”C.100

2、D.出现错误信息3.语句DimxAsInteger作用是:将x定义为（B）变量。A.单精度型B.整型C.布尔型D.字符型4.VB中下列逻辑表达式书写正确的是（A）。A.a〉banda>cB.a〉b〉cC.a^bD.a关1225.表达式4+56*7/8Mod9的值是（B）。A.4B.5C.6D.76.Int（Rnd*100）表示的是（C）范围内的一个整数。A.[0,100]B.[l,99]C.[0,99]D.11,100]7.Int（-3.14）的值是（C）。A.-3B.-3.14C.-4D.3.1

3、41.在设计阶段，当双击窗体上的某个控件时，所打开的窗口是(C)。A.工程资源管理器窗口B.工具箱窗口C.代码窗口D.属性窗口2.Dima(5,5)AsLong定义的数组元素的个数是(DA.10B.11C.25D.363.下列关于ExitFor的说法，正确的是(D)。A.它可以退出任何类型的循环B.一个循环只能有一个ExitForC.每个循环必须有ExitForD.ExitFor本身是无条件退出循环4.在图片框屮加载图形(c:666.jpg)的方法是(A)。A.Loadpicture("c:66

4、6.jpg")B.Loadpicture()C.print("c:666.jpg")D.cis5.设在窗体上有-•通用对话框控件Commonialogl，通过调MJ(C)语句可以建立“颜色”对话框。A.Commonialog1.ShowOpenB.Commonialog1.Action=2C.Commonialog1.ShowColorD.Commonialog1.Action=56.列表项选择后得到的选中索引是指(D)。A.ValueB.ListValueC.IndexD.Listlndex7.

5、在VisualBasic代码窗LI中，将某一条语句加以注释和说明时，应在语句前加(C)。A.，B.:C.，A.?1.在VisualBasic中，以下选项中表示单4•事件的是(B)。A.KeyUpB.ClickC.ActivateD.Load二、填空题1(每题10分，共2题，共20分)2.阅读下列程序段OptionExplicitPrivateSubCommandl_Click()DimstrlAsStringDimstr2AsStringstrl="ABCDEFG”MySubstrl,str2Pri

6、ntstr2EndSubPrivateSubMySub(ByValaAsString,bAsString)DimcAsStringDimiAsIntegerFori=Len(a)To1Step-1c=c+Mid(a,i,1)Nextb=cEndSub程序运行后，“print”语句的输出结果是_GFEDCBA_。3.PrivateSubCommand1_Click()a=3b=lFori=lTo3f=a+ba=bb=fNextiPrintfEndSub以上程序段运行后，f的结果为9。三、简答题(每题2

7、0分，共1题，共20分)1.简述下图程序界而的设计步骤，包括添加控件、设置属性和编程。(1)界面设计：插入窗体(Forml)，添加组框(Framel)，添加3个复选框(CheckBoxl、CheckBox2、CheckBox3),添加标签(Label1),添加文字框(TextBoxl),添加命令按钮(Commandl)o(2)设置控件属性：设置Forml的Caption属性为“复选应用”；设置Framel的Caption属性为“组框字体格式选择”；分别设置CheckBoxl、CheckBox2、Ch

8、eckBox3的Caption属性为“加粗”、“倾斜”、“下划线”，并把CheckBoxl的Value属性设为True；设置Label1的Caption属性为“字体格式效果”；设置TextBoxl的Text属性为“你好吗？”；设置Commandl的Caption属性为“确定”；(3)编程：PrivateSubCommandl_Click()IfCheckBoxl.Value=TrueThenTextBoxl.FontBold=TrueElseTextBoxl.Font