程序设计基础

1、在Visual Basic中，当将窗体的（）属性值设置为False时，将不显示窗体的控制菜单、最大化/最小化及关闭按钮。

A) MaxButton B) MinButton C) ControlBox D) WindowState

正确答案是: C

2、要在窗体上显示图片，需设置窗体的（）属性。

A) Caption B) Icon

C) Picture D) ControlBo

正确答案是: C

3、Visual Basic的编程机制是（）

A) 可视化 B) 面向对象

C) 面向图形 D) 事件驱动

正确答案是: D

4、下列叙述中正确的是（）。

A) 同一个事件的名称在不同的程序中可以不同

B) 事件是用户定义的

C) 对象的事件是不固定的

D) 事件是对象能够识别的动作

正确答案是: D

5、在正确安装Visual Basic 6.0后，可以通过多种方式启动Visual Basic 6.0。以下方式中，不能启动Visual Basic 6.0的是（）。

A）通过“我的电脑”找到vb6.exe，双击该文件名

B）进入DOS方式，执行vb6.exe文件

C）通过“开始”菜单中的“运行”命令

D）通过“开始”菜单中的“程序”命令

正确答案是: B

6、设计窗体时双击窗体的任何位置，将打开（）。

A）窗口设计器

B）代码窗口

C）工具箱窗口

D）属性窗口

正确答案是: B

7、）假定窗体上有一个标签，名为Label1，为了使该标签透明并且没有边框，则正确的属性设置为（）。 A）Label1.BackStyle=0

B）Label1.BackStyle=1

C）Label1.BackStyle=True

D）Label1.BackStyle=False

正确答案是: A

8、以下（）控件没有Caption属性。

A）CommandButton

B）CheckBox

C）TextBox

D）Label

正确答案是: C

9、在VB中，要将一个窗体装载到内存中进行预处理，但不显示，应该使用（）。

A）Show

B）Hide

C）Load

D）UnLoad

正确答案是: C

10、为了在按下Esc键时执行某个命令按钮的Click事件过程，需要将命令按钮的某属性值设置为True，该属性是（）。

A）Value

B）Default

C）Cancel

D）Enabled

正确答案是: C

VB语言基础

1、下面表达式中，（）的运算结果与其它三个不同。

A) Exp(-3.5) B) Int(-3.5)+0.5

C) -Abs(-3.5) D) Sgn(-3.5)-2.5

正确答案是: A

2、以下（）是Visual Basic中合法的函数使用。

A) exp.x B) exp(x) C) cos[x] D) sinx

正确答案是: B

3、表达式left("How are you",3)的值是（）

A) How B) are C) you D) How are you

正确答案是: A

4、表达式right("How are you",3)的值是（）

A) How B) are C) you D) How are you

正确答案是: C

5、在一个语句行内写多条语句时，语句之间应该用（）分隔。

A) 逗号 B) 分号 C) 冒号 D) 顿号

正确答案是: C

6、VB的数值型数据分为（）两种。

A）整数和长整数

B）整数和浮点数

C）单精度浮点数和双精度浮点数

D）整数和货币数据类型

正确答案是: B

7、表达式Abs(-5)+Len("ABCDE")的值是（）。

A）5ABCDE

B）-5ABCDE

C）10

D）0

正确答案是: C

8、下列是Visual Basic中所允许的形式数是（）。

A）±25.74

B）3.457E−100

C）368

D）1.87E+50

正确答案是: C

9、设a="Visual Basic"，下面语句中可使b="Basic"的是（）。

A）b=Left(a,8)

B）b=Mid(a,8,5)

C）b=Right(a,8)

D）b=Left(a,8,5)

正确答案是: B

10、设有如下变量声明“Dim aTime As Date”，则为变量aTime正确赋值的表达式是（）。 A）aTime =#11:34:04#

B）Time =Format(Time,"yy:mm:dd")

C）aTime =#"11:34:04"#

D）aTime =Format("hh:mm:ss",Time)

正确答案是: A

数据的输入与输出

1、函数MsgBox的返回值的类型为（）。

A) 字符型 B) 整数

C) 日期 D) 变体型

正确答案是: B

2、MsgBox函数中有4四个参数，其中必须写明的参数是（）。

A) 指定对话框中显示按钮的数目

B) 设置对话框标题

C) 提示信息

D) 所有参数都是可选的

正确答案是: C

3、如果要显示Visual Basic中的预定义输入对话框,需要调用Visual Basic 提供的（）函数。

A) MsgBox B) Open

C) Output D) InputBox

正确答案是: D

4、有如下程序

a=6:b=8

PRINT SQR(a*a+b*b)

END

运行时输出的结果是（）。

A) 6 B) 8 C) 10 D) 14

正确答案是: C

5、在立即窗口中执行下列语句：

str1=String$(3,"xyz")

str2=Space(1)

str3=Trim(Len$("32"))

str4=String(5,69)

Print str1;str2;str3;str4

其输出结果是（）。

A) zzz 2EEEEE B) xxx 32EEEEE

C) zzz2EEEEE D) xxx 2EEEEE

正确答案是: D

6、以下程序段在图片框中的输出是（）

a="Your"

b="Sname"

c="Iscr"

print right(a,3)

picture1.print mid(b,2,4)

print left(c,2)

A) name B) our

C) IS D) ourname

正确答案是: A

7、如果Tab函数的参数小于1，则Print方法的打印位置在第（）列

A) 2 B) 0 C) 3 D) 1

正确答案是: D

8、在窗体上已建立了多个控件，如Text1、Label1、Command1，要使程序一运行焦点就定位在Command1上，应将Command1的（）属性设置为0

A) TabIndex B) Index C) TabStop D) Enabled

正确答案是: A

9、在窗体上已建立了多个控件，如Text1、Label1、Command1，要使程序一运行焦点就定位在Command1上，应将Command1的TabIndex属性设置为（）

A) 0 B) 1 C) 2 D) -1

正确答案是: A

10、如果将布尔常量True赋值给一个整型变量,则整型变量的值为（）。

A) 0 B) -1 C) Ture D) false

正确答案是: B

顺序、选择结构

1、在Visual Basic中，以下（）可以作为字符串变量。

A) m B) #01/01/99# C) "m" D) True

正确答案是: A

2、下语句y=y+1的正确含义是（）：

A) 变量y的值与y+1的值相等

B) 将变量y的值加1后赋给变量y

C) 变量y的值为1

D) 将变量y的值存入到y+1中

正确答案是: B

3、以下哪一个是变量名是错误的（）。

A) AB_C B) ABC

C) AB.C D) A68

正确答案是: C

4、当程序运行时,在窗体上单击鼠标,以下（）

事件是窗体不会接收到的?

A) MouseDown B) MouseUp

C) Load D) Click

正确答案是: C

5、下列数据中，不属于浮点数的为（）。

A) 123.4556e-3 B) 234.23d5

C) "0.243D5" D) 23.234

正确答案是: C

6、下列程序执行后，变量x的值为（）。

Dim a, b, c, d As Single

Dim x As Single

a = 10 :

b = 30 :

c = 400

If b > a Then

d = a: a = b: b = d

End If

If b > c Then

x = b

ElseIf a > c Then

x = c

Else

x = a

End If

A）10

B）30

