北师大网网络教育VB程序设计一(答案)（共5篇）

第一篇：北师大网网络教育VB程序设计一(答案)

《VB程序设计》作业

（一）答案

客观题部分：

选择题（每题1分，共15题）

参考答案：

1D，2D，3C，4A，5C

6B，7D，8A，9A，10C

11B，12B，13C，14D，15D

主观题部分：

编程题（每题15分，共1题）

参考答案：

Private Sub Command1_ Click()

Dim x As Single

Dim amax As Single，amin As Singlex=InputBox(“请输入分数”)

amax=x amin=x Do While x>=0If x> amax Then

amax=x

End If

IF x

amin=x

End If

x=InputBox(“请输入分数”)

Loop

Print amax , amin

End Sub

第二篇：VB程序设计试题及答案(一)

VB程序设计试题及答案

（一）一、单选题

1.VB6.0是一种面向 B 的编程环境。

(A)机器(B)对象

(C)过程(D)应用

2.要使FormI窗体的标题栏显示“欢迎使用VB”，以下 D 语句是正确的。

(A)Forml.Caption=“欢迎使用VB”

(B)Forml.Caption='欢迎使用VB'

(C)Forml.Caption=欢迎使用VB

(D)Forml.Caption=“欢迎使用VB”

3.若要使命令按钮不可操作，要对 A 属性进行设置。

(A)EnabIed(B)Visible

(C)Backcolor(D)Caption

4.如果在窗体上已经创建了一个文本框对象TextI，可以通过 C 事件获得输入键值的ASCII码。

(A)Change(B)LostFocus

(C)KeyPress(D)GotFocus 5.下面 A 是合法的变量名。

(A)X_yz(B)123ab。(C)integer(D)X-Y 6.以下关系表达式 中，其值为False的是 A。

(A)“ABC”>“AbC”(B)“女”>“男”

(C)“BASIC”=UCase(“basic)(D)”123“<”23“

7.为了给x、y、z三个变量赋初值1，下面正确的赋值语句是 A。

(A)x=1:y=1:z=1(B)x=1,y=1,z=

1(C)x=y=z=1(D)xyz=1

8.VB提供了结构化程序设计的三种基本结构，三种基本结构是 D。

(A)递归结构、选择结构、循环结构

(B)选择结构、过程结构、顺序结构

(C)过程结构、输入输出结构、转向结构

(D)选择结构、循环结构、顺序结构

9.下面If语句统计满足性别为男、职称为副教授以上、年龄小于40岁条件的人数，不正确的语句是 D。

(A)If sex=”男“ And age=4O And InStr(duty，”教授“)>O Then n=n+l

(B)If sex=”男“ And age=4O And(duty=”教授“ Or duty=”副教授“)Then n=n+l

(C)If sex=”男“ And age=4O And Right(duty，2)=”教授“ Then n=n+l

(D)If sex=”男“ And age=4O And duty=”教授“ And duty=”副教授“ Then n=n+l

10.下列关于Do…Loop循环结构执行循环次数的描述正确的是 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循环至少执行一次

11.以下 B 是正确的For…Next结构。

(A)For x=1 To Step 10(B)For x=3 To-3 Step-3

…

…

Next x Next x(C)For x=1 To 10(D)For x=3 to 10 step re: … …

Next x Next y

If i=10 Then GoTO re

12.如下数组声明语句，B 是正确的。

(A)Dim a[3,4] As Integer

(B)Dim a(3,4)As Integer

(C)Dim a(n,n)As Integer

(D)Dim a(3 4)As Integer

13.下列语句中（假定变量n有值），能正确声明可变长数组的是 A。

(A)Dim a()As Integer(B)Dim a()As Integer

ReDim a(n)ReDim a(n)As String

(C)Dim a()As Integer(D)Dim a(10)As Integer ReDim a(3, 4)ReDim a(n+10)

ReDim Preserve a(4, 4)

14.要想从子过程调用后返回两个结果，下面子过程语句说明合法的是

C。

(A)Sub f2(ByVal n%, ByVal m%)(B)Sub f1(n%, ByVal m%)

(C)Sub f1(n%, m%)(D)Sub f1(ByVal n%, m%)

15.设有如下程序段：

Public Sub F1(n%)

…

n=3*n+…

End Sub

Private Sub Command1_Click()

Dim n%, m%

n=3

m=4

…

‘调用F1语句

…

End Sub

则在Command1_Click事件中有效的调用语句是 B。(A)Call F1(n+m)(B)Call F1(m)(C)Call F1(5)(D)Call F1(m+5)

16.用来设置粗体字的属性是 C。

(A)FontItalic(B)FontName(C)FontBold(D)FontSize

17.假定定时器的Interval属性为1000，Enabled属性为True，调用下面的事件过程，程序运行结束后变量x的值为 D。

Dim x As Integer

Sub Timer1_Timer()

For i=1 to 10

x=x+Next i

End Sub

(A)1000(B)10000(C)10(D)以上都不对

18.在下列关于通用对话框的叙述中，错误的是 B。

(A)CommonDialog1.ShowFont显示“字体”对话框

(B)在“打开”或“另存为”对话框中，用户选择的文件名可以经FileTitle属性返回

(C)在“打开”或“另存为”对话框中，用户选择的文件名机器路径可以经FileName属性返回

(D)

19.当用户按下并且释放一个键后会触发KeyPress、KeyUp和KeyDown事件，这三个事件发生的顺序是 C。

(A)KeyPress、KeyDown、KeyUp(B)KeyDown、KeyUp、KeyPress(C)KeyDown、KeyPress、KeyUp

(D)没有规律

20.在下面关于顺序文件的描述中，正确的是 C。(A)顺序文件中每行的长度都是相同的。(B)可以通过编程对文件中的某行方便地进行修改

(C)数据以ASCII码的形式存放在文件中，所以可通过记事本打开(D)文件的组织结构复杂 21.随机文件是因为 C。

(A)文件中的内容是通过随机数产生的(B)文件中的记录号通过随机数产生的(C)可对文件中的记录根据记录号随机地读/写(D)文件的每条记录的长度是随机的

22.从磁盘上读入一个文件名为“c:t1.txt”顺序文件，如下 A 正确。

(A)F=“c:t1.txt”

Open F For Input As #1(B)F=“c:t1.txt”

Open “F” For Input As #2(C)Open “c:t1.txt” For Input As #1

(D)Open c:t1.txt For Input As #2

23.坐标度量单位可由通过来 D 改变。

(A)Drawstyle属性(B)DrawWidth属性

(C)Scale方法(D)ScaleMode属性

24.指令“Circle(1000, 1000), 500, 8,-6,-3”将绘制 A。(A)画圆(B)椭圆(C)圆弧(D)扇形 25.用ADO数据控件建立与数据源的链接，设置操作过程按 A 顺序进行。

①选择数据源连接方式；②选择数据库类型；③指定数据库文件名；④指定记录源

(A)① ② ③ ④(B)② ③ ④ ①

(C)③ ① ② ④(D)① ③ ② ④

二、填空题

1．VB是建立在BASIC语言基础上的可见 化编程语言或编程环境。

2．在窗体上已建立多个控件如Text1、Label1、Command1，若要程序一运行时焦点就定位在Command1控件上，应对Command1控件设置 TabIndex 属性的值为 0。

3．在VB中，1234、123456&、1.2346E+5、1.2346D+5这4个常数分别表示 整形、长整形、单精度、双精度 类型。4．表示x是5的倍数或是9的倍数的逻辑表达式为 x mod 5 = 0 or x mod 9=0。

5．数组声明时下标下界默认为0，利用 Opation Base 1 语句可以使下标为1。

6．传地址方式是当过程被调用时，形参和实参共享 存储单元。7．窗体中的模块级变量应在 窗口模块 段声明，它作用于该窗体的全局范围。

8．当用户单击滚动条的空白处时，滑块移动的增量值由 LargeChange 属性决定。

9．如果菜单标题的某个字母前输入一个“&”符号，那么该字母就成了热键字母；如果建立菜单时在标题文本框中输入一个“1)

x(0)= 1

x(1)= 1

