vb模拟选择题2
- 格式:doc
- 大小:82.00 KB
- 文档页数:20
《程序设计语言VB》单选题1. Visual Basic是一种面向()的程序设计语言。
A. 用户B. 事件C. 程序D. 对象2.在Visual Basic6.0中规定工程文件的扩展名是()。
A. vbpB. forC. frmD. bas3. Visual Basic6.0中规定窗体文件的扩展名是()。
A. forB. frmC. vbpD. bas4.如何使一个标签或按钮控件在运行时不可用()。
A. 把它的Visible属性设置成FalseB. 把它的Visible属性设置成TrueC. 把它的Enabled属性设置成FalseD. 把它的Enabled属性设置成True5.控件的字体可在属性窗口的()属性中调整?A. FontB. ColorC. TextD. Caption6.若要将某命令按钮设置为默认命令按钮。
则应设置为True的属性是()。
A. ValueB. CancelC. DefaultD. Enabled7.在VB中,记录对象数据的是()。
A. 方法B. 事件C. 属性D. 语句8.在文本框上显示文本的属性是()。
A. ValueB. TextC. PrintD. Enabled9. InputBox函数返回值的类型为()。
A. 字符串B. 数值C. 变体D. 数值或字符串(视输入的数据而定)10.设有语句:a = InputBox("请输入数值:","输入示例", "100") 程序执行后,若从键盘上输入数值20并按回车键,则变量a的值是()。
A. 字符串"20"B. 字符串"120"C. 默认值100D. 数值12011.下列控件中可用于接受用户输入文本,又可用于显示文本的是()。
A. Label控件B. TextBox控件C. Timer控件D. CommandButton控件12.语句PRINT "25*4"的输出结果是()。
国家二级VB机试(选择题)模拟试卷301(题后含答案及解析) 题型有:1.1.下面关下VB应用程序的叙述中正确的是A.VB心用程序只能解释运行B.VB应用程序只能编译运行C.VB应用程序既能解释运行,也能编译运行D.VB应用程序必须先编译,然后解释运行正确答案:C解析:Visual Basic是一种可视化的、面向对象和采用事件驱动方式的结构化高级程序设计语言。
在设计Visual Basic程序的过程中可以随时以解释方式运行程序,也可在整个应用程序设计完成后,经编译生成可脱离Visual Basic环境而在Windows下直接运行的可执行文件(.EXE)。
2.以下关于VB文件的叙述中,正确的是A.标准模块文件的扩展名是.frmB.一个.vbg文件中可以包括多个.vbp文件C.一个.vbp文件只能含有一个标准模块文件D.类模块文件的扩展名为.bas正确答案:B解析:标准模块是只含有程序代码的应用程序文件,其扩展名为.bas;窗体文件中含有控件和程序代码,其扩展名为.frm;类模块文件的扩展名为cls;工程文件的扩展名为.vbp,在一个工程中含有多个窗体文件和标准模块文件;工程组文件的扩展名是.vbg,一个工程组文件中可以含有若干工程。
知识模块:对象及其操作3.有如下语句序列:Dim a,b As Integer Print a Print b执行以上语句序列,下列叙述中错误的是A.输出的a值是0B.输出的b值是0C.a是变体类型变量D.b是整型变量正确答案:A解析:在Visual Basic中用户既可以显式声明一个变量,也可以不声明而直接使用变量,显式声明变量时每个变量都应使用As子句声明类型,否则该变量将被视为变体类型。
本题中a是变体类型变量,默认初值为False;b是整犁变量,默认初值为0。
知识模块:数据类型及运算4.对于一个名称为menu1的菜单项,下列叙述中正确的是A.使menu1菜单项不可见的语句是menu1.Visible=TrueB.能在menu1菜单项的左面显示”√”标记的语句为menu1.Checked = False C.能将menu1菜单项禁用的语句为menu1.Enabled=FalseD.menu1菜单项既可响应Click事件,也可响应DblClick事件正确答案:C解析:设置菜单项不可见的语句是:menu1.Visible = False,选项A错误;能在menu1菜单项的左面显示”√”标记的语句是:menu1.Checked = True,选项B错误;菜单项只能响应Click事件,选项D错误;故本题正确答案为C选项。
1.项目文件的扩展名是()A..vb B..sln C..exe D..vbproj2.集成开发环境有两类窗口:浮动和固定,下面的()窗口不是浮动窗口。
A.工具箱B.属性 C.即时D.窗体3.要使窗体的标题为“演示实例”,应修改窗体的()属性。
A.Caption B.Tip C.Item D.Text4.在中,下面属于方法的是()。
A.FocusB.SelectedTextC.LostFocusD.Keypress5.一条语句要在下一行继续写,可用()符号作为续行符。
A.+B.-C.空格和_D....6.若要使命令按钮不可操作,要对()属性进行设置。
A.EnabledB.VisibleC.BackColorD.Text7.在集成环境中创建应用程序时,除了工具箱窗口、窗体窗口和属性窗口外,必不可少的窗口是()A.窗体布局窗口B.立即窗口C.代码窗口D.监视窗口8.当运行程序时,系统自动执行启动窗体的()事件过程A.Load B.Click C.Unload D.GotFocus 9.当文本框的ScrollBars属性设置了非None值,却没有效果,原因是()A.文本框没有内容B.文本框的MultiLine属性为False C.文本框的MultiLine属性为True D.文本框的Locked属性为True10.若要使标签控件显示时不要覆盖窗体的背景图案,要对()属性进行设置A.BackColor B.BorderStyle C.ForeColor D.BackStyle 11.数据类型为Long的类型标识符为()。
A.%B.&C.!D.#12.下面()是日期型常量。
A.“5/17/12”B.5/17/12C.#5/17/12#D.(5/17/12)13.下面的()是合法的单精度型变量。
A.num!B.sum%C.char!D.mm#14.下面的()是合法变量名。
A.X_yzB.123abcC.IntegerD.X-Y15.Rnd函数不可能为下列的()值。
《程序设计语言VB》单选题1. Visual Basic是一种面向()的程序设计语言。
A. 用户B. 事件C. 程序D. 对象2. 在Visual Basic6.0中规定工程文件的扩展名是()。
A. vbpB. forC. frmD. bas3. Visual Basic6.0中规定窗体文件的扩展名是()。
A. forB. frmC. vbpD. bas4. 如何使一个标签或按钮控件在运行时不可用()。
A. 把它的Visible属性设置成FalseB. 把它的Visible属性设置成TrueC. 把它的Enabled属性设置成FalseD. 把它的Enabled属性设置成True5. 控件的字体可在属性窗口的()属性中调整?A. FontB. ColorC. TextD. Caption6. 若要将某命令按钮设置为默认命令按钮。
则应设置为True的属性是()。
A. ValueB. CancelC. DefaultD. Enabled7. 在VB中,记录对象数据的是()。
A. 方法B. 事件C. 属性D. 语句8. 在文本框上显示文本的属性是()。
A. ValueB. TextC. PrintD. Enabled9. InputBox函数返回值的类型为()。
A. 字符串B. 数值C. 变体D. 数值或字符串(视输入的数据而定)10. 设有语句:a = InputBox("请输入数值:","输入示例", "100") 程序执行后,若从键盘上输入数值20并按回车键,则变量a的值是()。
A. 字符串"20"B. 字符串"120"C. 默认值100D. 数值12011. 下列控件中可用于接受用户输入文本,又可用于显示文本的是()。
A. Label控件B. TextBox控件C. Timer控件D. CommandButton控件12. 语句PRINT "25*4"的输出结果是()。
一、选择题1、无条件转移GoTo语句后面是(A)A、标号或行号B、输出语句C、输入语句D、子过程2、无条件转移GoTo语句后面的行号或标号以字母开头,后跟(A)A、冒号B、分号C、逗号D、空格3、无条件转移GoTo语句后面的行号或标号在同一过程中(A)A、必须唯一B、可以重复C、以数字开头D、以汉字开头4、while循环结构中的条件表达式取值为(A)A、TrueB、FalseC、True或FalseD、05、while循环结构中的条件表达式取值为(A)时执行语句组A、TrueB、FalseC、True或FalseD、06、while循环结构中与(A)匹配使用,不能单独出现A、WendB、endC、loopD、next7、Do…、、loop循环结构中的循环体执行的最少次数为(A)A、0B、1C、2D、38、前测型Do…、、loop循环结构中的循环体执行的最少次数为(A)A、0B、1C、2D、39、后测型Do…、、loop循环结构中的循环体执行的最少次数为(B)A、0B、1C、2D、310、Do…loop循环结构中的Exit Do语句的功能是(B)A、退出整个程序B、退出当层循环C、退出最外层循环D、退出所在子程序11、Do…loop中使用while关键字时,条件为(B)执行循环体A、FalseB、TrueC、0D、假或真12、Do…loop中使用until关键字时,条件为(A)执行循环体A、FalseB、TrueC、0D、假或真13、Do…loop中使用while关键字时,条件为(A)终止循环A、FalseB、TrueC、0D、假或真14、Do…loop中使用until关键字时,条件为(B)终止循环A、FalseB、TrueC、0D、假或真15、For…Next循环结构中(C)用来控制循环变量A、forB、stepC、nextD、to16、For…Next循环结构中step用来控制(D)A、循环变量B、循环变量初值C、循环变量终值D、循环变量增量17、For…Next循环结构中循环变量初值大于终值时,步长为(A)A、负数B、非负数C、正整数D、正数18、For…Next循环结构中循环变量初值小于终值时,步长为(A)A、负数B、负整数C、正整数D、正数19、For…Next循环结构中next后的循环变量(A)A、可以省略B、不可以省略C、与for后的变量名可以不同D、与for后的变量不是同一变量20、For…Next中循环变量初值与终值间使用的关键字是(A)A、ToB、InC、gotoD、private21、For…Next中循环变量初值与终值间使用的关键字是(A)A、ToB、InC、gotoD、private22、执行下面的程序段后,s的值为(C)Private Sub Form_Click()Static s As Integers = 5For i = 1.4 To 2.1 Step 0.6s = s + 1Next iPrint sEnd SubA、5B、6C、7D、123、下面程序的作用是利用随机函数产生10个100~200之间(包含100、200)的随机数,打印其中为5的倍数的数将程序补充完整(A)Private Sub Command1_Click()For m = 1 To 10x = Int(Rnd * 101+100)If()ThenPrint x;End IfNext mEnd SubA、x mod 5=0B、x mod 5==0C、x/5=0D、x\5=024、设有如下程序:Option Base 1Private Sub Form_Click()Dim a(10), P(3) As Integerk = 5For i = 1 To 10a(i) = iNext iFor i = 1 To 3P(i) = a(i * i)Next iFor i = 1 To 3k = k + P(i) * 2Next iPrint kEnd Sub程序运行后,单击窗体,则在窗体上显示的是(A)A、33B、35C、37D、3825、在窗体上画一个命令按纽Command1,然后编写如下事件过程:Private Sub Command1__Click()X=0N=val(inputbox(“n=?”))For i=1 to nFor j=1 to iX=x+1Next jNext iPrint xEnd sub程序运行后、单击命令按钮,输入3,在窗体上显示的内容是(D)A、9B、44C、5D、626、以下能够正确计算n!的程序是(C)A、private sub command1__click()N=5 : x=1DoX=x*1I=i+1Loop while i<nPrint xEnd subB、private sub command1__click()N=5 : x=1 : i=1DoX=x*iI=i+1Loop while i<nPrint xEnd subC、private sub command1__click()N=5 : x=1 : i=1DoX=x*iI=i+1Loop while i<=nPrint xEnd subD、private sub command1__click()N=5 : x=1 : i=1DoX=x*iI=i+1Loop while i > nPrint xEnd sub27、在窗体上画一个命令按纽Command1,标签Label1然后编写如下事件过程:Private sub command1_click()For i=1 to 15X=2*i-1If x mod 3=0 then s=s+1Next iLabel1、caption =sEnd sub程序运行后,单击命令按钮,标签中显示的内容是( B )A、1B、5C、27D、4528、在窗体上画一个命令按纽Command1,然后编写如下事件过程:Private sub command1_click()For i=1 to 4Print chr$(65+i)Next iPrintEnd sub程序运行后,单击命令按钮,窗体中显示的内容是( A)A、BBCCCDDDDEEEEEB、ABBCCCDDDDC、BCCDDDEEEED、AABBBCCCCDDDDD28、在窗体上画两个名称分别为text1,text2的文本框和一个名称为command1的命令按钮,然后编写如下事件过程:Private sub command1_click()Dim x as integer,n as integerX=1 :n=0Do while x < 20X=x*3N=n+1LoopText1、text=str(x)Text2、text=str(n)End sub程序运行后,单击命令按钮,在两个文本框中显示的值分别是(B)A、15和1B、27和3C、195和3D、600和429、在窗体中添加一个命令按钮,名称为Command1,然后编写如下程序:Private Sub Command1_Click()Dim a(5),b(5)For j =1 to 4A(j)=3*jB(j)=a(j)*3Next jText1、text=b(j\2)End Sub程序运行后,单击命令按钮,在文本框中显示( B )A、25B、18C、36D、3530、下面程序运行时,内层循环的循环总次数是(A)For m = 1 To 3Next nNext mA、6B、3C、0D、931、定义语句Dim A (-3 to 3) as Integer,定义数组的元素个数是(D)A、6B、3C、0D、732、执行下面的程序段后,X的值为(C)X=5For I=1 to 10 Step 2X=X+I\5Next IA、7B、10C、8D、533、如果整型变量a、b的值分别为3和1,则下列语句中循环体的执行次数是(D )For I=a to bPrint INext IA、0B、1C、2D、334、下列关于do while …loop 和do…loop until循环执行循环体次数的描述正确的是(D )A、do while …loop循环和do…loop until循环至少都执行一次B、do while …loop循环和do…loop until循环可能都不执行C、do while …loop循环至少执行一次,do…loop until循环可能不执行D、do while …loop循环可能不执行,do…loop until循环至少执行一次35、在窗体中添加一个名称为Command1的命令按钮,然后编写如下程序:Private Sub Command1_Click()For i = 1 To 4a = 1For j = 1 To 3a = 2For k = 1 To 2a = a + 6Next kNext jNext iPrint aEnd Sub程序运行后,单击命令按钮,则在窗体上显示的内容是(A )A、14B、15C、16D、1736、设有如下程序:Private Sub Form_Click()a = 1For i = 1 To 3Select Case iCase 1, 3a = a + 1Case 2, 4a = a + 2End SelectNext iPrint aEnd Sub程序运行后,单击窗体,则在窗体上显示的内容是( B )A、6B、5C、4D、337、在窗体中添加一个名称为Command1的命令按钮,然后编写如下程序:sub ss (b() as Integer )For i = 1 To 4b(i) = 2 * iNext iEnd SubPrivate Sub Command1_Click()Dim a(1 To 4) As Integera(1) = 5: a(2) = 6a(3) = 7: a(4) = 8ss a()For i = 1 To 4Print a(i)Next iEnd Sub运行上面的程序,单击命令按钮,则在窗体上显示的内容是(B )A、5 6 7 8B、2 4 6 8C、1 2 3 4D、5 7 6 838、在窗体中添加一个名称为Command1的命令按钮,然后编写如下程序:Function fun(x As Integer)Static zy = y + 1: z = z + 1fun = x + y + zEnd FunctionPrivate Sub Command1_Click()Dim x As Integerx = 1For i = 1 To 2Print fun(x)Next iEnd Sub程序运行后,如果单击命令按钮,窗体中显示的内容是(B )A、3 3B、3 4C、3 5D、3 639、若I、n均为整型变量,下列程序段的输出结果为(C)Private Sub Form_Click()n = 0For i = 1 To 10If i Mod 2 = 1 Then n = n + 1Next iPrint nEnd SubA、0B、4C、5D、340、在窗体中添加一个文本框(其中Name属性为Text1),然后编写如下代码:Private Sub Form_click ()Text1、Text = ""Text1、SetFocusFor i = 1 To 10Sum = Sum + iNext iText1、Text = SumEnd Sub上述程序运行后,单击窗体,则运行的结果(A )A、在文本框Text1中输出55B、在文本框Text1中输出0C、出错D、在文本框Text1中输出不定值41、在窗体中添加一个名称为Command1的命令按钮,然后编写如下代码:Private Sub Command1_Click()x = 0Do Until x = -1a = InputBox("请输入A的值")a = Val(a)b = InputBox("请输入B的值")b = Val(b)x = InputBox("请输入X的值")x = Val(x)a = a +b + xLoopPrint aEnd Sub程序运行后,单击命令按钮,依次在输入对话框中输入1<CR>2<CR>3<CR>4<CR>5<CR>-1<CR>,则输出结果为(A)A、8B、9C、14D、1542、设有如下程序:Option Base 1Private Sub Form_Click()Dim a(10), P(3) As Integerk = 5For i = 1 To 10a(i) = iNext iFor i = 1 To 3P(i) = a(i * i)Next iFor i = 1 To 3k = k + P(i) * 2Next iPrint kEnd Sub程序运行后,单击窗体,则在窗体上显示的是(A )A、33B、35C、37D、3843、在窗体中添加一个名称为Command1的命令按钮,然后编写如下代码:Function F(a As Integer)b = 0Static cb = b + 1c = c + 1F = a + b + cEnd FunctionPrivate Sub Command1_Click()Dim a As IntegerDim b As Integera = 2For i = 1 To 3b = F(a)Print bNext iEnd Sub程序运行后,如果单击命令按钮,则窗体上显示的内容是(A )A、4 5 6B、1 2 3C、0 1 2 3D、2 3 444、在窗体上画一个命令按钮,名称为Command1。
一、选择题一、选择题1.在设计应用程序时,可以查看到应用程序工程中的所有部分的窗口是(.在设计应用程序时,可以查看到应用程序工程中的所有部分的窗口是( )。
A.窗体设计.代码C.属性D.工程资源管理器窗口.工程资源管理器窗口 >> 答案:d 2.窗体的Load事件的触发时机是(事件的触发时机是( )。
A.用户单击窗体时B.窗体被加载时C.窗体显示之后D.窗口被卸载时.窗口被卸载时 >> 答案:b答案:b3.与传统的程序设计语言相比,Visual Basuc最突出的特点是(最突出的特点是( )。
A.结构化程序设计B.程序开发环境C.事件驱动编程机制D.程序调试技术.程序调试技术答案:C 4.VB6.0集成开发环境的主窗口不包括(集成开发环境的主窗口不包括( )。
A.标题栏.状态栏 D.工具栏.工具栏.标题栏 B.菜单栏.菜单栏 C.状态栏答案:c 5.如果对象的名称为Mytext,而且对象有一个属性Text,那么在代码中引用该属性的正确格式是( )。
格式是(A.Text.Mytext B.Mytext.text C.Mytext.(Text)D.Mytext*Text 答案:b 6.下列可以激活属性窗口的操作是(.下列可以激活属性窗口的操作是( )。
A.用鼠标双击窗体的任何部位命令 C.按Ctrl+F4 用鼠标双击窗体的任何部位 B.执行“工程”菜单中的“属性窗口”命令D.按F4键答案: b d 答案:7.假定已在窗体上画了多个控件,并有一个控件是活动的,为了在属性窗口中设置窗体的属性,预先应制造的操作是( )。
属性,预先应制造的操作是(A.单击窗体上没有控件的地方.不执行任何操作 D.双击窗体.单击任一个控件 C.不执行任何操作.单击窗体上没有控件的地方 B.单击任一个控件的标题栏的标题栏答案:a 8.如果在文本框中键入字符时,应设置文本框的(()属性。
只显示某个字符,如星号(*),应设置文本框的如果在文本框中键入字符时,只显示某个字符,A.Caption B.PasswordChar C.Text D.Char 答案:b 9.如果想让文本框中的内容在运行时不能编辑,需将文本框的(.如果想让文本框中的内容在运行时不能编辑,需将文本框的( )属性设置为True。
本卷共有4道大题:一、单项选择题(20道小题,共20分)1、假定焦点已经位于TextBox1中,则能够触发KeyPress事件的操作是()。
(1分)A、单击鼠标B、双击文本框C、鼠标滑过文本框D、按下键盘上的某个键2、在中每个对象都有三个基本要素,它们是 ( )。
(1分)A、对象的名称,值和所属类。
B、对象的属性,事件和方法。
C、对象的大小,存储方式和内容。
D、对象的访问方法、存储方式和名称。
3、表达式 Int(Rnd*55)+15 产生的随机数范围是( )。
(1分)A、[15,55]B、[15,69]C、(15,55)D、(15,69)4、以下表达式的结果( )不是字符串类型。
(1分)A、"45" + "123"B、"45" & "123"C、45 + "123"D、全部5、在窗体上有一文本框,名称为Textbox1,程序运行后,要求该文本框不能接收键盘输入,但能输出信息,以下设置正确的是( )。
(1分)A、TextBox1.MaxLength=0B、TextBox1.Enabled=FalseC、TextBox1.Visible=FalseD、TextBox1.Size.Width=06、设有 x,y 两个数值型变量,今欲将其以坐标的样式“(x,y)”显示在标签(Label1)上(注:x,y显示具体的数值),下面语句中正确的是( )。
(1分)A、Label1.text="(" & x & "," & y & ")"B、Label1.text="(x,y)"C、Label1.text=("x","y")D、Label1.text=(x,y)7、关于For...Next 循环,以下说法错误的是( )。
VB复习题一一、判断题:(每小题1分,共20分。
请将答案涂在答题卡上,正确的涂A,错误的涂B)1.Visual Basic 6.0工作模式有3种:它们是设计、运行和调试。
()2.标签支持Dblclick事件。
(2 )3.窗体中控件的位置由Height和Top属性确定。
(3 )4.滚动条的SmallChange属性设置为5时,表示单击滚动条两端的箭头时变化为5. (4 )5.当把定时器控件的Visible属性设置为True时,运行时定时器在窗体上就可见了。
(5 )6.Vbred是Visual Basic 6.0允许的常量。
(6 )7.#25/6/2018#是Visual Basic 6.0合法的日期型常量书写。
(7 )8.逻辑运算符Not的优先级比Or高。
(8 )9.Visual Basic 6.0中可以用print做变量名。
(9 )10.表达式5 mod 4与5\4的结果相同。
(10 )11.语句if x>=60 and x<70 then print ”及格”是正确的。
(11 )12.有select case 语句必须有End select语句与之相匹配。
(12 )13.Exit for是Do循环的一个出口。
(13 )14.选择结构与循环结构可以相互嵌套,并且允许交叉嵌套。
(14 )15.Visual Basic 6.0中,Dim a(-5 to 5) as single 是正确的数组定义。
(15 )16.可以用Ubound()函数返回数组下标的下界。
(16 )17.过程体内可以再定义另外一个过程。
(17 )18.实参是变量,且过程定义时与其对应的形参用Byval关键字加以限制是地址(引用)传递。
(18 )19.用Output模式打开文件,如果指定的路径不存在,则会自动先创建指定的路径,然后再创建文件。
(19 )20.Visual Basic 6.0中,文件号最大可取的值是511。
国家二级VB机试(选择题)模拟试卷401(题后含答案及解析) 题型有:1.1.设计窗体时,双击窗体上没有控件的地方,打开的窗口是A.代码设计窗口B.属性窗DC.工具箱窗D.工程窗口正确答案:A解析:设计窗体时,双击窗体上任意地方,将会打开代码窗口进行代码的输入。
知识模块:Visual Basic程序开发环境2.目录列表框Path属性所表示的含义是A.当前驱动器或指定驱动器上的路径B.当前驱动器或指定驱动器上的某目录下的文件列表C.跟目录下的文件列表、D.指定路径下的文件列表正确答案:A解析:本题考查目录列表框的基本属性。
目录列表框的Path属性是指当前驱动器或指定驱动器上的路径。
知识模块:对象及其操作3.某二叉树的中序遍历序列为CBADE,后序遍历序列为CBEDA,则前序遍历序列为( )。
A.CBADEB.CBEDAC.ABCDED.EDCBA正确答案:C解析:二叉树的后序遍历序列为CBEDA,由于后序遍历最后访问根结点,可以确定该二叉树的根结点是A。
再由中序遍历序列为CBADE,可以得到子序列(CB)一定在左子树中,子序列(DE)一定在右子树中。
结点c、B在中序序列和后序序列中顺序未变,说明结点B是结点c的父结点;结点D、E在中序序列和后序序列中顺序相反,说明结点D是结点E的父结点。
因此该二叉树的前序遍历序列为ABCDE。
知识模块:公共基础知识4.对长度为10的线性表进行冒泡排序,最坏情况下需要比较的次数为A.9B.10C.45D.90正确答案:C解析:线性表的长度为n,最坏情况下冒泡排序需要比较的次数为n(n-1)/2。
知识模块:数据结构与算法5.下列选项中不属于结构化程序设计方法的是A.自顶向下B.逐步求精C.模块化D.可复用正确答案:D解析:结构化程序设计方法的主要原则可以概括为:自顶向下,逐步求精,模块化,限制使用goto语句。
自顶向下是指程序设计时应先考虑总体,后考虑细节;先考虑全局目标,后考虑局部目标。
选择题 1、 (单选题)Function过程要由函数名返回一个值。如果不使用As数据类型选项来指定函数的类型,函数类型默认为(B)类型。(141页变体型) A、String B、Variant C、Long D、Integer 2、(单选题)当函数EOF()的返回值为真时,表示文件的指针指向___B___。(书本308页) A、尾部 B、最后一个记录 C、开头 D、第一个记录 3、(单选题)应用程序窗体的名称属性为Frm1,窗体上有一个命令按钮,其名称属性为Cmd1。单击窗体和命令按钮的时间过程分别为___B___。 A、Frm1_click() Cmd1_click() B、Form_click() Cmd1_click() C、Form_click() Command1_click() D、Form1_click() Command1_click() 4、(单选题)在窗体上有一个文本框控件,名称为TxtTime,有一个计时器控件,名称为Timer1,要求每一秒钟在文本框中显示一次当前的时间。程序为:Private.sub Timer1.___ TxtTime.text=Time End Sub 在填空中应填入的内容是_ C____。 A、Enabled B、Visible C、Timer D、Interval 5、(单选题)执行下面的程序,单击窗体后在窗体上显示的结果是___B____。 Private Sub Form_Click() Dim Strl as String,Str2 as string Dim Str3 as String,k as integer Str1 =”e” For k = 1 to 2 Str2 =Ucase(Str1) Str1=Str2 & Str1 Str3=Str3 & Str1 Str1 =Chr(Asc(Str1)+k) Next k Print Str3 End Sub A、eeFF B、EeFF C、EEFF D、eEfF 6、(单选题)以下叙述正确的是___C____。(书本202页) A、列表框包含了组合框的功能。 B、列表框和组合框的功能无相近之处 C、组合框包含了列表框的功能 D、列表框和组合框的功能完全相同 7、(单选题)如果要向WORK.DAT文件中添加数据,那么下面打开该文件的语句中,正确的是__B____。(书本255页) A、Open “WORK.DAT” For output As # 1 B、Open “WORK.DAT” For append As # 1 C、Open WORK.DAT For output As # 1 D、Open WORK.DAT For append As # 1 8、(单选题)用于获得字符串S从第4个字符开始的4个字符的函数是___A___。(书本42页) A、MID(S, 4, 4) B、LEFT(S,4,4) C、MIDDLESTR(S,4,4) D、MIDSTR(S,4,4) 9、(单选题)下列叙述中错误的是____C__。(书本第1页) A、VB是采用了事件驱动片成机制 B、VB是面向对象的程序设计语言 C、VB是面向过程的程序设计语言 D、VB是可视化程序设计语言 10、下面程序在调试时出现了死循环, Private Sub Command1_Click() N= inputbox(“请输入一个整数”) Do If n mod 2=0 then N=n+1 Else N=n+2 End if Loop until n =1000 End Sub 下面关于死循环的叙述正确的是___A____。 A、输入任何整数都会出现死循环 B、只有输入的n是偶数时才会出现死循环,否则不会 C、只有输入的n是大于1000的整数时才会出现死循环,否则不会 D、只有输入的n是奇数时才会出现死循环,否则不会 11、在程序运行期间,当滚动条的滑块被拖动时,则立即出发滚动条的_____A___事件。(书本195页) A、Scroll B、Change C、DblClick D、Click 12、下列关系运算结果为“true”的是___B____。 A、”1”+”2” =”3” B、”1”&”2” =”12” C、”1”&”2” =”3” D、”1”+2 =”12” 13、(单选题)表达式3>4 and 7=5的返回值为___B____。 A、True B、False C、Yes D、No 14、(单选题)以下_____C____属性的属性值不能通过程序代码改变。 A、Enabled B、Backcolor C、Name D、Caption 15、(单选题)定义过程语句中可以是____D______。(书本139页:数组名或变量名) A、数组元素 B、表达式 C、常量 D、数组名 16、语句:Open”C:\MyFile.txt” for Output 用于打开一个顺序文件,但是该语句的一个重要错误是没有____D____。(书本255页) A、指定文件类型 B、指定打开方式 C、指定打开文件名 D、指定文件号 17、假定定时器控件的Interval属性为1000,Eabled属性为True,并且有下面的事件过程,程序运行时计算机将发出___C___次Beep声。 Sub Timer1_Timer() Beep End Sub A、0 B、1000 C、以上选项都不对 D、1 18、(单选题)启动Visval Basic有多种方法,以下不正确的是__D__.(书本11页) A、通过DOS方式直接运行相关的程序 B、通过“我的电脑”找到相应程序的可执行文件 C、通过“开始”菜单的“程序”命令 D、通过“开始”菜单的“运行”命令 19、(单选题)设“a=20,b=15,c=1”,执行语句”print a>b>c”后,窗体上显示的是___C____。 A、1 B、出错信息 C、false D、True 20、(单选题)读数据文件的操作可以通过下列__D____语句实现。 A、LINE INPUT# B、READ# C、READ LINE# D、GET# 21、(单选题)执行input语句时,如果从键盘上输入多个数据,数据之间用___A___隔开。(书本256页) A、逗号 B、空格 C、分号 D、冒号 22、(单选题)为了使命令按钮(名称为Command1)右移200,应使用的语句是____C____。 A、Command1.Left=Command1.Left-200 B、Command1.Move-200 C、Command1.Left=Command1.Left+200 D、Command1.Move 200 23、(单选题)下列说法中正确的是___B____ A、窗体的Name属性指定窗体的名称,用来标识一个窗体 B、窗体的Name属性值可以为空 C、窗体的Name属性值是显示在窗体标题栏中的文本 D、可以在运行期间改变窗体的Name属性的值 24、(单选题)以下程序的输出结果是___C___ Option ezplicit Private sub command_click() Dim a(10), p(3),k,i as integer K=5 for i =1 to 10 a(i)=i next i for i= 1 to 3 p(i)=a(i*i) next i for i= 1 to 3 k =k+p(i)*2 next i print k end sub A、37 B、35 C、33 25、(单选题)阅读下面的程序 a=5:b=9:c=14 a=a+b c=c-b if a-c>b-c then a=b+c if a-b>b-c then b=a-c 程序运行时输出结果是__A___ A、14 9 5 B、3 6 9 C、80 14 14 D、20 40 60 26、(单选题)下面对象中没有焦点属性的是___A___ A、标签控件 B、命令按钮控件 C、单选框控件 D、文本框控件 27、(单选题)下列属于VISUAL BASIC包括的对话框有__A____ A、文件对话框 B、文本对话框 C、图片对话框 D、项目对话框 28、(单选题)在窗体上面一个名称为Command1的命令按钮,然后编写如下事件过程。 Private sub command1_click() C=1234 C1=trim(str(c)) For i=1 to 4 Print_________ Next End sub 程序运行后,单击命令按钮,要求在窗体上显示如下内容: 1 12 123 1234 则在程序中下划线处应填入的内容为___D___ A、 Right(c1,i) B、Mid(c1,i,i) C、Mid(c1,i,1) D、Left(c1,i) 29、(单选题)在程序运行期间可以将图片装入窗体的函数是___D__(书本283页) A、DrawStryle B、PasswordChar C、InputBox D、LoadPicture 30、(单选题)以下不合法的单精度实数是__B___(书本28页) A、45.6! B、4.12E3.2 C、12.34 D、1.2E-3 31、(单选题)假定有如下的命令按钮(名称为Command1)事件过程: Private sub command1_click() x=inputbox(“输入:”,”输入整数”)