C）400

D）430

正确答案是: B

7、下面程序段（）能够实现条件：如果x

A) if x

print a

C) if x

a=16:print a else

else a=-16

a=-16:print a print a

end if end if

正确答案是: C

8、下列程序段的执行结果是（）

a="1"

b="6"

a=val(a)+val(b)

b=val("16")

if a<>b then print a-b else print b-a

A) 9 B) -9 C) 7 16 D) 0

正确答案是: B

9、要计算当0

A) if 0

C) if 0

正确答案是: C

10、下列程序的执行结果为

a=75

if a>60 then i=1

if a>70 then i=2

if a>80 then i=3

if a>90 then i=4

print "i=";i

A) i=1 B) i=2 C) i=3 D) i=4

正确答案是: B

循环结构

1、语句y=y+1的正确含义是（）：

A) 变量y的值与y+1的值相等

B) 将变量y的值加1后赋给变量y

C) 变量y的值为1

D) 将变量y的值存入到y+1中

正确答案是: B

2、有如下程序

s=0:i=1

do while i<=100

s=s+i

loop

print s

A) 5050 B) 505 C) 死循环，无输出 D) 无穷大的数

正确答案是: C

3、单击窗体时输出"斐波那契数列"的前20项.该数列第一项为1,第二项为1,其后每一项的植都是前两项的和.即: 1,1,2,3,5,8,13...

从题后供选的答案中选出正确的答案，填入以下程序中相应处，构成完整程序。

private sub form_click()

x1=1

x2=1

n=0

do while n<10

print x1,x2

x1=_____

x2=x1+x2

n=n+1

loop

end sub

A) x1+x2 B) x2 C) x1+n D) x2+n

正确答案是: A

4、下列程序的执行结果为

s=0:t=0:u=0

for x=1 to 3

for y=1 to x

for z=y to 3

s=s+1

next z

t=t+1

next y

u=u+1

next x

print s;t;u

A) 3 6 14 B) 14 6 3 C) 14 3 6 D) 16 4 3 正确答案是: B

5、Do while〈条件〉- Loop循环对循环体的执行过程是

A) 先执行循环体，再测试〈条件〉是否成立

B) 先测试〈条件〉是否成立，如果满足条件，才能执行循环体

C) 当〈条件〉为假时，执行循环

D) 当〈条件〉为真时，循环体的所有语句都被执行

正确答案是: B

6、判断下面程序段是计算哪一个数学式的（）。

n=inputbox("输入n的值")

x=inputbox("输入x的值")

t=1:s=0:p=1

For i = 2 To 2*n step 2

t=t*i

p=p*x

s=s+p/t

next i

print s

A) 1+x/2!+x/4!+…+x/2N!

B) 1+x/2!+x^2/(2x4)+x^3/(2x4x6)…+x^n/(2x4x6x…x2n)

C) 1!+x/2+x^2/4+x^3/6…+x^n/2n

D) 1+x^2/2+x^4/()2x4+…+x^(2n)/2N!

正确答案是: B

7、下面程序段的输出结果是（）。

p=0

s=0

do

p=p+2

s=s+p

loop while p<11

print p,s

A) 12 42 B)11 30 C) 10 30 D) 12 30

正确答案是: A

8、下列语句组中，不能实现循环100次的有

A) n=0 B) n=0

do do

n=n+1 n=n+1

loop until n>=100 loop while n<100

C) n=0 D) n=0

do do while n<100

n=n+1 n=n+1

loop until n<100 loop

正确答案是: C

9、下列程序段的结果为

a="ABBACDDCBA"

for i=6 to 2 step -2

x=mid(a,i,i)

y=left(a,i)

z=right(a,i)

z=x & y & z

next i

print z

A) ABA B) AABAAB C) BBABBA D) ABBABA

正确答案是: C

10、为了计算1+3+5+…+99的值，某人编程如下：

k=1

s=0

While k<=99

k=k+2:s=s+k

Wend

Print s

在调试时发现运行结果有错误，需要修改。下列错误原因和修改方案中正确的是（）。 A）While…Wend循环语句错误，应修改为For k=1 To 99…Next k

B）循环条件错误，应改为 While k<99

C）循环前的赋值语句k=1错误，应改为k=0

D）循环中两条赋值语句的顺序错误，应改为s=s+k:k=k+2

正确答案是: D

常用控件

1、列表框中的列表项的数目可以通过以下哪个属性的值获得

A) count B) listcount C) listindex D) index

正确答案是: B

2、要清除列表框中所有的列表项时，应使用以下那种方法

A) remove B) clear C) removeitem D) move

正确答案是: B

3、决定控件上文字的字体、字型、大小、效果的属性是

A) text B) caption C) name D) font

正确答案是: D

4、下列不能打开属性窗口的操作是

A) 执行“视图”菜单中的“属性窗口”命令

B) 按“f4”键

C) 按ctrl+t

D) 单击工具拦上的“属性窗口”按钮

正确答案是: C

5、用于设置粗体字的属性是（）。

A) Fontname B) Fontsize C) FontItalic D) FontBold

正确答案是: D

6、以下说法正确的是（）。

A) 图片框控件除了可以显示图形外，还可以作为控件的容器

B) 图像框控件除了可以显示图形外，还可以作为控件的容器

C) 图片框控件可以延伸任何类型的图形的大小以适应控件的大小

D) 图像框控件不能延伸任何类型的图形的大小以适应控件的大小

正确答案是: A

7、组合框是文本框和（）特性的组合。

A）复选框

B）标签

C）列表框

D）目录列表框

正确答案是: C

8、假定在图片框Picturel中装入了一个图形，为了清除该图形（注意，清除图形，而不是删除图片框），应采用的正确方法是（）。

A）选择图片框，然后按Del键

B）执行语句Picturel.Picture = LoadPicture("")

C）执行语句Picturel.Picture = ""

D）选择图片框，在属性窗口中选择Picture属性条，然后按回车键

正确答案是: B

9、程序运行时，当在空文本框中依次输入1234时，窗体上显示的是（）。

Private sub Text1_Change()

Print Text1;

End Sub

A）1234

B）12

C）1121231234

D）10

正确答案是: C

10、在窗体上画一个名称为Text1的文本框，然后画一个名称为Hscroll1的滚动条，其Min和Max属性分别为和错误！未找到目录项。。程序运行后，如果移动滑块，则在文本框中显示滚动条的当前值。以下能实现上述操作的程序是（）。

A） Private Sub Hscroll1_Change()

Text1.Text=HScroll1.Value

End Sub

B） Private Sub Hscroll1_Click()

Text1.Text=HScroll1.Value

End Sub

C） Private Sub Hscroll1_Change()

Text1.Text=Hscroll1.Caption

End Sub

D） Private Sub Hscroll1_Click()

Text1.Text=Hscroll1.Caption

End Sub

正确答案是: A

数组

1、用下面语句定义的数组的元素个数是

dim a(-3 to 5) as integer

A) 6 B) 7 C) 8 D) 9

正确答案是: D

2、下列程序的执行结果是（）。

Private Sub Form_Activate()

Dim score(3) As Integer, total As Integer

Dim aa_score As Variant

score(1) = 50: score(2) = 14: score(3) = 36

total = 0: i = 0

For Each aa_score In score