For i = 2 To n1)+ x(i1

Print x(i)，If(i + 1)Mod 5 = 0 Then Print

Next End Sub

输出结果： 1 2 3 8 13 21 34(2)Public Function f(m%, n%)

Do While m< >n

Do While m> n: m=m-n: Loop

Do While m< n: n=n-m: Loop

Loop

f=m

End Function

Print f(24, 18)

End Sub 输出结果：6(3)

Public x as Integer

Private Sub Fomr_Click()

Dim x as Integer

x=10

print ＂x=＂;x

End Sub 输出结果: x=10 2.补充程序

(1)以下是冒泡法排序的程序，要求将数组里的数按升序排列，将其补充完整。

Private Sub Command1_Click()

Dim a(), iMin%, n%, i%, j%, t%

a = Array(8, 6, 9, 3, 2, 7)

n = ubound(a)' 获得数组的下标上界

For i = 0 To n-1

For j = 0 To n-i-1

If a(j)>a(i)Then

t = a(j): a(j)= a(j + 1): a(j + 1)= t

End If

Next j

Next i

For i = 0 To n Print a(i);Next i End Sub

(2)用递归的方法求n!Private Sub Command1_Click()Print ”fac(4)=“;fac(4)End Sub

Public Function fac As Integer If n = 1 Then

fac = 1 Else

Fac=fac*n End If End Function

VB程序设计试题及答案

（三）一、单选题 1.Visual Basic是一种面向对象的可视化程序设计语言，采取了 A 的编程机制。

(A)事件驱动(B)按过程顺序执行(C)从主程序开始执行(D)按模块顺序执行

2.若要使标签控件显示时不覆盖其背景内容，要对 D 属性进行设置。

n=n*j n=n*j

Next j Next j

Print n Print n Next I Next i(C)n=1(D)n=1(A)Backcolor(B)BorderStyle(C)Forecolor(D)Backstyle 3.在Visual Basic中最基本的对象是 C，它是应用程序的基石，是其他控件的容器。

(A)文本框(B)命令按钮(C)窗体

(D)标签

4.要判断在文本框是否按下Enter键，应在文本框的 D 事件中判断。(A)Change(B)KeyDown(C)Click(D)KeyPress 5.数学表达式3≤x

(A)3<=x<10(B)3<=x AND x>10(C)x>=3 Or x<10(D)x>=3 AND x<10 6.Rnd函数不可能为下列 B 值。

(A)0(B)1(C)0.1234(D)0.0005 7.赋值语句:a=123+Mid(”123456“，3，2)执行后，a变量中的值是 D。

(A)”12334“(B)123(C)12334(D)157 8.对于语句If x=l Then y=l，下列说法正确的是 C。

(A)x=l和y=l均为赋值语句

(B)x=l和y=l均为关系表达式

(C)x=l为关系表达式，y=l为赋值语句

(D)x=l为赋值语句，y=l为关系表达式

9.下面程序段表示求两个数中的大数，D 不正确。

(A)Max=IIf(x>y，x，y)(B)If x>y Then Max=x Else Max=y(C)Max=x(D)Ify>=x Then Max=y If y>=x Then Max=y Max=x 10.当在文本框中输入“ABCD”4个字符时，窗体上显示的是 C。

Private Sub Text1_Change()Print Text1;End Sub(A)ABCD(B)A(C)AABABCABCD(D)A

B AB

C ABC

D ABCD 11.下列哪个程序段不能分别正确显示1！、2！、3！、4！的值 B。(A)For i=1 to 4(B)For i=1 to 4

n=1 For j=1 to i

For j=1 to I n=1

For j=1 to4 j=1

n=n*j Do While j<=4

Print n n=n*j Next j Print n j=j+1

Loop

12.如下数组声明语句，则数组a包含元素的个数有 A。

Dim a(3,-2 to 2, 5)

(A)120(B)75(C)60(D)13 13.以下程序的输出结果是 D。

Dim a

a=Array(1, 2, 3, 4, 5, 6, 7)For i=Lbound(a)to Ubound(a)

a(i)=a(i)*a(i)Next i Print a(i)

(A)49(B)0(C)不确定(D)程序出错

14.在过程中定义的变量，若希望离开该过程后，还能保存过程中局部变量的值，则应使用关键字 D 在过程中定义局部变量。

(A)Dim(B)Private(C)Public(D)Static 15.如下程序，运行的结果是 B。

Dim a%, b%, c%

Public Sub p1(x%, y%)

Dim c%

x=2*x: y=y+2: c=x+y End Sub

Public Sub p2(x%, ByVal y%)

Dim c%

x=2*x: y=y+2: c=x+y End Sub

Private Sub Command1_Click()

a=2: b=4: c=6

Call p1(a, b)

Print “a=”;a;“b=”;b;“c=”;c

Call p2(a, b)

Print “a=”;a;“b=”;b;“c=”;c

End Sub

(A)a=2 b=4 c=6(B)a=4 b=6 c=10 a=4 b=6 c=10 a=8 b=8 c=16(C)a=4 b=6 c=6(D)a=4 b=6 c=14 a=8 b=6 c=6 a=8 b=8 c=6 16.复选框的Value属性为1时，表示 B。

(A)复选框未被选中(B)复选框被选中

(C)复选框内有灰色的勾(D)复选框操作有误

17.下面关于菜单的说法中，错误的是 B。

(A)每个菜单项都是一个控件与其他控件一样也有自己的属性和事件

(B)除了Click事件之外，菜单项还能响应其他的，如DbClick事件

(C)菜单项的快捷键不能任意设置

(D)在程序执行时，如果菜单项的Enabled属性为False，则该菜单项变成灰色，不能被用户选择

18.下面关于多重窗体的叙述中，正确的是 B。(A)作为启动对象的Main子过程中能放在窗体模块中(B)如果启动对象是Main子过程，则程序启动时不加载任何窗体，以后由该过程根据不同情况决定是否加载或加载哪一个窗体

(C)没有启动窗体，程序不能执行(D)以上都不对

19.当用户将焦点移到另一个应用程序时，当前应用程序的活动窗体将 D。(A)发生DeActivate事件(B)发生LostFocus事件

(C)发生DeActivate和LostFocus事件(D)DeActivate和LostFocus事件都不发生 20.顺序文件是因为 D。

(A)文件中的数据按每行的长度从小到大排序好的(B)文件中的数据按某个关键数据项从大到小进行排序(C)文件中的数据按某个关键数据项从小到大进行排序(D)数据按进入的先后顺序存放的，读出也是按原写入的先后顺序读出

21.文件号最大可取值为 B。

(A)255(B)511(C)512(D)256 22.Print #1, STR$1中的Print是 A。

(A)文件的写语句(B)在窗体上显示的方法

(C)子程序名(D)以上均不是

23.以下的属性和方法中 C 可重定义坐标系。(A)Drawstyle属性(B)DrawWidth属性

(C)Scale方法(D)ScaleMode属性 24.封闭图形的填充方式由下列 C 属性决定。(A)DrawStyle, DrawMode(B)AutoRedraw, ClipControls

(C)FillStyle, FillColor(D)ForeColor, BorderColor 25.下列字符串中，D 不包含在ADO数据控件的ConnectionString属性中。(A)Microsoft Jet 4.0 OLE DB Provider(B)Data Source=C:Mydb.mdb(C)Persist Security Info=False(D)2-adCmdTable

二、填空题

1．在代码窗口对窗体的BorderStyle、MaxButton属性进行了设置，但运行后没有效果，原因是这些属性 在运行时设计是无效的。

2．在文本框中，通过 SelStart 属性能活得当前插入点所在的位置。

3．表达式Ucase(Mid(“abcdefgh”, 3, 4))的值是 CDEF。4．已知a=3.5，b=5.0，c=2.5，d=True，则表达式：a>=0 And a+c>b+3 Or Not d的值是 False。

5．要获得动态数组的上界通过 UBound 函数，下界通过 LBound 函数。

6．由Array函数建立的数组，其变量类型必须是 variant 类型。

7．VB中的变量按其作用域分为全局变量、模块变量和 局部变量 变量。

8．复选框的 Value 属性设置为2——Grayed时，变成灰色，禁止用户选择。

9．滚动条响应的重要事件有 Scroll 和Change。10．假定有一个通用对话框控件CommonDialog1，除了用COmmonDialog1.Action=3显示颜色对话框之外，还可以用 showcolor 方法显示。

11．窗体Form1的左上角坐标为(-200, 250)，窗体Form1的右下角的坐标为(300,-150)，则X轴的正向向 右，Y轴的正向向 上。

12．使用Circle方法画扇形，起始角、终止角取值范围为 0~2π。

13．在运行状态改变ADO数据控件的数据源连接属性后，必须使用 Refresh 方法激活这些变化。14．VB中工程文件的扩展名为 vbg。

15．如果在窗体上已经创建了一个文本框对象Text1，可以通过 Keypress 事件获得输入键值的ASCII码。16．VB中对象的三要素是 属性、事件 和 方法。

三、编程应用题 1.程序阅读

(1)Private Sub Command1_Click()

Dim s as String, i%

s=＂abcd＂

For i=Len(s)to 1 step-1 Print Mid(s, i, 1)Next i End Sub 输出结果：

d c b a(2)Sub Swap1(ByVal x%, ByVal y%)Dim t% t = x: x = y: y = t End Sub Sub Swap2(ByRef x%, ByRef y%)Dim t% t = x: x = y: y = t End Sub Sub Command1_Click()

Dim a%, b% a = 10: b = 20 Print ”调用Swap1前 a和b的值为：“;a;b Call Swap1(a, b)Print ”调用Swap1后按传值方式 a和b的值为：“;a;b a = 10: b = 20 Call Swap2(a, b)Print ”调用Swap2后按传地址方式 a和b的值为：“;a;b End Sub 输出结果

调用Swap1前 a和b的值为：10 20 调用Swap1后按传值方式 a和b的值为：10 20 调用Swap2后按传地址方式 a和b的值为： 20 10(3)Private Sub Command1_Click()

Dim x%, y%, z%

x=242: y=44

z=x*y

Do Until x=y

If x>y Then x=x-y Else y=y-x

Loop

Print x, z/x End Sub

输出结果: 22 484 2.补充程序

(1)以下是求1～18之间某个数的阶乘的程序，具体的数值n由滚动条HScroll1获得，结果显示在窗体下部的两个Label标签里。补充完整如下程序。

Private Sub HScroll1_Change()Dim i As Integer, s As Double s = 1

n = Hscroll1.Value If n <> 0 Then For i = 1 To n s = s*i Next i End If

Label2.Caption = n & ”!= " Label3.Caption = s End Sub

(2)以下程序的功能是：已知数组a，删除数组中某个元素。

Private Sub Command1_Click()

Dim a(), key%, i%, j%

a=Array(1, 6, 8, 3, 5, 9, 10, 2, 4, 7)

key=9

For i=0 to UBound(a)If a(i)=9 Then

For j=i+1 to UBound(a)a(j)=a(j+1)

Next j

ReDim a(j)=a(i)

MsgBox(＂删除完成＂)

Exit Sub End If

Next i

MsgBox(＂找不到要删除的元素＂)End Sub

读程序并填空 1．给定程序的功能是输出一组数的最大值和最小值，在画线处填入适当内容，将程序补充完整。

Private Sub

End Function

4．给定程序的功能是建立并输出除主、副对角线上的元素为5外，其余元素都为1的方阵，在画线处填入适当内容，将程序补充完整。Command1_Click()

X=Array(-112, 18, 20,-5,-100, 82, 91, 56, 78, 99, Private Sub Command1_Click()100)

Max=x(0)

Min=x(0)

For I=1 To 10

If x(I)>Max Then

_____________

End if

If x(I)>Min Then

_____________

End if

Next I

Print “MAX=”;Max , “MIN=”;Min

End Sub 2．若A2+B2+C2 , 则A，B，C称为一组勾股数，如下程序是找出100以内的所有勾股数，并按A，B，C顺序输出。请在画线处填入适当内容。

Private Sub Command1_Click()

For A=2 To 99

For B=A+1 To 100

C=_____________

If ____________ And C<=100 Then

Print A, B, C

End If

Next B Next A End Sub 3．本程序的功能是计算输入数的阶乘，请在画线处填上适当的内容使程序完整。

Private Sub form_Click()

Do

N=Val(InputBox(“请输入一个大于0的整数：”))

Loop Until N>0

Print Fact(N)

End Sub

Private Function Fact(M)

Fact= _______________（1分）

For I=2 To ____________（2分）

Fact = ______________（2分）

Next I

Dim A(10,10)

For I=1 To 10

For J=_______________（2分）

If __ _____________ Then A(I, J)=5 Else A(I, J)=1（1分）Next J Next I For I=1 To 10

For J=1 To 10

Print A(I, J);Next J

__ __________

（2分）Next I

End Sub

编写一个程序，在程序运行时输入一个0—99999之间的整数，判断输入的是几位数，并在窗体输出结果。

编写一个程序，在窗体上添加两个命令按钮，运行程序时，单击[开始]按钮，在窗体输出1~100之间所有能被3整除的数。单击[结束]按钮，结束程序。

第三篇：VB程序设计试题与答案

1.要使一个标签能够显示所需要的文本，应设置该标签的()属性的值(单)A.Caption B.Name

C.Text D.AutoSize 2.为使计时器对象每隔5秒钟产生一个时钟事件(Timer事件)，则其Interval属性值应设置为()(单)A.5

B.300

C.500

D.5000 3.下列的()对象支持KeyPress事件(单)A.文本框

B.命令按钮

C.标签框

D.图像框 4.确定一个控件在窗体上的位置的属性是()(单)A.Width或Height

B.Top和Height

C.Top或Width

D.Top和Left 5.确定一个窗体或控件的大小的属性是()(单)A.Width或Height

B.Top和Width

C.Top或Left

D.Top和Left

6.用户在屏幕上画出应用程序界面，并设置好对象的属性，系统便可以自动生成程序代码，这称为()(单)A.面向对象的程序设计

B.结构化程序设计

C.事件驱动的编程机制

D.程序设计 7.在VB中，工程文件的扩展名是()(单)A..frm

B..vbp

C..bas

D..frx 8.在VB中，窗体文件的扩展名是()(单)A..frm B..vbp

C..bas

D..frx 9.VB集成开发环境可以(单)A.编辑、调试、运行程序，但不能生成可执行程序 B.编辑、生成可执行程序、运行程序，但不能调试程序 C.编辑、调试、生成可执行程序，但不能运行程序 D.编辑、调试、运行程序，也能生成可执行程序 10.英文“VISUAL”的含义是()(单)A.可视化

B.集成C.结构化

D.调试

11.标准模块文件的扩展名是()(单)A.frm B.vbp C.bas

D.vbg 12.VB集成开发环境中，在()中编写代码(单)A.状态栏

B.属性列表框

C.代码框

D.标题栏

13.在面向对象的程序设计过程中，英文缩写“OOP”的含义是()(单)A.事件驱动的编程机制

B.结构化程序设计语言

C.面向对象的程序设计

D.可视化程序设计

14.在窗体上画一个名称为Timer1的计时器控件，要求每隔0.5秒发生一次计时器事件，则以下正确的属性设置语句是()(单)A.Timer1.Interval=0.5

B.Timer1.Interval=5

C.Timer1.Interval=50 D.Timer1.Interval=500 15在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click()a$=“VisualBasic” Print String(3,a$)End Sub 程序运行后，单击命令按钮，在窗体上显示的内容是()(单)A.VVV

B.Vis

C.sic

D.11

16.以下关于多重窗体程序的叙述中，错误的是()(单)A.用Hide方法不但可以隐藏窗体,且能清除内存中的窗体 B.在多重窗体程序中，各窗体的菜单是彼此独立的 C.在多重窗体程序中，可以根据需要指定启动窗体 D.对于多重窗体程序中，单独保存每个窗体 17以下合法的Visual Basic变量的名称是()(单)A.a3

B.Const

C.9abc

D.a#x!

18.当一个复选框被选中时，它的Value属性的值是()(单)A.3

B.2

C.1

D.0

19.表达式 5 Mod 3+53的值是()(单)A.0

B.3

C.4

D.6

20设x=4,y=8,z=7, 表达式：(x＜y)Or z＜x 的值是()(单)A.1

B.-1 C.TRUE D.FALSE 21设有如下程序段： x=2 For c=1 To 4 Step 2 x=x+c Next c 运行以上程序后，x的值是()(单)A.6 B.7 C.8 D.9

22执行如下两条语句，窗体上显示的是()(单)A=9.8596 Print Format(a,“000.00”)A.0,009.86 B.9.86 C.009.86 D.0,009.86

23下列说法中正确的是：为了保存一个Visual Basic应用程序，应当()(单)A.只保存窗体模块文件(.frm)B.只保存工程文件(.vbp)C.分别保存工程文件和标准模块文件(.bas)D.分别保存工程文件、窗体文件和标准模块文件

24.要使一个文本框对象能够显示多行文字，应设置该对象的()属性值为True(单)A.Text B.MultiLine C.Style D.Visible 25.若要将窗体从内存中卸载，其实现的方法或语句是()(单)A.Show B.Unload C.Load D.Hide 26.以下选项中，不是VB标准控件的是()(单)A.命令按钮 B.定时器 C.通用对话框 D.单选框

27在窗体上画一个名称为Command1的命令按钮，然后编写如下程序： Dim a As Variant a = Array(1, 2, 3, 4, 5)Sum = 0 For i = 1 To 5 Sum = Sum + a(i1)“, a(i1)> x Then Print a(iNum2 Case 3 Op = ”ד Result = Num1 * Num2 Case 4 Op = ”÷“ Result = Num1 / Num2 End Select Label1= Num1 & Op & Num2 & ”=“ & Result End Sub 窗体运行后，输入1，则label1的标题显示结果为()(单)A.3+2=5 B.3-2=1 C.3×2=6 D.3÷2=1.5

42在窗体上画一个名称为Text1的文本框，然后画一个名称为HScroll1的滚动条，其Min和Max属性分别为0和100。程序运行后，如果移动滚动框，则在文本框中显示滚动条的当前值，以下能实现上述操作的程序段是()(单)A.Private Sub HScroll_Change()Text1.Text=HScroll1.Value End Sub

B.Private Sub HScroll_Click()Text1.Text=HScroll1.Value End Sub C.Private Sub HScroll_Change()Text1.Text=HScroll.Caption End Sub D.Private Sub HScroll_Click()Text1.Text=HScroll.Caption End Sub

43.在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click()x=InputBox(”Input“)Select Case x Case 1,3 Print ”分支 1“ Case Is＞4 Print ”分支 2“ Case Else Print ”Else 分支 “ End Select End Sub 程序运行后，如果在输入对话框中输入2，则窗体上显示的是（）A.分支1 B.分支2 C.Else分支 D.程序出错

44.随机产生10个100～200之间的数，求它们的最大值程序如下： Private Sub Command1_Click()Max = 100 For i = 1 To 10 x = int【 】 Print x;If x ＞ Max Then Max=x Next i Print Print ”最大值=“;Max End Sub 45设a=10，b=5，c=1，执行语句Print a ＞b ＞ c后，窗体上显示的是()(单)A.True B.False C.1 D.出错信息

(46)在窗体上建立通用对话框需要添加的控件是

A)Data控件 B)From控件 C)CommonDialog控件 D)VBComboBox控件

