函授大专VB试卷
说明：文章内容仅供预览，部分内容可能不全。下载后的文档，内容与下面显示的完全一致。下载之前请确认下面内容是否您想要的，是否完整无缺。
兰州交通大学02级计算机网络专业可视化编程技术 姓名_____________ (考试时间100分钟) 一、选择题(每小题4分，共15题，60分) 下列各题A)、B)、C)、D)四个选项中，只有一个选项是正确的，请将正确选项写 在试卷的括号内。 (1)以下不能在"工程资源管理器"窗口中列出的文件类型是( ) A)．bas B)．res C)．frm D)．ocx (2)以下关于窗体的描述中，错误的是 ( ) A)执行Unload Forml语句后，窗体Forml消失，但仍在内存中 B)窗体的Load事件在加载窗体时发生 C)当窗体的Enabled属性为False时，通过鼠标和键盘对窗体的操作都被禁止 D)窗体的Height、Width属性用于设置窗体的高和宽 (3)下列可作为Visual Basic变量名的是( ) A)A#A B)4A C)?xy D)constA (4)设有如下的记录类型 ( ) Type Student number As string name As String age As Integer End Type 则正确引用该记录类型变量的代码是 A) Student．name="张红" B) Dim s As Student s．name＝"张红" C) Dim s As Type Student D) Dim s As Type s．name="张红" s.name＝"张红" (5)函数String(n，"str")的功能是 ( ) A)把数值型数据转换为字符串 B)返回由n个字符组成的字符串 C)从字符串中取出n个字符 D)从字符串中第n个字符的位置开始取子字符串 (6)将数学表达式Cos2(a+b)+5e2写成Visual Basic的表达式，其正确的形式是 ( ) A)Cos(a+b)^2十5*exp(2) B)Cos^2(a+b)+5*exp(2) C)Cos(a+b)^2十5*ln(2) D)Cos^2(a+b)+5*ln(2) (7)在窗体上画一个命令按钮，名称为Commandl。单击命令按钮时，执行如下事件过 程： Private Sub Command 1_C1ick() a$="software and hardware" b$＝Right(a$,8) c$=Mid(a$,1，8) Msgbox a$,,b$,c$,1 End Sub 则在弹出的信息框的标题栏中显示的信息是 ( ) A)software and hardware B)software C)hardwafe D)1 (8)执行如下语句： a＝InputBox("Today"，"Tomorrow，"Yesterday",,,"Day before yesterday"，5) 将显示一个输入对话框，在对话框的输入区中显示的信息是 ( ) A)Today B)Tomorrow C)Yesterday D)Day before yesterday (9)表示滚动条控件取值范围最大值的属性是 ( ) A)Max B)LargeChange C)val D)Max-Min (10)在窗体上画一个名称为Listl的列表框，一个名称为Labell的标签。列表框中显示 若干城市的名称。当单击列表框中的某个城市名时，在标签中显示选中城市的名称。 下列能正确实现上述功能的程序是 ( ) A) Private Sub Listl_Click() B)Private Sub Listl_C1ick() Label1．Caption＝List1.ListIndex Label1．Name＝Listl．ListIndex End Sub End Sub C)Private Sub Listl_Click() D)Private Sub Listl_Click() Label1．Name＝Listl.Text Label1．Caption＝Listl.Text End Sub End Sub (11)在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() x=0 n=InputBox(" ") For i=1 to n For j=1 to i x=x+1 Next j Next i Print x End Sub 程序运行后，单击命令按钮，如果输入3，则在窗体上显示的内容是 ( ) A)3 B) 4 C)5 D) 6 (12)以下关于菜单的叙述中，错误的是( ) A)在程序运行过程中可以增加或减少菜单项 B)如果把一个菜单项的Enabled属性设置为False，则可删除该菜单项 C)弹出式菜单在菜单编辑器中设计 D)利用控件数组可以实现菜单项的增加或减少 (13)在窗体上画三个单选按钮，组成一个名chkOption的控件数组。用于标识各个控件数组元素的参数是( ) A) Tag B) Index C) ListIndex D) Name (14)在窗体上画一个命令按钮，名称为Command1，然后编写如下事件过程： Option Base 0 Private Sub Command1_Click() Dim city As Variant city=Array("北京"，"上海"，"天津"，"重庆") Print city(1) End Sub 程序运行后，如果单击命令按钮，则在窗体上显示的内容是 ( ) A)空白 B)错误提示 C)北京 D)上海 (15)从键盘上输入两个字符串，分别保存在变量str1、str2中，确定第二个字符串在第一个字符串中起始位置的函数是（ ） A) Left B) Mid C) String D) Instr 二、填空题(每空4分，共20分) 请将每空的正确答案写在 [1]一[10]序号的横线上。 (1)visual Basic中有一种控件组合了文本框和列表框的特性，这种控件是 _________[1]。 (2)Visual Basic提供的对数据文件的三种访问方式为随机访问方式 __________[2]和二进制访问方式。 (3)执行下面的程序段后，变量S的值为_________[3]。 S＝5 For i ＝2.6 To 4.9 Step 0.6 S=S+1 Next i (4)为了在运行时把d:\pic文件夹下的图形文件a.jpg装入图片框Picturel，所使用的语 句为______________________________________________________________________________[4]。 (5)计时器控件能有规律的以一定时间间隔触发________[5]事件，并执行该事件过程中的程序代码。 三．程序设计题（每空4分，共20分） (1)以下程序的功能是：生成20个200到300之间的随机整数，输出其中能被5整除的数并求出它们的和。请填空。 Private Sub Commandl_C1ick() For i＝1 To 20 x＝Int( _______[1]*200+100) If i Mod ______[2]＝0 Then Print x S＝S+______[3] End If Next i Print "Sum＝";S End Sub (2)设有如下程序 Private Sub Form_Click() Dim a AS Integer，b As integer a＝20：b=50 pl a，b p2 a，b p3 a, b Print "a＝"；a,"b＝"；b End Sub Sub pl(x As Integer，ByVal y As Integer) x=x+10 y=y+20 End Sub Sub p2(byVal x As Integer, y As Integer) x=x+10 y=y+20 End Sub Sub p3(ByValx As Integer, ByVal y As Integer) x=x+10 y=y+20 End Sub 该程序运行后，单击窗体，则在窗体上显示的内容是：a＝______[4]和b= _______[5]。 本文来源：https://www.wddqw.com/doc/83baddea5ef7ba0d4a733b2b.html