i = i + 1

tota1 = tota1 + aa_score

Print i, aa_score, tota1

Next

End Sub

A）

1 0 0

2 50 50

3 1

4 64

4 36 100

B）

1 50 50

2 14 64

3 36 100

C）

0 50 50

1 14 64

2 36 100

3 36 100

D）

0 0 0

1 50 50

2 14 64

3 36 100

正确答案是: A

3、有以下程序段，单击命令按钮执行程序后，输出结果为（）。 Option Base 1

Private Sub Command1_Click()

Dim x

x = Array(23, -5, 17, 38, -31, 46, 11, 8, 5, -4) s1 = 0 : s2 = 0

For k = 1 To 10

If x(k) > 0 Then

s1 = s1 + x(k)

Else

s2 = s2 + x(k)

End If

Next k

Y = s1/Abs(s2)

Print Y

End Sub

A）148

B）40

C）-40

D）3.7

正确答案是: D

4、执行以下程序，在窗体上输出（）。

Private Sub Command1_Click()

Dim a(20)

For j = 1 To 20 Step 2

a(j) = j

Next j

Print a(1) + a(2) + a(3)

End Sub

A）4

B）5

C）6

D）7

正确答案是: A

5、下面语句中错误的是（）。

A）ReDim Preserve Matrix(10,Ubound(Matrix,2)+1)

B）ReDim Preserve Matrix(Ubound(Matrix,1)+1,10)

C）ReDim Preserve DynArray(Ubound(DynArray)+1)

D）ReDim DynArray(Ubound(DynArray)+1)

正确答案是: B

6、假设用复制、粘贴的方法建立了一个命令按钮数组Command1，以下对该数组的说法错误的是（）。 A）命令按钮的所有Caption属性都是Command1

B）在代码中访问任意一个命令按钮只需使用名称Command1

C）命令按钮的大小都相同

D）命令按钮共享相同的事件过程

正确答案是: B

7、下列程序段错误的是（）。

A）Dim a As Integer

a=array(1,2,3,4)

B）Dim a(),b()

a=array(1,2,3,4)：b=a

C）Dim a As Variant

a=array(1,"asd",true)

D）Dim a() As Variant

a=array(1,2,3,4)

正确答案是: A

8、使用语句Dim A(1 To 10) As Integer声明数组A后，以下叙述正确的是（）。

A）A数组中的所有元素值为0

B）A数组中的所有元素值不确定

C）A数组中的所有元素值为Empty

D）执行语句“Erase A”后，A数组中的所有元素值为Null

正确答案是: A

9、在窗体上画个4文本框，并用这4个文本框建立一个控件数组，名称为Text1（下标从0开始，自左至右顺序增大），然后编写如下事件过程：

Private Sub Command1_Click()

For Each TextBox In Text1

Text1(i) = Text1(i).Index

i = i + 1

Next

End Sub

程序运行后，单击命令按钮，4个文本框中显示的内容分别为（）。

A）0 1 2 3

B）1 2 3 4

C）0 1 3 2

D）出错信息

正确答案是: A

10、有以下程序段，执行该段程序后，输出结果是（）。 Private Sub Command1_Click()

Dim s(3, 3)

For i = 1 To 3

For j = 1 To 3

If i = j Then

s(i, j) = 1

Else

s(i, j) = 0

End If

Print s(i, j),

Next j

Print

Next i

End Sub

A）

0 1 0

1 0 0

0 0 1

B）

1 0 0

0 1 0

0 0 1

C）

1 1 1

0 0 0

1 1 1

D）

1 0 1

0 1 0

1 0 1

正确答案是: B

VB程序设计作业参考答案

《VB程序设计》作业参考答案 一．选择题 1－5 ABC CB 6—10 CCA DC 11－15 ABC DB 15－20CDA CB 21－25DBD CC 25－30DAC AA 31－35 DAC AA 36－40 BCC CD 41－45 CCC AC 46－50DDB AD 51－55 ACA CD 56－60 BCA DA 61－65 BAADB 66－70DBDAC 71－75BBBAD 76—80CDABC 81-85ABCD C 86-90BAADD 91-95CBBAD 96.B 二．填空题 (1) E (2) 程序代码(3) CmdDisplay.Visible =False(4) t=a(j)(5) And (6) 回车符(7) text2.setfocus (8) 3 (9) D=B:B=C:C=D (10) Random （11）事件过程(12) 打开对话框(13) 3 (14) a(i,j)=0 (15) L1.text (16) Put # (17) True (18) I MOD 4=0 (19) AaBbCc （20）INT(Rnd*100) ；arr （21）Output ；Write #1,StuNo,StuName,StuEng (22)10 (23)4 (24) 顺序，随机 (25)INPUT,OUTPUT,APPEND （26）程序代码窗口的字符过大或过小，可以通过（工具→选项→编辑器格式→大小）去改变。（27）窗体、控件、对象（28）界面设计（29）对象、代码（30）窗体、标准模块、类模块、工程（31）窗体(Form)、图片框(PictureBox)、打印机(Printer)、立即窗口(Debug) （32）E D（33）81 （34）程序，数据（35）窗体、控件、对象（36）对象、代码（37）用户界面的窗体、执行具体操作的代码。（38）Picture属性、剪切板把图形粘贴 三．编程题 1. Option Base 1 Private Sub Form_click() Dim a(3) As Integer, m As Integer Do While m <> -1 And i < 3 m = InputBox("请输入第" & i + 1 & "条边") i = i + 1 a(i) = m If a(i) < 0 Then MsgBox "输入错误，请重新输入！" i = i - 1 End If Loop If a(1) + a(2) > a(3) And Abs(a(1) - a(2)) < a(3) Then

VB程序的设计_试题与答案_1

《VB程序设计基础》试题 一、选择题：（每空 2 分，共 20 分） 1. 与传统的程序设计语言相比,Visual Basic最突出的特点是___________。 A. 结构化程序设计 B. 程序开发环境 C. 事件驱动编程机制 D. 程序调试技术 2. Visual Basic 是一种面向对象的程序设计语言，构成对象的三要素是________。 A. 属性、事件、方法 B. 控件、属性、事件 C. 窗体、控件、过程 D. 窗体、控件、模块 3. 窗体模块保存在一个扩展名为__________的文件中。 A. bas B. vbp C. vbg D. frm 4. 下面正确的赋值语句是_________。 A. x+y=30 B. y=π*r*r C. y=x+30 D. 3y=x 5. 设S=“492”，表达式Right（S,1）+Left（S,1）+Mid（S,2,1）的值为__________。 A.“492” B.“249” C.“294” D.“429” 6. 将数学表达式a≤b≤c写成Visual Basic表达式，正确的是__________。 A. a<=b<=c B. a<=b Or b<=c C. a<=b And b<=c D. a<=b Not b<=c 7.为了把焦点移到文本框，所使用的方法是___________。 A. SetFocus B.Visible C.Refresh D.GetFocus 8. INT（100*RND）产生的随机整数的闭区间是_____________。 A.[0，100] B.[1，100] C.[1，99] D.[0，99] 9. 一个数组说明为Dim a(0 to 5，1 to 5) As Integer，则该数组共有_________个 元素。 A. 5 B. 36 C. 30 D. 不确定 10. 下面过程定义语句合法的是____________。