(47)在Visual Basic中，要将一个窗体加载到内存进行预处理但不显示，应使用的语句是 A)Load B)Show C)Hide D)Unload

48)Sub过程与Function过程最根本的区别是

A)Sub过程可以用Call语句直接使用过程名调用，而Function过程不可以

B)Function过程可以有形参，Sub过程不可以

C)Sub过程不能返回值，而Function过程能返回值 D)两种过程参数的传递方式不同

49保存一个工程至少应保存两个文件，这两个文件分别是）A)文本文件和工程文件 B)窗体文件和工程文件 C)窗体文件和标准模块文件 D)类模块文件和工程文件

50.当对命令按钮的Picture属性装入.bmp图形文件后，命令按钮上并没有显示所需的图形，原因是没有对某个属性设置为1，该属性是

A)MousePicture B)Style C)DownPicture D)DisabledPicture

51假设变量bool_x是一个布尔型(逻辑型)的变量，则下面正确的赋值语句是）A)bool_x=”False“ B)bool_x=.False.C)bool_x=#False# D)bool_x=False

52.设S=“中华人民共和国”，表达式Left（S,1）+Right（S,1）+Mid（S,3,2）的值为（）A)“中华民国”

B)“中国人民”

C)“中共人民”

D)“人民共和” 53下列表达式的值为2123的是（）