VB程序设计网上作业2016

题1.若要使命令按钮不可操作，要对下列哪个属性进行设置 A、Enabled B、Visible C、BackColor D、Caption 标准答案:A 题2.打开文件的Open语句中，如果省略“For模式”，则打开的文件的存取方式是 A、顺序存取方式 B、顺序文件方式 C、随机存取方式 D、二进制方式 标准答案:C 题3.命令按钮、单选按钮、复选框上都有Picture属性，可以在控件上显示图片，但需要通过下列哪一个属性来控制 A、Appearance属性 B、Style属性 C、DisabledPicture属性 D、DownPicture属性 标准答案:B 题4.系统启动时自动执行下列哪一个事件过程

A、Load B、Click C、UnLoad D、GotFocus 标准答案:A 题5.VB工程中窗体文件的扩展名是 A、.bas B、.frm C、.vbg D、vbp 标准答案:B 题6.如下数组声明语句，正确的是 A、Dim x[1,4] As integer B、Dim x(1, 1 to 4) As integer C、Dim x([1,n] As integer D、Dim x(1 4) As integer 标准答案:B 题7.如下VB的特点中错误的是 A、简单易学 B、界面友好

C、不可编译 D、集成化环境 标准答案:C 题8.从随机文件读出数据使用的语句是 A、Input # 文件号，变量名 B、Get # 文件号，变量名 C、Put # 文件号，变量名 D、Write # 文件号，变量名 标准答案:B 题9.为了防止用户随意将光标置于控件之上，应 A、将控件的TabIndex属性设置为0 B、将控件的Tapstop属性设置为True C、将控件的TapStop属性设置为False D、将控件的Enabled属性设置为False 标准答案:D 题10.如果希望在InputBox的提示项中输出多行内容时，需要使用下列哪个参数实现 A、Chr(13)+Chr(10) B、Chr(13) C、Chr(10) D、Chr(10)+Chr(13) 标准答案:A

VB程序设计-2017年6月在线考试答案

《VB程序设计》课程综合复习资料 一、单项选择 1．若要使标签控件显示时，不覆盖其背景内容，应设置标签控件的（D ）属性。 A．BACKCOLOR B．BORDERSTYLE C．FORECOLOR D．BACKSTYLE 2．如果要在文本框中输入字符时，只显示某个字符，如星号（*），运行时，在文本框中输入的字符仍然显示出来，而不显示星号，原因可能是（B ） A．文本框的MULTILINE属性值为TRUE B．文本框的LOCKED属性值为TRUE C．文本框的MULTILINE属性值为FALSE D．文本框的LOCKED属性为FALSE 3．下列关于属性设置的叙述错误的是：（A） A．一个控件具有什么属性是VB预先设计好的，用户不能改变 B．一个控件具有什么属性是VB预先设计好的，用户可以改变 C．一个控件的属性即可以在属性窗口中设置，也可以用程序代码设置 D．一个控件的属性在属性窗口中设置，还可以利用程序代码为其设置新值 4．下列说法正确的是（C ） A．对象属性只能在“属性窗口”中设置 B．一个新的工程可以在“工程窗口”中建立 C．必须先建立一个工程，才能开始设计应用程序 D．只能在“代码窗口”中编写程序代码 5．下列关于窗体上控件的基本操作错误的是：（A ） A．下一次DEL键只能删除一个控件 B．按下一次DEL键可以同时删除多个控件

C．按住SHIFT键，然后单击每个要选择的控件，可以同时选中多个控件 D．按住ALT键，然后单击每个要选择的控件，可以同时选中多个控件 6．下列关于设置控件属性的叙述正确的是（C ） A．用户必须设置属性值 B．所有的属性值都可以由用户随意设定 C．属性值不必一一重新设置 D．不同控件的属性项都完全一样 7．如果将布尔常量值TRUE赋值给一个整型变量，则整型变量的值为（B ） A．0 B．-1 C．TRUE D．FALSE 8．下列关于控件画法的叙述错误的是（D ） A．单击一次工具箱中的控件图标，只能在窗体上画出一个相应的控件 B．按住CTRL键后单击一次工具箱中的控件图标，可以在窗体上画出多个相同类型的控件C．双击工具箱中的控件图标，所画控件的大小和位置是固定的 D．不合用工具箱中的控件工具，不可以在窗估上画出图形对象，但可以写入文字字符9．应用程序设计完成后，应将程序保存，保存的过程是（D ） A．只保存窗体文件即可 B．只保存工程文件即可 C．先保存工程文件，之后保存窗体文件 D．先保存窗体文件（或标准模块文件），之后还要保存工程文件 10．VB应用程序的运行模式是（C ） A．解释运行模式B．编译运行模式C．两者都有D．汇编模式 11．可视化编程的最大优点是（C） A．具有标准工具箱

VB程序设计大作业报告

VB程序设计大作业报告 班级：机械11102班学号：201103112 姓名：孙文斌日期：2013.05.13 一、设计题目：《抓交通肇事犯》 一辆卡车违反了交通规则，撞人后逃逸。现场有三人目击事件，但都没有记住车号，记住车号的一些特征。甲说：车号的前两位数字是相同的；乙说：车号的后两位数字 是相同的，但与前两位不同；丙是位数学家，他说：四位的车号正好是一个整数的平 方。现在请你根据以上线索帮助警方找出车号以便尽快破案 二、问题分析与算法设计： 按照题目的要求造出一个前两位数相同、后两位数相同且相互间又不同的整数，然后判断该整数是否是另一个整数的平方。 假设这个四位数的前两位数字都是i，后两位数字都是j，则这个可能的四位数k为：k = 1000 * i + 100 * i + 10 * j + j 其中，i和j都在0~9之间变化。现在还需使k满足是一个整数c的平方，由于k是一个四位数，所以，m值不可能小于31和大于100，因此，可从31开始试验到100，看是否满足k == c*c，若不满足，则c加1再试，直到找到满足这些限制条件的k为止结束测试。 三、界面与结果截图： 界面截图：

结果截图： 四、结果分析与总结： 通过结果截图我们知道最后得到的车牌号为7744，首先检验甲叙述的前两位数字相同都为7，再检验乙叙述的车牌号后两位相同都为4且不与前两位相同，最后检验丙叙述的该车牌号为88的平方，所以综合上述检验分析结果满足题意。 通过此次VB程序设计从理论到实践，我学到很多很多的的东西，让我对vb程序编写有了一个初步认识。从最初的拿到题目无从下手，接着网上查阅些材料以及反复看书本上的例题使我对这个程序的编写有了一个大致轮廓，接着在草稿纸上写下程序代码，然后到计算机上反复调试，最终才算完成。在这反复调试的过程中我明白了时间是检验真理的唯一标准。这对我今后的学习中都会起到非常重要的作用。最后衷心感谢李宁老师对我vb课程的指导，祝您身体健康，工作愉快。 附录程序源代码： Private Sub command1_click() Dim i%, j%, k%, c% For i = 0 To 9 For j = 0 To 9 If i <> j Then k = i * 1000 + i * 100 + j * 10 + j For c = 31 To 100 If (c * c) = k Then Picture1.Print k End If Next c End If Next j Next i End Sub

电子科技大学15秋《VB程序设计》在线作业2满分答案

15秋《VB程序设计》在线作业2 一,单选题 1. DataCombo控件的RowSource属性是表示（）。 A. 给DataComebo控件提供列表项的字段 B. 目的表的数据源 C. 给DataCombo控件提供列表项的数据源 D. 更新目的表的字段 正确答案：C 2. 执行语句：Open "Tel.dat" For Random As #1 Len=50后，对文件Tel.dat中的数据能够执行的操作是（）。 A. 只能写，不能读 B. 只能读，不能写 C. 既可以读，也可以写 D. 不能读，不能写 正确答案：C 3. 在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程：Private Sub Command1_Click() Dim array1(10,10) As Integer Dim I, j As Integer For I=1 To 3 For j=2 To 4 array1(I, j)=I+j Next j Next I Text1.Text=array1(2,3)+array1(3,4) End Sub 程序运行后，单击命令按钮，在文本框中显示的值是（） 正确答案：A 4. 下列哪个属性设置文本框中文字的对齐方式（）。 A. SelLength B. Alignment C. Multiline D. ScrollBars 正确答案：B 5. 以下能判断是否到达文件尾的函数是（）。 A. BOF B. LOC C. LOF D. EOF 正确答案：D 6. 下面叙述错误的是（）。 A. 驱动器列表框DriveListBox显示当前系统中有效磁盘驱动器 B. 目录列表框DirListBox显示当前驱动器分层目录树 C. 文件列表框FileListBox显示选定目录中的所有文件 D. 文件列表框FileName属性是设定允许显示文件名的文件类型 正确答案：D

电子科技大学网络教育VB程序设计在线作业答案

在线考试一一正在答题 作业提交1 表达式2\2 *2/2*2 mod 2的结果是 (A) 0 (B) 25 (C) 5 (D) 1 2. 下列自宦义标识符中非法的是： (A) Me (B) My (C) third (D) fIRst 3. 表达式“A” Like "[A-Z]” 的结果为： (A) A (B) Z (C) TRUE (D) FALSE 4. 表达式x>= 20 and x<= 100,其中x=37 时，结果为 (A) 100 (B) 20 (C) TRUE (D) flase 5. 逻辑表达式1>0 and Not 2<7 or 2>6的值为 (A) 0 (B) FALSE (C) 3 (D) TRUE 6. 表达式x/=2,其中x = 24.运算后x的取值为： (A) 12 (B) 6 (C) 48 (D) 24 7. 下列可以作为VB变量的是： (A) a(x*y) (B) 学生信息

(C) lxyz (D) second 8. 表达式x*=2,其中x = 25,运算后x的取值为 (A) 50 (B) 625 (C) 25 (D) 27 9. 表达式100 mod 12的结果为： (A) 10 (B) 4 (C) 8 (D) 6 20. 下列自左义标识符中合法的是： (A) lMy (B) class (C) forth (D) @home 11. 表达式4?3的结果为： (A) 8 (B) 4 (C) 32 (D) 16 12. 表达式“张三” Like “张的结果为： (A) 张 (B) TRUE (C) FALSE (D) 张三 13. 后缀为?vbp的文件表示VB的 (A) 类模块文件 (B) 窗体文件 (C) 标准类模块文件 (D) 工程文件 14. 下列变量名合法的是 (A) a_2 (B) a-b (C) 2xy (D) float

VB程序设计作业(二)答案

《VB程序设计》作业（二） 客观题部分： 选择题（每题1分，共15题） 1. 当VB执行下面语句后，A的值为（A ）。 A=1IF A>0 THEN A=A+1IF A>1 THEN A=0 A）0 B）1 C）2 D）3 2. 当VB执行下面语句后，输出的结果是（B ）。 Private Sub Form_Click（） score = Int(Rnd * 10) + 30Select Case scoreCase Is < 10A$ = "F"Case 10 To 19A$ = "D" Case 20 To 29A$ = "C"Case 30 To 39A$ = "B"Case ElseA$ = "A"End SelectPrint A$End Sub A）AB）B C）C D）D 3. 执行下面的程序段后，x 的值为( C )。 x=2For i=1 To 10Step 3x=x+i\2Next i A) 2 B) 4 C) 7 D) 9 4. 假定有以下循环结构： Do Until 条件循环体Loop 则正确的描述是（ D ）。 A) 如果“条件”是一个为0的常数，则一次循环体也不执行 B) 如果“条件”是一个为0的常数，则至少执行一次循环体 C) 如果“条件”是一个不为0的常数，则至少执行一次循环体 D) 不论“条件”是否为“真”，至少要执行一次循环体 5. 假定有以下程序段： For i= 1 To 3For j= 5 To 1 Step -1Print i *jNextj , i 则语句“Print i *j”的执行次数是（ C ）。 A）20B）24 C）15 D）18 6. 以下程序段的输出结果为（ D ）。 x = 2y = 8Do Until y>8x = x * yy = y +1LoopPrint x A）2B）9 C）10 D）16 7. 用下面的语句所定义的数组的元素个数是（D ）。 Dim A（-3 To 5）As Integer A）6 B）7C）8D）9 8. 阅读下面的程序段： For i=1 To 2For j=1 To IFor k=j To 2x=x+1Next kNext jNext i 执行上面的三重循环后，x的值为( C )。 A) 3 B) 4 C) 5 D) 6 9.在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Command1_Click() For i=1 To 3x=2For j =1 To 2x=4For k=1 To 3x=x+5Next kNext jNext i Print xEnd Sub 程序运行后，单击命令按钮，输出结果是( B )。 A) 11 B) 19 C) 57 D) 63 10. 在窗体上画两个文本框Text1和Text2，一个命令按钮Command1，然后编写如下事件过程： Private Sub Command1_Click()

VB程序网上作业答案

客观题_0001 试卷总分：100 测试时间：240 单项选择题判断题 一、单项选择题（共20 道试题，共80 分。） 1. 用户在组合框中输入或选择的数据可以通过一个属性获得，这个属性是（）。 A. List B. Listindex C. Text D. Listcount 2. 在设计菜单时，如果要在菜单中加入一个菜单分隔条，则菜单分隔条的标题必须设置 为（）。 A. 加号（+） B. 减号（-） C. 星号（*） D. 感叹号（!） 3. 保存新建的工程时，默认的文件夹是（）。 A. My Document B. VB98 C. "\ " D. Windows 4. 要清除列表框的所有容，可用（）方法来实现。 A. RemoveTtem B. Cls C. Clear D. 以上均不可以 5. 用标准工具栏中的工具按钮不能执行的操作是（）。 A. 添加工程 B. 打印源程序 C. 运行程序 D. 打开工程 6. 改变驱动器列表框的Drive属性值，将激活（）事件。 A. Change B. Scoll C. KeyDown D. KeyUp 7. 下列语句语确的是（）。 A. a=1 b=2 c=3 B. a=l：b=2：c=3 C. a=1，b=2，c=3 D. a=1；b=2；c=3 8. 要在窗体Form1显示“myfrm”，使用的语句是（）。 A. Form. print "myfrm" B. Form.caption="myfrm"