A)Val(”123asd“)& 2000 B)Val(”123asd“)+ 2000 C)Str(123)& ”2000“ D)Str(123)+”2000“ 54假设在窗体上建立了一个通用对话框，其名称为CommonDialog1，然后画一个命令按钮Command1,并编写如下事件过程： Private Sub Command1_Click()CommonDialog1.Flags=4 CommonDialog1.Filter=”all files(*.*)|*.*|text Files(*.Txt)|*.txt|Batch Filse(*.bat)|*.bat“ CommonDialog1.FilterIndex=1 CommonDialog1.ShowOpen MsgBox CommonDialog1.FileName End Sub 程序运行后，单击命令按钮，将显示一个“打开”对话框，此时在“文件类型”对话框中显示的是（）

A)All Files(*.*)B)Text Files(*.Txt)C)Batch Files(.bat)D)不确定

55当运行程序时，系统自动执行启动窗体的某个事件过程。这个事件过程是（）A)Load B)Click C)Unload D)GotFocus 56.无论何控件，都具有一个共同属性。这个属性是（）A)Text B)Font C)Name D)Caption 57.在一行内写多条语句时，语句之间要用某个符号分隔。这个符号是（）A)，B)；

C)、D)：

58.表达式12000 + ”129“ & 200的值是

A)12329 B)”12129200“ C)”12000129200“ D)”12329“ 59.Visual Basic是一种面向对象的程序设计语言，构成对象的三要素是（）

A)属性、控件和方法 B)属性、事件和方法 C)窗体、控件和过程 D)控件、过程和模块

60表达式String(1,”I am student“)+ Replace(”am harass“,”rass“,”ppy“)& ”!“的值是（）A)”I am happy!“ B)”I am student I am s am harass studentam happy!“ C)”I am student am harass!“ D)”I am student am happy!“ 61.引用列表框（List1）最后一个数据项应使用的表达式是（）A)List1.List(List1.ListCount)B)List1.List(List1.ListCount-1)C)List1.List(ListCount)D)List1.List(ListCount-1)62.以下属性和方法中，可重定义坐标系的是）

A)DrawStyle属性 B)DrawWidth属性 C)Scale方法 D)ScaleMode属性 63.下面说法不正确的是()A)滚动条的重要事件是Change和Scroll B)框架的主要作用是将控件进行分组，以完成各自相对独立的功能 C)组合框是组合了文本框和列表框的特性而形成的一种控件

D)计时器控件可以通过对Visible属性的设置，在程序运行期间显示在窗体上

64.在窗体上画一个名称为Check1复选框，在程序运行的过程中，若选中复选框，则Check1.value的值是（）A)True B)2 C)0 D)1 65.下列关于过程叙述不正确的是（）

A)过程的传值调用是将实参的具体值传值递给形参 B)过程的传址调用是将实参在内存的地址传递给形参

C)过程的传值调用参数是单向传递的，过程的传址调用参数是双向传递的 D)无论过程传值调用还是过程传址调用，参数传递都是双向的

66.为了使标签能自动调整大小以显示全部文本内容，应把标签的【 】属性设置为true。67.要想在文本框中显示垂直滚动条，必须把scrollbars属性设置为2，同时还应把【 】属性设置为true。

68.假定有一个文本框，其名称为text1，为了使该文本框具有焦点，应执行的语句是【 】.setfocus。

69.假定有一个名为pic2.bmp的图形文件，要在运行期间把该文件装入一个图片框，应执行的语句为 图片控件名.picture=【

】。

70.为了能自动放大或缩小图像框中的图形以与图像框的大小相适应，必须把该图像框的【 】属性设置为true。

71.窗体、图片框或图像框中图形通过对象的【 】属性设置。72.计时器事件之间的间隔通过【

】属性设置。