C. Form1.print "myfrm" D. Form1.caption="myfrm" 9. 图象框Image没有的属性是（）。 A. Picture B. Appearance C. AutoRedraw D. 以上属性都没有 10. 可获得字符的ASCII码的函数是（）。 A. Val B. Fix C. Asc D. Chr 11. 计时器没有的属性是（）。 A. Interval B. Enable C. Size D. Index 12. 以下选项中，不是Visual Basic标准控件的是（）。 A. 复选框 B. 定时器 C. 窗体 D. 命令按钮 13. 下列不能打开菜单编辑器的操作是（）。 A. 按Ctrl+E B. 单击工具栏中的“菜单编辑器”按钮 C. 执行“工具”菜单中的“菜单编辑器”命令 D. 按Shift + Alt + M 14. 使文本框获得焦点的方法是（）。 A. Setfocus B. Lostfocus C. Gotfocus D. Change 15. 以下语句Print Format $(32548.5,"000,000.00") 的输出结果是（）。 A. 32548.5 B. 32,548.5 C. 032,548.50 D. 32,548.50 16. 为了使目录路径列表Dir1的容符合驱动器列表框Drive1的选择，应当（）。 A. 在Dir1_Click事件中加入Dir1.Path=Drive1.Drive B. 在Drive1_Click事件中加入Dir1.Path=Drive1.Drive C. 在Dir1_Click事件中加入Drive1.Path=.Drive.Path D. 在Dir1_Click事件中加入Drive1.Path=.Dir1.Path

VB程序设计基础

第4章VBScript基础知识 习题4 1. 选择题（可多选） （1）下列哪一个变量名称是正确的？B A. 1_ab B. ab_1 C. _ab D. ab? （2）在一段程序中a是一个变量，那么"a"是：B A. 变量 B. 直接常量 C. 字面常量 D. 符号常量 （3）下面哪条语句可以正确执行？（注：第四句我的主页两边是中文引号）C A. Response.Write "

我的主页

" B. Response.Write "

我的主页

" C. Response.Write "

我的主页

" D. Response.Write "

“我的主页”

" （4）执行语句a="6"后，变量a的数据子类型是?A A. 字符串 B. 日期 C. 数值 D. 布尔 （5）执行语句a="2008-8-8"后，变量a的数据子类型是?A A. 字符串 B. 日期 C. 数值 D. 布尔 （6）假设变量a=5、b=3，则执行语句c="a>b"后，变量c的数据子类型是?A A. 字符串 B. 日期 C. 数值 D. 布尔 （7）语句a="abc"="abc"运行完毕后，变量a的数据子类型是?C A. 数值 B. 字符串 C. 布尔 D. 日期 （8）执行语句a=3: a=a+5后，变量a的值是： A. 3 B. 5 C. 8 D. 出错 （9）已知x=123，那么执行语句y=x \10 Mod 10后，变量y的值是? A. 0 B. 1 C. 2 D. 3 （10）已知a= "ab"，那么执行语句b="cd'" & a & " " & "ef"后，变量b的值是? （提示：请注意题目和答案中的空格） A. "cd'ab ef" B. "cd'abef" C. "cdabef" D. "cdab ef" （11）下面的语句执行完毕后，变量a、b、c、d的值分别是? <% a="1"+"1": b="1"+1: c="1" & "1": d="1" & 1 %> A. "11"、"11"、"11"、"11" B. "11"、2、"11"、"11" C. 2、2、"11"、"11" D. "11"、"11"、2、2 （12）请问表达式Not(6+3<5+2)的值是？ A. True B. False C. 9 D. 无法计算 （13）请问Int(3.45)和Int(-3.45)的值分别是什么？ A. 4、-4 B. 3、-4 C. 3、3 D. 3、-3 （14）执行语句a=Int(10 * Rnd())后，则a的值不可能出现的有? A. 0 B. 1 C. 10 D. 11 （15）在取整时按四舍五入进行的函数是？ A. Int B. Fix C. Round D. CInt （16）请问Mid("八千里路云和月",3,2)的返回值是什么？ A. "千里" B. "里路" C. "里" D. "路云" （17）执行语句a=InStr(Trim(Replace(" abcdef ","c","")),"ef")后，变量a的值是? A. 0 B. 1 C. 4 D. 5 （18）函数DateDiff("m",#2008-8-8#,#2008-10-1#)的返回值是? A. 1 B. 2 C. 54 D. 5

VB程序设计(2015大作业)

《VB程序设计》大作业 一、大作业的内容 本次大作业要求学生根据所学知识以及个人爱好，设计开发一个VB应用小程序。要能体现出： 1．《VB程序设计》各种语句的综合使用能力； 2．《VB程序设计》各种相关控件的使用能力； 3．根据具体的设计题目，设计清晰、美观界面的能力； 4．一定的综合设计能力。 二、大作业的要求 本次大作业应满足以下要求： 实用性：应用程序要有明确的应用主题，有一定的实用价值。 结构性：应用程序具有良好的程序结构。 可读性：应用程序具有较好的可读性。 全面性：应用程序应包含比较全面的功能。 友好性：合理使用VB提供的各种控件，设计友好、美观的使用界面。 三、大作业的步骤 1．根据个人兴趣、爱好，以及提交时间的要求，自己确定设计题目（可参考附件1）； 2．查找与设计题目相关的资料； 3．进行应用程序总体结构、使用功能的设计； 4．进行应用程序的界面设计和源程序代码的编写； 5．上机编辑、调试程序； 6．保存应用程序, 并生成可执行文件； 7．撰写设计报告。 四、设计报告的基本格式 设计报告的基本内容至少包括封面、正文、总结三部分。 (1）．封面(包括：题目、班级、姓名、指导教师、完成日期等信息) (2)．正文 1、课题的选材过程（设计思路）； 2、设计的将要达到的目标； 3、总体设计结构与功能； （1）总体设计结构介绍（绘制：结构流程图） （2）各功能模块运行界面的功能、算法和操作步骤； 4、设计结果分析；（运行结果展示、正确性分析） (3)．总结（感想、收获、启发、存在的问题） 五、课程大作业提交 （1）形式设计报告+ 源程序文件(含可执行文件) 其中：<1>设计报告的封面统一（附件2）； <2>源程序文件（含*.vbp；*.frm；*.exe）打包压缩成一个文件， 以学号+姓名（例如：12020741姓名）为文件名。 （2）时间2015年6月1日之前； （3）方法纸质报告及压缩文件交各班学委，按顺序排好后由学委统一上交；

电子科技大学网络教育《VB程序设计》在线作业答案

答案+我名字在线考试——正在答题 作业提交1 1. 表达式2\2 * 2/2 * 2 mod 2的结果是 (A) 0 (B) 25 (C) 5 (D) 1 2. 下列自定义标识符中非法的是： (A) Me (B) My (C) third (D) fIRst 3. 表达式“A”Like “[A-Z]”的结果为： (A) A (B) Z (C) TRUE (D) FALSE 4. 表达式x >= 20 and x<= 100，其中x=37时，结果为： (A) 100 (B) 20 (C) TRUE (D) flase 5. 逻辑表达式1>0 and Not 2<7 or 2>6的值为 (A) 0 (B) FALSE (C) 3 (D) TRUE 6. 表达式x /=2 ,其中x = 24，运算后x的取值为： (A) 12 (B) 6 (C) 48 (D) 24

7. 下列可以作为VB变量的是： (A) a(x*y) (B) 学生信息 (C) 1xyz (D) second 8. 表达式x *=2 ,其中x = 25，运算后x的取值为： (A) 50 (B) 625 (C) 25 (D) 27 9. 表达式100 mod 12 的结果为： (A) 10 (B) 4 (C) 8 (D) 6 10. 下列自定义标识符中合法的是： (A) 1My (B) class (C) forth (D) @home 11. 表达式4<< 3 的结果为： (A) 8 (B) 4 (C) 32 (D) 16 12. 表达式“张三”Like “张_*”的结果为： (A) 张 (B) TRUE (C) FALSE (D) 张三 13. 后缀为.vbp的文件表示VB的 (A) 类模块文件 (B) 窗体文件 (C) 标准类模块文件 (D) 工程文件 14. 下列变量名合法的是

《VB程序设计基础》模拟精彩试题

《VB程序设计》模拟试题 ●填空题 1.窗体模块的文件扩展名为 ___FRM_________ 、标准模块的文件扩展名为____BAS______ 、 类模块文件的扩展名为______CLS_______ 。 2.Visual Basic中数据类型可分为 _____标准数据类型________和用户自定义数据类型两大类，前者根据其取值的不同，可分为_____整型_________、 ______长整型_____、布尔型和 ____字符型_________。 3. Abs(-6.5)= _____6.5______；Int(-9.1)= ____-10_______。 4. "程序"& "设计"运算结果为 ___程序设计____ 。 5. Dim a, b as Boolean语句显式声明变量a是___变体___变量，b是___布尔__变量。 6. MsgBox函数的返回值中， VBRetry表示单击了____重试_____按钮，VBYes表示单击了___是_____按钮，VBNo表示单击了_____否____按钮。 7. 要加载窗体，可以在代码中使用___________语句，要显示窗体，可以在代码中使用___________方法，要隐藏窗体，可以在代码中使用Hide方法，要卸载窗体，可以在代码中使用___________方法。 8.对话框分为_________对话框和________对话框两种类型，其中_____________ 对话框最 常用。 9. 对象是Visual Basic应用程序的基本单元，它是由 ___类___创建的。在Visual Basic中可以用属性、 __方法___、___事件___ 来说明和衡量一个对象的特性。 10. 条件判断语句可以使用___If…then____________语句、 ____If…Then…Else______语句和 ______If…Then…ElseIf______语句。Select case 语句 11. 声明一个值为3.14的常量Pi的语句为___Const pi = 3.14______。 12. Do…Loop Until 循环结构中，当条件为____真____时结束循环。 13. 要显示弹出菜单，可以在代码中使用_____________事件。 14. 参数传递有__________方式、__________方式和命名传递方式，常量默认采用__________方式；变量默认采用__________方式；表达式默认采用__________方式。 15. 名称属性必须以一个__字母标点_开始并且最长可达40个字符,不能包括__符号___ 和 ___空格___。 16.Visual Basic的程序模块有3种：____窗体模块____ 、标准模块和 ____类模块____。 17.Visual Basic程序，按其语句代码执行的先后顺序，可以分为___顺序__结构、选择__结构和___循环____ 结构。 18.数组元素下标的下界默认为是_____________，如果要改变其默认值，应使用_____________。 ●判断题 （）1. Visual Basic运行程序的方法只有编译模式。 （）2. 语句Command1.visible=false 与Command1.enabled=false 是等价的。 （）3. InputBox函数和MsgBox函数一样，返回的是字符串。 （）4. 通过类模块，我们不可以根据需要建立自己的控件。 （×）5. 2.1E+5是合法的Visual Basic数据。 （）6. 根据占用内存方式的不同，可将数组分为常规数组和动态数组两种类型。 （√）7. x2是合法的变量名。 （）8. 按照文件的存取方式及其组成结构可以分为两种类型：文本文件和随机文件。

新版VB作业答案

大学计算机基础及VB程序 设计 作 业 答 案 教师：阳韬 盐城工学院信息学院

第一次作业 一、选择题 5.算法的有穷行是指（A）。 A.算法程序的运行时间是有限的 B算法程序所处理的数据量是有限的 C.算法程序的长度是有限的 D.算法只能被有限的用户使用 6.算法的时间复杂度是指（C）。 A.算法的执行时间 B.算法所处理的数据量 C.算法执行过程中所需要的基本运算次数 D.算法程序中的语句或指令条数 7.算法的空间复杂度是指（B）。 A.算法程序中的语句或指令条数 B.算法在执行过程中所需要的计算机存储空间 C.算法所处理的数据量 D.算法在执行过程中所需要的临时工作单元数 16.以下数据结构中不属于线性数据结构的是（C）。 A.队列 B.线性表 C.二叉树 D.带链的栈 49.一颗二叉树中共有70个叶子结点与80个度为1的结点，则该二叉树中的结点总数应该为（A）。 A.219 B.221 C.229 D.23 50.在一棵二叉树上第7层的结点数最多是（C）。 A.16 B.32 C.64 D.128 64.对长度为n的线性表进行顺序查找，在最坏情况下所需要的比较次数为（B）。 A.n+1 B.n C.(n+1)/2 D.n/2 二、填空题 1.算法的基本特征是可行行、确定性、（有穷性）和（输入/输出性）。 2.算法的工作量大小和实现算法所需的存储单元多少分别称为算法的（时间复杂度）和空间（复杂度）。

16.一个栈的初始状态为空。首先将元素5、4、3、2、1依次入栈，然后退栈一次，再将元素A、B、C、D依次入栈，之后将所有元素全部退栈，则所有元素退栈（包括中间退栈的元素）的顺序为(1DCBA2345)。 17.一个队列的初始状态为空。现将元素A、B、C、D、E、F、5、4、3、2、1依次入队，然后在依次退队，则元素退队的顺序为（ABCDEF54321）。 一、选择题 1.结构化程序设计主要情调的是（B）。 A.程序的规模 B.程序的易读性 C.程序的执行效率 D.程序的可移植性 4.下列选项中不属于结构化程序设计原则的是（A）。 A.可封装 B.自顶向下 C.模块化 D.逐步求精 5.在面向对象方法中，实现信息隐蔽是依靠对象的（C）。 A.继承 B.多态 C.封装 D.分类 二、填空题 1.源程序文档化要求程序应加注释。注释一般分为序言性注释和（功能性注释）。 2.结构化程序设计的三种基本结构为顺序结构、选择结构和（循环结构）。 10.面向对象的模型中，最基本的概念是对象和（类）。 第二次作业 一、选择题 3、软件工程的出现是由于（C）。 A、程序设计方法学的影响 B、软件产业化的需要 C、软件危机的出现 D、计算机的发展 8、下面不属于软件工程的三个要素的是（B）。 A、工具 B、环境 C、方法 D、过程 34、软件设计中，有利于提高模块独立性的一个准则是（C）。 A、高内聚高耦合 B、低内聚高耦合 C、高内聚低耦合 D、低内聚低耦合 49、软件调试的目的是（B）。

VB程序设计阶段性作业1

中国地质大学(武汉)远程与继续教育学院 VB程序设计课程作业1（共4 次作业） 学习层次：专升本涉及章节：第1章——第4章 一、判断题 1．在Visual Basic中，有一些通用的过程和函数作为方法供用户直接调用。 2．在面向对象的程序设计中，对象是指可以访问的实体。 3．事件是由Visual Basic预先定义的对象能够识别的动作。 4．由Visual Basic语言编写的应用程序有解释和编译两种执行方式。 5．“事件过程”是用来完成事件发生后所要执行的程序代码。 6．在逻辑运算符Not、Or、And中，运算优先级由高到低依次为Not、Or、And。7．用DIM定义数值变量时，该数值变量自动赋初值为0。 8．函数InputBox的前3个参数分别是输入对话框的提示信息、标题以及默认值。9．函数MsgBox的前3个参数分别表示默认按钮、按钮样式以及图标样式。 二、选择题 1．在设计模式双击窗体中的对象后，Visual Basic将显示的窗口是。 A、项目（工程）窗口 B、工具箱 C、代码窗口 D、属性窗口2．窗体的FontName属性的缺省值是。 A、宋体 B、仿宋体 C、楷体 D、黑体3．将Visual Basic编制的程序保存在磁盘上，至少会产生何种文件。A、.doc与.txt B、.com与.exe C、.bat与.frm D、.vbp与.frm 4．运算符“\”两边的操作数若类型不同，则先再运算。

A、取整为Byte类型 B、取整为Integer类型 C、四舍五入为整型 D、四舍五入为Byte类型 5．Print语句的一个输出表达式为，则输出包括日期、时间信息。 A、Date B、Month C、Time D、Now 6. 语句Print "5*5" 的显示结果是。 A、25 B、"5*5" C、5*5 D、出现错误提示7．语句“Form1.Print T ab(10);"#"”的作用是在窗体当前输出行。4 A、第10列输出字符“#”B、第9列输出字符“#” C、第11列输出字符“#” D、输出10个字符“#” 三、填空题 1．事件是由Visual Basic预先定义的能够识别的动作。 2．新建工程时系统会自动将窗体标题设置为。 3．长整型变量（Long类型）占用个字节。 4．表达式81 \ 7 Mod 2 ^ 2的值是。 5．用随机函数产生一个两位整数的Visual Basic表达式是。 6．#20/5/01#表示类型常量。 7．设I为大于0的实数，写出大于I的最小整数的表达式。 四、程序设计题 1．编程，输入圆的半径，计算并输出圆的面积，按下列要求分别实现： （1）界面设计尽可能美观、大方。

作业一 简单VB程序设计

作业一简单VB程序设计 1.对于窗体，下面______属性在程序运行时其属性设置起作用。 （A）MaxButton （B）BorderStyle （C）Name （D）Left 2.类是对象的抽象，对象则是类的具体化。在窗体上建立的一个控件称为______。 （A）对象（B）容器（C）实体（D）类 3.若要使标签控件显示时不覆盖其背景内容，要对______属性进行设置。 （A）BackColor （B）BorderStyle （C）ForeColor （D）BackStyle 4.用一个程序段对一对象被单击(或双击)作出响应，从而实现指定的操作，称为______。（A）可视画化程序设计（B）事件驱动编程机制（C）过程化程序实际方法（D）非过程化程序设计语言 5.文本框没有______属性。 （A）Enabled （B）Visible （C）BackColor （D）Caption 6.不论何控件，共同具有的是______属性。 （A）Text （B）Name （C）ForeColor （D）Caption 7.要使Form1窗体的标题栏显示"欢迎使用VB"，以下______语句是正确的。 （A）Form1.Caption=“欢迎使用VB”（B）Form1.Caption='欢迎使用VB ' （C）Form1.Caption=欢迎使用VB （D）Form1.Caption="欢迎使用VB " 8.要使某控件在运行时不可显示，应对______属性进行设置。 （A）Enabled （B）Visible （C）BackColor （D）Caption 9.要使窗体在运行时不可改变窗体的大小和没有最大化和最小化按钮，只要对下列______属性设置就有效。（A）MaxButton （B）BorderStyle （C）Width （D）MinButton 10.当运行程序时，系统自动执行启动窗体的______事件过程。 （A）Load （B）Click （C）UnLoad （D）GotFocus 11.当文本框的ScrollBars属性设置了非零值，却没有效果，原因是______。 （A）文本框中没有内容（B）文本框的MultiLine属性为False （C）文本框的MultiLine属性为True （D）文本框的Locked属性为True 12.要判断在文本框是否按了Enter键，应在文本框的______事件中判断。 （A）Change （B）KeyDown （C）Click （D）KeyPress 13.将调试通过的工程经"文件"菜单的"生成.exe文件"编译成.exe后，将该可执行文件到其他机器上不能运行的主要原因是______。 （A）运行的机器上无VB系统（B）缺少.frm窗体文件（C）该可执行文件有病毒（D）以上原因都不对 14.当需要上下文帮助时，选择要帮助的"难题"，然后按______键，就可出现MSDN窗口及显示所需"难题"的帮助信息。 （A）Help （B）F10 （C）Esc （D）F1 15.Visual Basic有三种工作模式，它们分别是______模式。 （A）设计、编译和运行（B）设计、运行和中断 （C）设计、运行和调试（D）编译、运行和调试 答案：DADBD BDBBA BDADB

vb程序设计网上作业教案资料

2016V B程序设计网上 作业

题1.用来设置粗体字的属性是( ) A、FontItalic B、FontName C、FondBold D、FontSize 标准答案:C 题2.设置框架的下列哪一个属性值为False，其标题会变灰，框架中所有的对象均被屏蔽 A、Enabled B、Caption C、Name D、Visible用来设置粗体字的属性是( ) 标准答案:A 题3.如下数组声明语句中，数组a包含元素的个数为：( ) Dim a(1 to 3, -2 to 2, 3) A、120 B、75 C、60 D、13 标准答案:C 题4.当文本框的ScrollBars属性设置了非零值，却没有效果，原因是( ) A、文本框中没有内容

B、文本框的MultiLine属性为False C、文本框的MultiLine属性为True D、文本框的Locked属性为True 标准答案:B 题5.下列选项中不正确的是( ) A、Show方法可以用来加载和显示一个窗体 B、Hide方法可以将窗体暂时隐藏起来，而不从内存中删除 C、当用 Show方法显示窗体时，必定会发生Load事件 D、当用 Show方法显示窗体时，必定会发生Activate事件 标准答案:C 题6.表达式mid$(“1234567”, 3, 2)+4的结果是( ) A、3454 B、1234 C、38 D、45 标准答案:C 题7.下面循环语句控制的循环次数是：( ) For i=－5 To 18 Step 3 A、5 B、7 C、8

D、9 标准答案:C 题8.在用菜单编辑器设计菜单时，必须输入的项是( ) A、快捷键 B、标题 C、索引 D、名称 标准答案:D 题9.计时器控件的Interval属性可以设定Timer 事件触发的时间间隔，其时间间隔以下列哪一个为单位 A、毫秒 B、秒 C、分 D、小时 标准答案:A 题10.Dim a, b As Integer语句定义的变量类型为 ( ) A、a, b都是整型 B、a是整形, b未必是整型 C、a未必是整型, b是整型 D、a, b都不是整型 标准答案:C