73.有时候要暂关闭计时器，这可以通过【 】属性设置为false来实现。74.设a=sqr(2),则语句Print format$(a,”000.0“)的输出结果是【 】。75.设a=sqr(3),则语句Print format$(a,”###.0“)的输出结果是【 】。76.VB应用程序通常由3类模块组成，即窗体模块、【 】模块和类模块。

77在窗体上画两个文本框和一个命令按钮，然后在命令按钮的代码窗口中编写如下事件过程：

Private sub command1_click()text1.text=”vb“ text2.text=text1.text

text1.text=”abcd“ End Sub 程序运行后，单击命令按钮，文本框text2中显示的内容为 ________。

78.在保存VB应用程序时，窗体文件和工程文件的扩展名分别为【.】和.vbp。79.下列可作为VB的变量名的是()(单)A.Filename B.A3B C.254D D.Print 80.与下列数学式cos2(c+d)对应的VB表达式是【 】。81.与下列数学式2a(7＋b)对应地VB表达式是【 】。82.在VB中，字符串常量要用【 】括起来。83.下面的事件不属于鼠标器事件的是()(单)A.MouseDown事件 B.MouseUp事件 C.MouseMove事件 D.Move事件 84.下面的事件不属于键盘事件的是()(单)A.KeyPress事件 B.KeyDown事件 C.KeyUp事件 D.KeyMove事件

85.对以下程序说法不正确的是()(单)Private Sub FileOpen_Click()CommonDialog1.InitDir = ”C:“ CommonDialog1.Filter = ”文本文件 | *.Txt“ CommonDialog1.ShowOpen End Sub A.显示”文件“打开对话框 B.打开的对话框的初始目录为C盘根目录 C.打开的对话框的文件类型为文本文件 D.以上说法都不正确

86.以下程序是求最大公约数和最小公倍数的程序，在【】处填写合适的关系运算符。Private Sub Form_Click()Dim m1, n1, m, n, r As Integer n1 = InputBox(”输入自然数n“, ”输入数“)m1 = InputBox(”输入自然数m“, ”输入数“)n = n1 m = m1 If m ＜n Then t = m: m = n: n = t End If r = m Mod n Do While r 【 】 0 m = n n = r r = m Mod n Loop Print ”最大公约数=“, n Print ”最小公倍数= “, m1 * n1 / n End Sub 87.下面是求100以内素数的程序。Private Sub Command1_Click()Dim i As Integer, m As Integer, tag As Boolean

For m = 2 To 100 tag = True For i = 2 To m-1 If m Mod 【 】 = 0 Then tag = False Next i If tag Then Print m Next m End Sub 88.百元买百鸡问题： 假定小鸡每只5角,公鸡每只2元，母鸡每只3元。现在有100元钱要求买100只鸡，以下程序列出了所有可能的购鸡方案。Private Sub Command1_Click()Dim x%, y%, z% For x = 0 To 33 For y = 0 To 50 For z = 0 To 100 If 3 * x + 2 * y + 0.5 * z = 100 And 【 】 Then Picture1.Print x, y, z End If Next z Next y Next x End Sub 89.随机产生10个100～200之间的数，求它们的最大值程序如下： Private Sub Command1_Click()Max = 100 For i = 1 To 10 x = int【 】 Print x;If x ＞ Max Then Max=x Next i Print Print ”最大值=“;Max End Sub 90.以下是求1～100之间5或7的倍数的和，如下程序段： Sum = 0 For i = 1 To 100 If i Mod 5 = 0 Or i Mod 7 = 0 Then 【】 End If Next i Print Sum 其中【】处书写正确的是（）(单)A.Sum = i B.Sum = Sum +i C.Sum = Sum + 5+7 D.以上都不正确 91.要使得在按下鼠标左键时，激发mousedown事件，可以设置此事件中的button参数为()(单)

A.0 B.1 C.2 D.4 92.要使得在按下鼠标右键时，激发mousedown事件，可以设置此事件中的button参数为()(单)A.0 B.1 C.2 D.4 93.删除列表框中所有的项目所使用的方法为()(单)A.move B.remove C.clear D.removeitem 94.在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub command1_click()Dim a As String, b As String a = InputBox(”Enter the First integer“)b = InputBox(”Enter the Second integer“)Print b + a End Sub程序运行后，单击命令按钮，先后在两个输入对话框中分别输入456和111,则输出结果是()(单)A.456 B.111 C.567 D.111456 95.传值：形参得到的是实参的值，形参值的改变不会影响实参的值。在定义形参前加关键字Byval。

96.以下利用SUB关键字定义的子过程Rate，其调用格式不正确的是()(单)A.call Rate(12,56)B.Rate(12,56)C.Rate 12,56 D.以上A和C正确

97.以下程序的作用是单击Check1检查框将使得Text1文本框的字体在”加粗“和”常规“之间进行切换。

Private Sub Check1_Click()Text1.FontItalic = Not Text1.FontItalic End Sub 98.窗体中有一个名称为Slider1的可选择性刻度滑块控件，要设置它的如下属性值，可以编写程序()(单)(1)Slider控件的滑块处于最小位置时值为8(2)Slider控件的滑块处于最大位置时值为72(3)单击Slider控件两端箭头时，滑块的增量值为2(4)单击Slider控件的空白处时，滑块的增量值为8 A.Slider1.Min = 8： Slider1.Max = 72：

Slider1.SmallChange =2： Slider1.LargeChange = 8 B.Slider1.Min = 2： Slider1.Max = 8：

Slider1.SmallChange = 72： Slider1.LargeChange = 8 C.Slider1.Min = 8： Slider1.Max = 72：

Slider1.SmallChange = 8： Slider1.LargeChange = 2 D.Slider1.Min = 72： Slider1.Max = 8：

Slider1.SmallChange = 2：

Slider1.LargeChange = 8 99.以下能判断指针是否指向文件尾的函数是()(单)A.BOF B.LOC C.LOF D.EOF 00.窗体的过程Form_MouseDown(Button As Integer, Shift As Integer, X As Single, YAs Single)，有4个参数，关于这些参数，正确的描述是()(单)A.通过Button参数判定当前按下的是键盘上哪一个键 B.Shift参数只能用来确定是否按下Shift键

C.Shift参数只能用来确定是否按下Alt和Ctrl键 D.参数x,y用来设置鼠标当前位置的坐标

01.设组合框Combo1中有3个项目，则以下能删除最后一项的语句是()(单)A.Combo1.RemoveItem Text B.Combo1.RemoveItem 2 C.Combo1.RemoveItem 3 D.Combo1.RemoveItem Combo1.Listcount

1-10ADADA ABADA 11-20CCCDA AACBC 21-30ACDBB CDCCC 31-40ABDAB fontname BAAC 41-45AAC RND*101+100或100+RND*101或RND()*101+100或100+RND()*101 B 46-50CACBB 51-55DBBAA 56-60CDBBA 61-65BCDDD 66Autosize 67Multiline 68Text1 669loadpicture(”pic2.bmp")70Stretch 71Picture 72Interval 73Enabled 74 001.4 75 1.7 76【标准】77VB 78frm 79B 80cos(2*(c+d))81 2*a*(7+b)82【双引号】83D 84D 85D 86<> 87【i】88x+y+z=100 89RND*101+100或100+RND*101或RND()*101+100或100+RND()*101 90B 91-95BBCDV 96-00BVADD 01B 13

第四篇：VB程序设计练习题附加答案

《VB程序设计》综合复习资料

三、简答题

1、代码窗口主要包括哪几部分？

2、在工程资源管理器窗口中，主要列出了哪三类文件？

3、窗体布局窗口的主要用途是什么？

4、VB的基本特点是什么？

5、怎样理解可视化设计？

6、怎要理解事件驱动编程？

C．设置文本框的焦点 D．改变文本框的内容

2、应用程序设计完成后，应将程序保存，保存的过程是（d）

A．只保存窗体文件即可 B．只保存工程文件即可

C．先保存工程文件，之后保存窗体文件

D．先保存窗体文件（或标准模块文件），之后还要保存工程文件

3、VB应用程序的运行模式是（c）

A．解释运行模式 B．编译运行模式

C．两者都有

D．汇编模式

4、任何控件都具有的属性是（a）

A．TEXT B．CAPTION

C．NAME

D．FORECOLOR

5、决定控件上文字的字体、字形、大小及效果的属性是（D）

A．TEXT B．CAPTION

C．NAME

D．FONT

6、在窗体上建立了多个控件，如TEXT、LABEL1、COMMAND1，若要使程序一运行焦点就定位在COMMAND1控件上，应将COMMAND1控件的（B）设置为0 A．INDEX B．TABINDEX

C．TABSTOP

D．ENABLED

7、运行时，当用户向文本框输入新的内容，或在程序代码中对文本框的TEXT属性进行赋值从而改变了文本框的TEXT属性值时，将触发文本框的（A）事件

A．CLICK B．DBLCLICK

C．GOTFOCUS

D．CHANGE

8、在运行时，按TAB键跳过了一个可以获得焦点的控件（如文本框），则可能是因为（B）

A．该控件的TABSTOP属性值为TRUE

B．该控件的TABINDEX属性值为FALSE C．该控件的ENABLED属性值为TRUE

D．该控件的ENABLED属性值为FALSE

9、为了防止用户随意将光标置于控件上，应（A）

A．将控件的TABINDEX属性设置为0 B．将控件的TABSTOP属性设置为TRUE C．将控件的TABSTOP属性设置为FALSE D．将控件的ENABLED属性设置为FALSE

10、若要使标签控件显示时，不覆盖其背景内容，应设置标签控件的（D）属性

A．BACKCOLOR C．FORECOLOR

B．BORDERSTYLE D．BACKSTYLE

11、如果要在文本框中输入字符时，只显示某个字符，如星号（*），运行时，在文本框中输入的字符仍然显示出来，而不显示星号，原因可能是（B）

A．文本框的MULTILINE属性值为TRUE B．文本框的LOCKED属性值为TRUE C．文本框的MULTILINE属性值为FALSE D．文本框的LOCKED属性为FALSE

12、在运行阶段，要在文本框TEXT1获得焦点时选中文本框中所有内容，对应的事件过程是（B）

A．Private Sub Text1_GotFocus()Text1.SelStart=0 Text1.Sellength=Len(Text1.Text)End Sub B．Private Sub Text1_LostFocus()Text1.SelStart=0 Text1.Sellength=Len(Text1.Text)End Sub C．Private Sub Text1_Change()Text1.SelStart=0 Text1.Sellength=Len(Text1.Text)End Sub D．Private Sub Text1_SetFocus()Text1.SelStart=0 Text1.Sellength=Len(Text1.Text)End Sub

13、Visual Basic继承了Basic语言简单易用的语法特点，同时支持面向对象的编程机制，其中构成其控件（对象）的三要素是（D）

A．属性、事件、事件过程

C．属性、过程、方法

B．控件、窗体、事件 D．属性、事件、方法

14、决定标签（Label）显示的属性是（C）

A．Text

B．Name

C．Caption

D．Alignment

15、命令按钮的标题文字由（B）属性来设置。

A．Text

B．Caption

C．Name

D．(名称)

16、若要设置文本的显示颜色，则可用（A）属性来实现。

A．BackColor

B．Forecolor

C．FillColor

D．Backstyle

17、在运行时，若要调用某命令钮的Click事件过程，则可设置该命令钮对象的（）属性为Ture来实现。

A．Enabled

B．Value

C．Default

D．Cancel

18、在运行时，若要获得用户在文本框中所选择的文本，可通过访问（）属性来实现。

A．SelStart B．SelLenght

C．Text

D．SelText

三、简答题

1、事件驱动的含意是什么？举例说明。

2、交互式开发方法和传统的应用程序开发过程有什么不同？

3、文本框在什么情况下使用？

4、什么是工程？

5、结构化程序设计的三种基本结构是什么？

6、对象的三要素是什么？并分别进行简单的解释。

7、为什么要生成可执行文件和制作安装盘？

8、使用变量前先声明有什么好处？

9、如何使用帮助功能？

10、结构化程序设计的特点是什么？

11、为了把焦点移到某个指定的控件，在代码中应使用的方法是什么？

12、启动Visua Basic后，只创建了一个窗体，若此时保存，需要保存几个文件？各是什么文件？先保存的是哪一个？

13、为了防止文本框中的信息运行后被用户修改，应设置什么属性？

1、一般可以使用__________关键字声明常量。

2、______类型也称变体类型，是一种通用的、可变的数据类型，它可表示或存储任何一种数据类型。

3、变量的声明分为两种方法：__________和____________。

4、在VB中，用___________________语句设定数组的下界，用_____________和__________________语句分别返回数组的上、下界。

5、在代码模块中加入Option Explicit的目的是_____________________。

6、function aa(a1 as date,optional a2 as boolean)as single，写出optional命令的作用__________________。

7、在VB中，我们用一个简单的______语句就能实现退出程序。

8、生成消息框的命令是____________，生成输入框的命令是____________。

9、通用对话框（commondialog）属activex控件，它可以显示多个标准对话框，包括打开/另存为、字体、打印等对话框，若要显示所有文件，则应设置其属性filter=____________，若要使它显示为打印对话框，则应使用什么方法____________。

10、从字符串中任意位置截取字符的函数是__________。

11、语句For j = 3 To 20 Step 3 使循环体执行了______次。

12、对于正在使用的动态数组Arraya()，要增加一个单元，但不能破坏数组内的数据，则应使用语句__________________________________。

13、在Visual Basic中声明静态变量的关键字是_________________。

14、表达式10 Mod 6 4的值为______。

15、表达式chr(Asc(“a”)+ 5)的值为_________。

16、VB中使用注释有2种方法，即________和________。

17、VB中的数据以四种形式存储：常量、_________、_________和记录。

18、为了在VB中存储一个4行5列的二维矩阵，需要定义一个整型的数组，请把数组定义语句补充完整：Dim Juzhen(_

_)as Integer。

19、控件数组由一组相同类型的控件组成，这些控件共用一个相同的控件名，但是每个控件都有一个唯一的下标来区分，我们使用属性__

__来设置下标。

20、在过程调用中，实现调用过程的实参和被调用过程的形参之间的数据传递有两种方式：按值传递和__

__。

21、为了保证程序中必须对变量的强制性定义，需要在代码模块的声明部分加入______________语句。

22、分析For……Next循环结构的实例：For i = 5 To 30 Step 2 中，循环体一共执行了______次。

23、表达式Mid(“UniversityOfPetroleum”, 8, 4)的值为_________。

24、常量分为普通常量和__________常量。

25、要将大写字母转换为小写字母，可使用____________函数。

26、不管焦点在哪个控件上，按__________键相当于按了取消按钮。

27、执行“工程”菜单下的__________命令，可选择并添加ActiveX控件。

28、__________是程序中VB停止执行的地方。

29、逻辑常量为True或__________。

30、使用了__________________的声明后，当程序中使用未经声明的变量时，程序运行时会报错。

31、要将小写字母转换为大写字母，可使用____________函数。

32、自字符串N1位开始向右取N2个字符，要使用_________________函数。

33、日期常量表示时，用符号__________将日期型数据括起来。

34、局部变量只能在__________中声明和使用。

35、模块级变量的声明关键字是Dim或__________。

36、函数Abs(x)的功能是__________。

37、表达式3/6*5的值是__________。

二、选择题

1、以下哪个是合法的变量（）

A．right B．abc@123

C．123_abc

D．ab123c

2、下列说法错误的是（）

A．在同一模块不同过程中的变量可以同名

B．不同模块中定义的全局变量不可以同名

C．引用另一模块中的全局变量时，必须在变量名前加模块名 D．同一模块中不同级的变量可以同名

3、把MsgBox的返回值转换为数值应该使用的函数是（）

A．Log

B．Str

C．Len

D．Val

4、语句DIM AA(3,4,5)中定义的数组有（）个元素

A．12

B．60

C．120

D．345

5、下面程序运行后输出的结果是（）

A$=“CHINA”

B$=STRING$(3,A$)

PRINT B$

END A．CHI

B．CCC

C．INA

D．AAA

6、以下语句的输出结果是（）

Print Format$(32548.5, “000,000.00”)A．32548.5

B．325,485.00

C．032,548,50

D．32,548,50

7、以下叙述中错误的是（）

A．如果过程被定义为Static类型，则该过程中的局部变量都是Static类型 B．Sub过程中不能嵌套定义Sub过程 C．Sub过程中可以嵌套调用Sub过程

D．事件过程可以像通用过程一样由用户定义过程名

8、Visual Basic提供的On Error Resume next错误陷阱语句表示（）

A．当发生错误时，使程序转跳到语句标号为0的程序块 B．当发生错误时，不使用错误处理程序块 C．当发生错误时，忽略错误行，继续执行下一语句 D．当发生错误时，终止本过程执行，继续执行下一过程

9、在Visual Basic中，若要将控制权交给操作系统则通过（）的语句。

A．End

B．Exit Do

C．Exit Sub

D．DoEvents

10、在Visual Basic 中语句的续行号采用（）

A．空格与下划线

B．下划线与空格

C．空格与短线

D．短线与空格

11、假定有以下程序段：

For i=1 to 3

For j=5 to 1 Step –1 Print i*j Next j,i 则语句Print i*j的执行次数是（）A．15

B．.16

C．17

D．18

12、从键盘上输入两个字符串，分别保存在变量str1、str2中。确定

18、下列语句中正确的是（）

A．txt1.text+txt2.text=txt3.text B．command1.name=cmdok C．12label.caption=1234

D．a=inputbox(“hello”)

19、假设变量BOOLVAR是一个布尔型变量，则下面正确的赋值语句是（）

A．BOOLVAR=„TRUE‟ C．BOOLVAR=#TRUE#

B．BOOLVAR=.TRUE D．BOOLVAR=3<4

20、以下（）程序段可以实施X、Y变量值的变换（）

A．Y=X：X=Y B．Z=X：Y=Z：X=Y C．Z=X：X=Y：Y=Z D．Z=X：W=Y：Y=Z：X=Y

21、语句PRINT “SGN(-26)=”；SGN(-26)的输出结果为（）

A．SGN(-26)=26 C．SGN(-26)= +1 B．SGN(-26)=-26 D．SGN(-26)=-1

22、读下面程序段，判断变量Str2的取值是（）

Dim Str1, Str2 as String Str1=“University” Str2=STRING$(3,Str1)A．Uni C．ity B．UUU D．yyy

23、VB支持自定义数据类型，在某程序中我们定义了如下类型：

Student string As String As Integer 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=“张三”

24、一个工程中包含两个名称分别为Form1、Form2的窗体，一个名称为mdlFunc的标准模块。假定在Form1、Form2和mdlFunc中分别建立了自定义过程，其定义格式为：

Form1中定义的过程： Private Sub frmfunction1()End Sub Form2中定义的过程： Public Sub frmfunction2()End Sub mdlFunc中定义的过程： Public Sub mdlFunction()End Sub 在调用上述过程的程序中，如果不指明窗体或模块的名称，则以下叙述中正确的是（）A．上述三个过程都可以在工程中的任何窗体或模块中直接被调用 B．只有mdlFunction过程能够被工程中各个窗体或模块直接被调用

C．frmfunction1只能在form1中调用，而frmfunction2 则可以在所有模块或窗体中被直接调用

D．上述三个过程都只能在各自被定义的模块中直接调用

25、VB中Do……Loop结构既可以构成当型循环，也可以构成直到型循环，根据下面的代码：

Dim i,n as Integer n = 20 i = 1 Do

Print i;

i = i + 2

Loop Until i >20 判断循环结构的类型和循环体的执行次数，正确的选项是（）A．当型循环，20次

C．当型循环，10次

B．直到型循环，10次 D．直到型循环，20次

26、在程序中，使用InputBox函数可以接受用户的输入，如果要把它的返回值转换为数值型的数据，应该使用的函数是（）

A．Val

B．Len C．Str

D．Log

27、动态数组因为在程序运行前无法确定数组的大小，所以经常根据程序的运行情况，对数组进行重新定义，以下关于VB中动态数组的叙述中不正确的是（）

A．可以用ReDim语句重新定义动态数组，并且可以进行多次重定义 B．首次用Dim进行动态数组声明的时候，必须指明它的类型和上下界 C．Preserve为ReDim语句的可选参数，用于保留动态数组原来的内容 D．当对动态数组使用Erase语句进行释放操作时，将释放其内存

28、VB中的控件也叫做部件或组件，主要包括三类，以下哪一项不属于VB控件的分类（）

A．控件

B．可插入对象

D．ActiveX控件 C．ADO控件

29、表达式4+5 6 * 7 / 8 Mod 9 的值是（）

A．4 B．5 C．6

D．7

30、可以同时删除字符串前导和尾部空白的函数是（）

A．Ltrim B．Rtrim

C．Trim

D．Mid

三、简答题

1、全局变量声明有哪些限制？

2、字符串是否可以自动转换为数字类型？

3、用Format函数格式化后的字符格式在不同区域环境下的输出是否相同？为什么？

4、在InputBox函数中，哪一个参数是必需的？

5、在MsgBox函数中哪一个参数是必须的？

6、在什么情况下使用过程？

7、为什么要进行程序调试？

8、调试程序有哪些手段？

9、用语句Dim A(-3 To 5)As Integer定义的数组的元素个数是多少？

10、设有如下的Visual Basic表达式：5*x^2-3*x-2*Sin(a)/3，与它对应的数学式是什么？

11、数学式(2xa)(3yb)对应的VB表达式是什么？

12、表达式2>3 And 4<=5 Or 4>4的值是什么？

13、怎样在程序中设置断点？

14、在什么情况下可以设置断点？

15、程序出错的类型有哪几种？

16、在同一模块、不同过程中声明的相同变量名，两者是否表示同一个变量？为什么？

17、什么情况下会出现“数组下标越界错误”？

18、逐语句和逐过程有什么区别？

19、表达式2.75 * 2 3.45的值是什么？

20、在程序设计中为什么尽量不用GoTo语句？

四、读程序题

1、分析以下程序，写出运行结果。

Private Sub Form_Click()

score = Int(Rnd * 10)+ 80

Select Case score

Case Is < 60

A$ = “F”

Case 60 To 69

A$ = “D”

Case 70 To 79

A$ = “C”

Case 80 To 89

A$ = “B”

Case Else

A$ = “A”

End Select

Print A$

End Sub

2、读下面的程序，分析其功能，写出运行结果。

在窗体上有一个命令按钮，名称为Command1。然后编写如下程序：

Private Sub Command1_Click()For I = 1 To 4 For J = 0 To I Print Chr$(65 + I);Next J Print Next I End Sub 程序运行后，如果单击命令按钮，则在窗体上显示的内容是什么？

3、阅读下面的程序，分析并写出其功能。

Sub insert(a()As Single,ByVal x As Single)Dim m as integer,n as integer n=1 Do While n<20 And x>a(n)n=n+1 Loop For m=20-1 To n Step –1 a(m+1)=a(m)Next m

a(n)=x End Sub

4、分析以下程序，写出运行结果。

Sub subP(b()As Integer)For i =1 To 4 b(i)=2*i Next i End Sub

Private Sub Commandl_Click()Dim a(1 To 4)As Integer a(1)=5 a(2)=6 a(3)=7 a(4)=8 subP a()For i =1 To 4 Print a(i)Next i End Sub 运行上面的程序，单击命令按钮，输出结果是什么？

5、分析以下程序，写出运行结果。

Sub sele()Dim n as Integer i=21:n=3 Do While i>n

i=i－n

Loop Print i End Sub

6、分析以下程序，写出运行结果。

Sub selectPrint()Dim a as Integer Dim b as Integer Dim c as Integer a=2:b=5:c=2 If(a>=b)and(a>=c)or(b>c)Then

Print a a=a+2 Else Print b EndIf Print a;b;c End Sub

7、分析以下程序，写出运行结果。

Sub swap()Dim x as Integer Dim y as Integer Dim z as Integer x=1:y=2:z=0 Print x;y;z x=x+y x=x*z Print x,y,z

End Sub

8、分析以下程序，写出运行结果。

Sub selectPrint()Dim a as Integer Dim b as Integer Dim c as Integer a=3:b=3:c=2 If(a>=b)and(a>c)Then Print a Print a,b,c End Sub

五、编程题

1、输入一年号，判断它是否是闰年。界面如下图所示，包括两个标签、一个文本框和一个命令按钮。提示：如果此年号能被400整除或者不能被400除尽，也不能被100除尽，但能被4整除，则它是闰年；否则，不是闰年。

2、输入两个正整数m、n，求m和n的最大公约数。要求建立如下图所示的窗体，其中主要的控件包括：两个标签（Lable1、Lable2）、两个文本框（Text1、Text2）和一个按钮（Command1）。

3、输入某学生成绩（百分制），若是100≥成绩≥90输出优秀；若是90＞成绩≥80输出良好；若是80＞成绩≥70输出中等；若是70＞成绩≥60输出及格；若是60＞成绩≥0，输出不及格；若是其他数则输出error信息。

4、在窗体中显示从9号字型到16号字型。

5、在有序序列中插入一个数，使插入后的数列仍然有序（设按由小到大排列）。

6、编程实现二维数组转置。

7、随机输入10个100以内的整型数，计算其和及平均值。

8、找出所有的水仙花数。水仙花数是个三位数，它的各位数字的立方和等于这个三位数本身。例如371＝33+73+13，则371是水仙花数。

9、从键盘输入一个大于2的正整数，判断该数是否是素数。

10、求二维数组中的最小值及其所在行号、列号。

11、求一元二次方程ax2+bx+c=0的根（包括实根和复根）。

12、输入一个正整数n，计算出n!并输出。

13、Faibonacci数列为0，1，1，2，3，5，8，13 „，计算并输出 Print List1.______________ End Sub（2）单击列表框某一项时立即将该项打印在窗体上：

Private Sub List1_Click()Print_______________ End Sub（3）按下命令按钮Command1时在窗体上删除 Label1.Caption = Hscroll1.__________________ End Sub

14、列表框（ListBox）用于列出可供选择的项目的列表，用户可以选择一个或多个项目。它具有几个非常重要的数组属性，其中__

__属性存放了列表框中所有项目的值。

15、菜单项一般由标题、访问键、快捷键和复选标志等构成，通过对相应的属性进行设置可以改变这些项目的状态，其中与复选标志相对应的属性是__

__。

16、keydown与keypress事件各有其参数，若需获得用户按下 “a” 还是 “A” 需用____________事件。

17、控件________组合了文本框和列表框的功能，是VB中一种功能非常强大的选择类控件。

18、若需要将窗体Form2以模态窗口的形式显示出来，可通过执行代码_________________来实现。

19、菜单中的分隔条是一种菜单控件，不响应__________事件，不能被选中。

二、选择题

1、当程序运行时，在窗体上单击鼠标，以下哪个事件是窗体不会接收到（）A．MouseDown B．MouseUp

C．Load

D．Click

2、窗体Form1的Name属性是Frm1，它的单击事件过程名是（）

A．Form1_Click

B．Form_Click

C．Frm1_Click

D．Me_Click

3、用于设置通用对话框控件显示文件类型的属性是（）

A．Filter

B．Path

C．Partern

D．FoleName

4、用于从内存删除窗体的命令是（）

A．Move

B．Hide

C．Unload

D．Delete

5、用于返回窗体可用区域宽度的属性是（）

A．ScaleWidth

B．ScaleLeft

C．ScaleHeight

D．ScaleTop

6、下列关于属性设置的叙述错误的是：（）

A．一个控件具有什么属性是VB预先设计好的，用户不能改变 B．一个控件具有什么属性是VB预先设计好的，用户可以改变 C．一个控件的属性即可以在属性窗口中设置，也可以用程序代码设置

D．一个控件的属性在属性窗口中设置，还可以利用程序代码为其设置新值

7、下列说法正确的是（）

A．对象属性只能在“属性窗口”中设置 B．一个新的工程可以在“工程窗口”中建立 C．必须先建立一个工程，才能开始设计应用程序 D．只能在“代码窗口”中编写程序代码

8、下列关于窗体上控件的基本操作错误的是（）

A．按下一次DEL键只能删除一个控件 B．按下一次DEL键可以同时删除多个控件

C．按住SHIFT键，然后单击每个要选择的控件，可以同时选中多个控件 D．按住ALT键，然后单击每个要选择的控件，可以同时选中多个控件

9、下列关于设置控件属性的叙述正确的是（）

A．用户必须设置属性值

B．所有的属性值都可以由用户随意设定 C．属性值不必一一重新设置 D．不同控件的属性项都完全一样

10、不可以通过下列（）操作将焦点赋给对象

A．运行时使用TAB键

B．在代码中用CALL语句调用 D．用访问键或用鼠标单击选择对象 C．在代码中用SETFOCUS方法

11、要在FORM_LOAD事件过程中使用PRINT方法在窗体上输出一定的内容，应（）

A．设置窗体的VISIBLE属性

C．调用窗体的SHOW方法

B．设置窗体的CAPTION D．设置窗体ENABLED属性

12、下面（）对象无CAPTION属性

A．FORM B．COMMANDBUTTON

C．TEXTBOX

D．LABEL

13、通用对话框控件和文件列表框控件中，都能根据文件的类型对要显示的文件进行筛选过滤，后者使用（）属性进行该项设置。

A．Pattern B．Path

C．Filter

D．FileName

14、对于复选框控件chkBoy，如果在程序中设置它为选中状态，下面语句正确的是（）

A．chkBoy.Checked = true

C．chkBoy.Selected = true

B．chkBoy.Value = true D．chkBoy.Value = 1

15、计时器（Timer）控件用于每隔一段时间自动触发一次Timer事件，可以有规律地重复执行一段程序，它用于设置两次事件时间间隔的属性是（）

A．Interval

B．SmallChange D．Max

C．LargeChange

16、以下关于VB中窗体（Form）的说法中，不正确的描述为（）

A．执行Unload Form语句后，窗体Form消失，但仍在内存中

B．当窗体的Enabled属性为False时，通过鼠标和键盘对窗体的操作都被禁止 C．窗体的Height、width属性用于设置窗体的高和宽 D．窗体的load事件在加载窗体时发生

17、关于滚动条控件，下面说法错误的是（）

A．点击滚动条的箭头，可以改变它的value值，从而引发Change事件 B．拖动滚动框，可以触发Scroll事件

C．通常，水平滚动条的值从左向右递增，垂直滚动条的值自上而下递增 D．拖动滚动框，可以触发Change事件，而且是连续触发的

18、在窗体上放置一个命令按钮，名称为Command1。单击命令按钮时，执行如下事件过程：

PriVate Sub Command1_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 C．hardwafe

B．software D．出现错误

19、在多重窗体程序设计中，关键的问题是要解决不同窗体之间的衔接和窗体的显示、关闭等问题，以下关于窗体的相关语句和方法的叙述中，错误的是（）

A．Load语句用于加载指定窗体，即在内存中创建该窗体 B．Show方法兼具Load语句的功能，可以将窗体显示出来 C．Hide方法用于将窗体隐藏起来

D．Unload语句用来释放窗体，但窗体并没从内存中消

20、滚动条控件的属性中，表示取值范围最大值的属性是（）

A．Max C．Min

B．LargeChange

D．Value

21、程序中如果需要检测和控制鼠标的位置和状态的改变，就需要使用鼠标事件，其中下面哪个选项用于表示拖动事件（）

A．DragDrop C．MouseUp

B．MouseDown D．MouseMove

22、为了使用通用对话框进行打开文件的操作，应将通用对话框的Action属性设定为（）。

A．0

B．1

C．2

D．3

三、简答题

1、什么是单选按钮？什么是复选框？在使用上有什么不同？

2、滚动条的change事件和scroll事件有什么不同？

3、快捷键和访问键有什么区别？

4、在程序运行期间，如果拖动滚动条上的滚动块（即滑块），则触发滚动条的什么事件？

5、假定有一个菜单项，名为MenuItem，为了在运行时使该菜单项失效（变灰），应使用什么语句？

6、为了暂时关闭计时器（即时钟控件），应把该计时器的什么属性设置为False？

7、单选按钮和复选框（即检查框）各用于什么情况？

8、如何为一个菜单项设置热键和快捷键？

9、菜单的形式有哪两种？

10、在KeyPress事件中，如何取消用户刚输入的字符？

11、框架的作用是什么？

12、如果要计时器每秒钟发生4个Timer事件，则Interval属性值应设多少？

13、在一个窗体的程序代码中能否访问另一个窗体上控件的属性？若不行则请说明理由；若行则请说明如何访问。

14、如何在框架中建立控件？

15、组合框有哪几种类型？

四、读程序题

1、对窗体编写如下代码：

Option Base 1 Private Sub Form_KeyPress(KeyAscii As Integer)a = Array(237,126,87,48,498)m1 = a(1)m2 = 1 If KeyAscii = 13 Then For i =2 To 5 If a(i)>ml Then m1 =a(j)m2 =i End If Next i End If Print m1 Print m2 End Sub 程序运行后，按回车键，输出结果是什么？

2、阅读下面的程序，写出执行结果。

Private Sub Form_load()

Form1.show d = 0 For a = 1 To 2 For b = 1 To a For c = b To 5 d = d + 1 Next c Next b Next a Print d End Sub

五、编程题

1、在窗体上有一个文本框控件，名称为TxtTime；一个计时器控件，名称为Timer1，要求每一秒在文本框中显示一次当前的时间，请编程实现。

2、在Text1中输入任一英文字母，在Text2中显示该英文字母及其ASCII码值。要求在文本框Text2中显示出所有输入的英文字母及其ASCII码值，如下图所示。

Text1

Command1 Text2

3、编写一个程序，能够实现任意个整数的排序。

4、编程实现以下功能：用户首先分别在两个文本框中输入两个数，然后在具有“加、减、乘、除”等四个菜单项的“计算”菜单中单击某一项，即可在标签中显示出相应的结果或者错误提示。

5、编程实现任意两个数的“加、减、乘、除”。

6、编写一个程序，能够求任意个正整数的最大值和最小值。

7、编程求任意两个正整数的最大公约数。

六、程序分析填空题

1、建立一个如图所示的简单编辑器。用户在文本框（text1）中输入正文后，选中某些文本时可进行“剪切”、“复制”和“粘贴”操作。假设在窗体声明部分定义了一个变量str1，用于保存复制和剪切的内容，请把剪切按钮(btnCut)的Click事件补充完整。

程序运行界面：

Private Sub btnCut_Click()

„请补充

End Sub

2、计算1 + 2 + 3 + …… + 100的和并输出。请把下面用Do While ……Loop循环结构实现这一功能的代码补充完整。

Private Sub Form_Load()Dim sum,count as Integer „请补充

Do while count <=100

„请补充

Loop Text1.Text = sum End Sub

3、列表框控件（ListBox）支持多项选择，这项功能在对用户的兴趣爱好进行调查的时候显得非常好用，在下图所示的界面中列表框List1用于列出爱好选项，供用户进行多项选择。

请把下列代码补充完整，能够取得用户的所选爱好选项： Private Sub Command1_Click()

Dim i As Integer

Dim s As String

s = txtname.Text & “爱好”

For i = 0 To List1.ListCount-1

„请补充

Next

Label3.Caption = s End Sub

4、要求利用计时器Timer1，在窗体Form1上每隔1秒钟打印一个1到10的随机整数，请把下列代码补充完整：

Private Sub Form_Load()

Show

„请补充

End Sub Private Sub Timer1_Timer()„请补充

End Sub

5、请说明PRINT #和WRITE #语句的区别

6、EOF函数的功能是什么？

四、编程题

1、实现二进制方式文件的复制。

2、如下图所示，实现一个简单的文件管理器。

件

C．双击工具箱中的控件图标，所画控件的大小和位置是固定的

D．不使用工具箱中的控件工具，不可以在窗体上画出图形对象，但可以写入文字字符

2、当一个对象（如窗体或图片框）被移动或改变大小之后，或当一个覆盖该窗体被移开之后，如果要保持该所画图形的完整性，可以选择触发（）事件来完成图形的重画工作

A．Paint B．Load

C．Click

D．Active

三、简答题

1、在什么情况下使用Image控件而不使用PictureBox控件？

2、在程序运行时怎样在图形框中装入和删除图形？

3、颜色函数主要有哪些？

四、编程题

1、如下图显示当前目录下的图片文件列表，并能够预览选定的图片。

第五篇：北师大网教宪法作业(三)及答案

北师大网教宪法作业

（三）及答案

1.我国现行《宪法》规定，当选国家主席的公民应年满多少？45周岁

在我国，基层人民政府可以依法设立的派出机关是下列的哪一个？街道办事处 列对我国法院审判工作的基本制度说法错误的是（）三审终审制度

根据宪法和法律，下列选项正确的是哪一项？地方各级人民检察院对产生它的国家权力机关2.3.4.5.6.7.8.9.和上级人民检察院负责

我国的人民检察院是什么性质的国家机关？法律监督机关

下列关于国家结构形式调整对象的表述中，哪一项最为恰当？国家结构形式主要是以国家整体与部分之间的关系为调整对象

下列关于中央与地方之间的行政关系，哪一项是错误的？选举关系

我国《宪法》第4条规定：“各少数民族聚居的地方实行（），设立自治机关，行使自治权。”区域自治

我国《宪法》第31条规定：国家在必要时得设立特别行政区。在特别行政区内实行的制度按照具体情况由下列选项中的哪一机关以法律规定全国人民代表大会

10.在我国，对香港、澳门特别行政区行政首脑的称谓是下列哪一项？行政长官

多选题

11.全国人大及其常委会和国务院行使不同的职权，下列各项中属于国务院行使的职权是哪些？1.批准省、自治区和直辖市的区域划分，批准自治州、县、自治县、市的建置和区域化分2.、决定省、自治区、直辖市的范围内部分地区进入紧急状态

12.根据宪法和法律，下列选项中的哪些机关实行集体负责制？全国人大及其常委会、中央军委、人民检察院 13.根据我国《宪法》的规定，我国中央国家机构从其行使权力的属性来看，可分为下列选项中的哪几种类型？1.国家权力机关2.国家元首和国家行政机关3.国家军事机关4.审判机关和检察机关.14.下列各项中关于单一制说法正确的是？国家立法权统一，只有一部宪法，一个中央政府，一套政府体系2.中央政府是代表国家进行国际交往的唯一主体3.国防权力统一于中央 15.依据我国特别行政区基本法，下列哪些选项的表述是正确的？特别行政区可以自主决定外交、经济、财政等事项、中央人民政府可授权特别行政区依照基本法自行处理有关对外事务 简答题

16.行政机关的组织原则：答：1.民主原则。2.法治原则。3.行政机关系统内部实行分权制衡。4.相容或不相容的原则。5.禁止兼职和从事营业活动的原则。6.行政机关成员必须为文职而非军职的原则。7.实行行政首脑负责制的原则。17.我国最高人民法院的职权和职能。1.法律审判权：包括（1）证据调查与判断权，（2)法律解释权，（3）法律选择权，（4）司法审查权。

2.司法解释权：包括（1）整体性的司法解释，（2）专题性的司法解释，（3）个案性的司法解释

3.规则制定权

4.判例选择权

5.政策制

18单一制国家结构形式的特征单一制特点：(1)从法律体系看：全国只有一部宪法(2)从国家机构组成看：全国只有一个立法机关，一个中央政府(3)从公民的国籍看：公民只有一种国籍

(4)从中央与地方的权力划分看：全国按地域划分为若干行政区域，各行政区域接受中央政权机关的统一领导

(5)从对外关系看：国家是一个完整的主权国家，中央政府统一行使外交权，地方政府不能代表国家行使外交权

（6）国防决策权和军队统帅权统一于中央，且国家推行统一的税收和货币制度。

19.我国民族自治地方的自治权答：民主自治地方的自治权是指民主自治地方的自治机关根据宪法、民族区域自治和其他法律的规定，根据实际情况自主地管理本地方、本民族内部事务的自主权。主要有以下几个方面：

1.制定自治条例和单行条例

2.根据当地民族的实际情况，贯彻执行国家法律和政策 3.自主地管理地方财政

4.自主地管理地方性经济建设

5.自主地管理教育、科学、文化、卫生、体育事业 6.组织维护社会治安的公安部队 7.使用本民族的语言文字

论述题

20.试对单一制和联邦制的特征进行比较

以按地域划分的普通行政区域或自治区域为组成单位的国家结构形式。与复合制相对。在单一制国家，中央政权享有最高权力，地方政权在中央政权统一领导下，在宪法和法律规定的权限范围内行使其职权。在法理上，单一制国家的一切权力属于中央，地方的权力具有中央授权性。单一制国家的明显外部特征是：全国只有一个中央政权，一部宪法，一种法律体系，是国际交往中的国际关系主体，它的公民只有一个国籍。这种形式为现代大多数国家所采用。按照地方职权的大小，单一制国家又可分为中央集权型单一制国家和地方分权型单一制国家。在中央集权型单一制国家，地方政权在中央政权的严格控制下行使职权，由中央委派官员或由地方选出的官员代表中央管理地方行政事务，地方居民没有自治权或地方虽设有自治机关，但自治机关受中央政权的严格控制。法国是典型的中央集权型单一制国家。在地方分权型单一制国家，地方居民依法自主组织地方公共机关，并在中央监督下依法自主处理本地区事务，中央不得干涉地方具体事务。英国是典型的地方分权型单一制国家。

联邦制

复合制（单一制的对称。由若干个国家（邦、州、共和国等）通过协议联合组成各种国家联盟的一种国家结构形式。实行复合制的国家为复合国。有联邦、邦联等形式。）国家结构的主要形式。以享有相对主权的完整政治实体为组成单位的国家结构形式。

在联邦制国家中，国家整体与其组成部分之间的关系不是中央与地方的关系，而是权限范围不同的中央与中央的关系。国家整体与其组成部分的权限范围由联邦宪法规定，它们各自在规定的权限范围内享有最高权力，并直接行使于人民，相互间不得进行任何干涉。联邦制国家明显的外部特征是：除联邦有中央政权外，各组成部分也有各自的中央政权；联邦立法机关中通常有一院由联邦各组成部分的代表组成；除有联邦宪法和联邦法律体系外，联邦各组成部分也有自己的宪法和法律体系。有的联邦制国家，其组成部分在某些问题上可以成为国际交往主体；联邦制国家的公民有统一的国籍。美利坚合众国是典型的联邦制国家，加拿大、澳大利亚、瑞士等国家也采用联邦制。

21.中央与特别行政区的关系

中央与特别行政区的关系 ：根据基本法的规定，特别行政区是中华人民共和国享有高度自治权的地方行政区域，直辖于中央人民政府。因此，中央与特别行政区的关系，是一个主权国家内中央与地方的关系，或者说是中央对特别行政区进行管辖和特别行政区在中央监督下实行高度自治而产生的相互关系。这种关系的核心在于中央与特别行政区的权利划分和行使。

中央对特别行政区形式的权利主要有：中央人民政府负责管理与特别行政区有关的外交事务；中央人民政府负责管理特别行政区的防务；中央人民政府人民特别行政区行政长官和执行机关的主要官员；全国人大常委会有权决定特别行政区进入紧急状态；全国人大常委会享有对特别行政区基本法的解释权；全国人大常委会对特别行政区基本法享有修改权；等等。