文档库 最新最全的文档下载
当前位置:文档库 › 大学计算机二级vb试卷

大学计算机二级vb试卷

大学计算机二级vb试卷
大学计算机二级vb试卷

一、选择题(每题1分,共30分)

1、能被对象所识别的动作与对象可执行的活动分别称为对象的b。

A)方法、事件B)事件、方法

C)事件、属性D)过程、方法

2、执行语句Print Val("12A12") 的值为 b 。

A)12A B)12

C)1212 D)12A1

3、下列是合法的VB变量名。

A)_ab B)W_cde

C)5student D)Name&City

4、表达式6.5 * 5 Mod 28 \ 8的值是 C 。;

32.5 3

2.5

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

5、如果在立即窗口中依次执行下列命令:

a=8:b=9

Print a>b

则输出的结果是 C 。

A)1 B)0 C)False D)True

6、下列表达式的值为真的是 D 。

A)"A">"a"

B)"9">"a" C)12>12.1 D)"That">"Thank"

7、表示“X>Y>Z”,正确的VB 逻辑表达式是 A 。

A)X>Y And Y>Z

B)X>Y>Z C)X>Y OR Y>Z D)X>Y And >Z

8、函数CInt 、Int 、Fix 都返回整数值,以下能正确地描述它们返回值的大小关系的是

A 。

A)CInt(-4.51) = Int(-4.51) < Fix(-4.51)

B)Int(-4.51) < CInt(-4.51)

C)CInt(-4.51) < Fix (-4.51)< CInt(-4.51)

D)Int(-4.51) < Fix (-4.51)= CInt(-4.51)

9、与语句Dim abc%作用相同的语句是 B 。

A)Dim abc As Long

B)Dim abc As Integer C)Dim abc As String D)Dim abc As Date

10、可以查找字符串中给定字符串位置的函数是 D 。

A)Ucase B)Len C)Mid D)Instr 。

11、数学表达式对应的正确Visual Basic 表达式为 C 。 A)-b + Sqr(b * b

- 4 * a * c)/ 2 * a

B)-b + Sqr(b * b - 4 * a * c)/ (2 * a) a

ac

b b 242-+-

C)(-b + Sqr(b * b - 4 * a * c)) / (2 * a)

D)(-b + Sqr(b * b - 4 * a * c)) / 2 * a

12、窗体文件的扩展名是 A 。

A).frm B).vbp C).bas D).frx

13、Visual Basic程序中的注释所使用的字符是 A 。

A)′B): C)\ D)_

14、要使一个文本框对象能够显示多行文字,应该将对象设置为True的属性值是 B 。

A)Text B)MultiLine

C)Style D)Visible

15、执行下面语句后,Len函数值最大的是 C 。

Dim IA As Integer, B As Single, S As String *5, Ch As String

IA=32767 : B=23.5 : S="A" :Ch="abcd"

A)Len(IA) B)Len(B) C)Len(S) D)Len(Ch)

16、若要求从文本框中输入密码时在文本框中只显示* 号,则应当在此文本框的属性窗口中设置。

A)Text 属性值为* B)Caption 属性值为*

C)password 属性值为空D)Passwordchar 属性值为*

17、窗体上放置了三个文本框,若在Text1中输入456,在Text2中输入78,在程序中执行了语句Text3 = Text1 + Text2后,则在Text3中显示。

A)434 B)45678 C)溢出D)语法错误

18、下列选项中,是十六进制数。

A)1234 B)&1234 C)&O1234 D)&H1234

19、执行语句Print Int(4*Rnd+1)后,不能可能出现的值为。

A)2 B)3 C)4 D)5

20、语句段

a=3: b=5

t=a: a=b: b=t

执行后,。

A)a值为3,b值为3 B)a值为3,b值为5

C)a值为5,b值为3 D)a值为5,b值为5

21、Print方法可在上输出数据。

①窗体②文本框③图片框④标签⑤列表框⑥立即窗口

A)①③⑥B)②③⑤C)①②⑤D)③④⑥

22、在运行程序时,将焦点移至指定的控件或窗体,则需使用的方法是。

A)Change B)SetFocus C)GetFocus D)Move

23、在Visual Basic中最基本的对象是,它是应用程序的基石。

A)标签B)窗体C)文本框D)命令按钮

24、下列语句中的语句可以用来正确地声明一个动态数组。

A)Private A(n) As Integer B)Dim A() As Integer

C)Dim A(,) As Integer D)Dim A(1 to n)

25、有程序代码:Text1.Text="Visual Basic",其中的Text1、Text和"Visual Basic"分别代表。

A)对象、值、属性B)对象、方法、属性

C)对象、属性、值D)属性、对象、值

26、在程序中可以通过复选框和单选框的属性来判断它们的当前状态。

A)Caption B)Value C)Checked D)Selected

27、用窗体的属性来设置窗体的标题。

A)Style B)Text C)Caption D)Name

28、如果在两个菜单命令项之间加一条分隔线,可在标题文本框中键入。

A)-B)+C)& D)#

29、假设变量Lng为长整形变量,下面不能正常执行的语句是。

A)Lng=16384*2 B)Lng=4*0.5*16384

C)Lng=190^2 D)Lng=32768*2

30、在Form_Click事件中执行如下语句的正确结果是。

Print Format(1236.54,"+##,##0.0%")

A)123456 B)+123,654.0% C)+123,6.54% D)+123,654

二、阅读程序(每题2分,共20分)

1、在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程:

程序运行后,单击命令按钮,在文本框中显示的值是什么?

Private Sub Command1_Click()

Dim i As Integer, n As Integer

For i = 0 To 50

i = i + 3

n = n + 1

If i > 10 Then Exit For

Next i

Text1.Text = Str(n)

End Sub

答:

2、建立一窗体并编写下列事件过程,单击窗体执行该事件过程,其输出结果是什么?Private Sub Form_Click()

Dim x As Integer

x = Int(Rnd + 4)

Select Case x

Case 5

Print "优秀"

Case 4

Print "良好"

Case 3

Print "合格"

Case Else

Print "不合格"

End Select

End Sub

答:

3、运行程序,当单击窗体时,窗体上显示内容的第三行是什么?Private Sub Form_Click()

Dim s As String, i As Integer, n(9) As Integer

Dim s1 As String * 1, j As Integer

s = Trim("12345a307291b233")

For i = 1 To Len(s)

s1 = Mid(s, i, 1)

If s1 >= "0" And s1 <= "9" Then

j = Val(s1)

n(j) = n(j) + 1

End If

For j = 0 To 9

Print j; ":"; n(j)

Next j

End Sub

答:

4、当发生Command1_Click事件后,以下程序输出结果是什么?Private Sub Command1_Click()

Dim y As Integer, i As Integer

Dim a(8) As Integer

y = 18: i = 0

Do

a(i) = y Mod 2

i = i + 1

y = y \ 2

Loop Until y < 1

For j = i - 1 To 0 Step -1

Print a(j);

Next j

答:

5、写出程序运行时单击Command1后,窗体上显示内容的第二行是结果什么。Private Sub Command1_Click()

Dim ch As String, i As Integer

ch = "DEF"

For i = 1 To Len(ch)

ch = Mid(ch, 2 * i - 1, 1) & Left(ch, Len(ch))

Print ch

Next i

End Sub

答:

6、写出程序运行时单击Command1后,在窗体上的输出结果。

Private Sub Command1_Click()

Dim i As Integer, a As Integer

a = 1

For i = a To 5 Step a + 1

a = a + 1

Next i

Print a, i

End Sub

答:

7、写出程序运行时单击Command1后,在窗体上的输出结果。Option Explicit

Private Sub Command1_Click()

Dim I As Integer, a(5) As Integer

For I = 1 To UBound(a)

a(I) = I * 2 + 1

I = I + 1

Next I

Print a(3), LBound(a)

End Sub

答:

8、写出程序运行时单击Command1后,在窗体上的输出结果。Private Sub Command1_Click()

Dim n As Integer, j As Integer

j = 0: n = 0

Do While n < 3

j = (j + 1) * (j + 2)

n = n + 1

Loop

Print j; n

End Sub

答:

9、建立一窗体Form,然后编写如下程序。程序运行后,单击窗体的输出第三行结果是什么?

Private Sub Form_Click()

Dim i As Integer, j As Integer

Dim t(10, 10) As Integer

For i = 1 To 3

For j = 1 To 3

t(i, j) = (i - 1) * 3 + j

Print t(i, j);

Next j

Print

Next i

End Sub

答:

10、建立一窗体Form,在窗体上画一文本框Text1和一命令按钮Command1,然后编写如下程序,运行程序后,单击命令按钮,在Text1中输出结果是什么?

Private Sub Command1_Click)

Dim Fb(10) As Integer,I As Integer

Fb(l)=2:Fb(2)=3

For I = 3 To 5

Fb(I)=Fb(I - 2)+ Fb(I - 1)

Next I

For I = 1 To 5

Text1 = Text1 &Str(Fb(I))&“”

Next I

End Sub

答:

三、程序填空(每空2分,共20分)

1、下列程序的功能是从键盘上按行输入一个3×4二维数组,求二维数组各列的和,输出到窗体。请在下划线处填写适当的内容。

Option Base 1

Private Sub Form_Click()

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

For j = 1 To 4

For i = 1 To 3

a(i, j) = InputBox("请输入一个元素的值")

Next i

Next j

For j = 1 To 4

s(j) = 0

For i = 1 To 3

Next i

Next j

For i = 1 To 4

Next i

End Sub

2、下列程序的功能是求一维数组的最大值和最小值及其下标,请在下划线处填写正确的内容。

Option Base 1

Private Sub Command1_Click()

Dim t(10) As Integer, min_i As Integer

Dim max_i As Integer

For i = 1 To 10

t(i) = InputBox("请输入一个元素值")

Next i

min_i = :max_i=

For i = 2 To 10

If Then min_i = i

If Then max_i= i

Next i

Print t(min_i), min_i,t(max_i),max_i

End Sub

3、下面程序的功能是用直接选择排序法将数组a中的10个整数按降序排列,请在下划线处将程序补充完整。

Option Base 1

Private Sub Command1_Click()

Dim a, i As Integer, temp As Integer

Dim j As Integer, k As Integer

a = Array(678, 45, 324, 528, 439, 387, 87, 875, 273, 823) For i =

k = i

For j =

If a(k) < a(j) Then k = j

Next j

If k i Then

temp = a(i)

a(i) = a(k)

a(k) = temp

End If

Next i

For i = 1 To 10

Print a(i)

Next i

End Sub

4、本程序的功能是产生10个个位数互不相同的三位随机正整数,并存放到下标与其个位数相同的数组元素中。

例如395应存到a(5)中。

Option Explicit

Private Sub Form_Click()

Dim a(9) As Integer, x As Integer, k As Integer

Dim I As Integer

Randomize

Do While I <= 9

x = Int(Rnd * 900 + 100)

If a(k) = 0 Then

a(k) = x

I = I + 1

End If

Loop

For I = 0 To 9

Print a(I);

Next I

End Sub

四、编程题(每题15分,共30分)(界面自行设计)

1、编写程序,输出100以内能被3整除的数之和。要求:将结果在窗体上输出。

2、编写程序,从文本框1中输入的一个由字母和数字组成的字符串中,找出所有的大写字母,并依次连接,再输出到文本框2中。

3、编写程序,求两个正整数的最大公约数。要求:将a、b两个变量在分别Text1和Text2中输入,最大公约数在Text3中显示。

全国计算机等级考试二级VB笔试试题及答案

2009年9月全国计算机等级考试二级VB笔试试题及答案 一、选择题(每小题2分,共70分) 一、选择题 1.下列数据结构中,属于非线性结构的是()。 A. 循环队列 B.带链队列 C.二叉树 D.带链栈 答案C Array解析树均是非线性结构 2. 下列数据结构中,能够按照”先进后出”原则存取数据的是()。 A. 循环队列 B.栈 C.队列 D.二叉树 答案B 解析:栈是先进后出或后进先出的线性表 3. 对于循环队列,下列叙述中正确的是()。 A.队头指针是固定不变的 B.队头指针一定大于队尾指针 C.队头指针一定小于队尾指针 D.队头指针可以大于队尾指针,也可以小于队尾指针 答案D 解析:如果队头指针大于队尾指针说明队列已经循环存放数据了,如果队头指针小于队尾指针说明没有进行循环存放 4. 算法的空间复杂度是指()。 A.算法在执行过程中所需要的计算机存储空间 B.算法所处理的数据量

C.算法程序中的语句或指令条数 D.算法在执行过程中所需要的临时工作单元数 答案A 解析:算法的空间复杂度是指执行算法所需要的内存空间,包括算法程序所占空间,输入的初始数据所占空间和执行过程中所需要的额外空间. 5. 软件设计中划分模块的一个准则是()。 A. 低内聚低耦合 B. 高内聚低耦合 C. 低内聚高耦合 D. 高内聚高耦合 答案B 解析:模块内部各元素之间的联系要紧密,高内聚,模块间的连接的紧密程度要低,低耦合,这样可以提高模块的独立性. 6.下列选项中不属于结构化程序设计原则的是()。 A.可封装 B.自顶向下 C.模块化 D.逐步求精 答案A 7.软件详细设计产生的图如下 该图是( ). A.N-S图 B. PAD图 C. 程序流程图 D.E-R图 答案C 8.数据库管理系统是()。

江苏省计算机二级VB考试真题及参考答案

2007年秋季vb考试真题 1.下面关于比特的叙述中,错误的是( 1 ) A.比特是组成数字信息的最小单位 B.比特只有“0”和“1”两个符号 C.比特既可以表示数值和文字,也可以表示图像和声音 D. 比特”1”总是大于比特“0” 2.在下列有关集成电路的叙述中,错误的是( 2 ) A.现代集成电路使用的半导体材料主要是硅 B.大觑模集成电路一般以功能部件、子系统为集成对象 C.我国第2代居民身份证中包含有IC芯片 D? 目前超大规模集成电路中晶体管的基本线条已小到l纳米左右 3.在下列有关通信技术的叙述中,错误的是( 3 ) A.通信的基本任务是传递信息,因而至少需由信源、信宿和信道组成 B.通信可分为模拟通信和数字通信,计算机网络属于模拟通信 C.在通信系统中,采用多路复用技术的目的主要是提高传输线路的利用率 D?学校的计算机机房一般采用5类无屏蔽双绞线作为局域网的传输介质 4.下面是关于PC机主存储器的一些叙述,其中正确的是( 4 ) A.主存储器是一种动态随机存取存储器(RAM) B.主存储器的基本编址单位是字(即32个二进位) C.目前市场上销售的PC机,其内存容量可达数十GB D.所有PC机的内存条都是通用的:可以互换 5.现行PC机中,IDE(或SATA)接口标准主要用于( 5 ) A.打印机与主机的连接C.声卡与主机的连接 B.显示器与主机的连接D.硬盘与主机的连接 6. 下列有关PC机的CPU、内存和主板的叙述中,正确的是( 6 ) 。 A.大多数Pc机只存一块CPu芯片,即使是“双核”CPU也是一块芯片 B.所有Pentium系列微机的内存条相同,仅有速度和容量大小之分 C.主板上芯片组的作用是提供存储器控制功能,I/O控制与芯片组无关 D.主板上CMOS芯片用于存储CMOS设置程序和一些软硬件设置信息 7.下列有关目前Pc机辅助存储器的叙述中,错误的是( 7 ) A.硬盘的容量越来越大,这是因为硬盘中磁盘碟片的数目越来越多 B.硬盘的内部传输速率一般小于外部传输速率 c.优盘采用Flash存储器技术,属于半导体存储器 D.目前常见COMBO光驱是一种将CD-RW和DVD-ROM组合在一起的光驱 8.下面有关Windows操作系统,(95以后版本)的叙述中,错误的是( 8 ) 。A.Windows操作系统支持系统中多个任务的并发执行 B.利用Whldows附件“系统工具”中的“系统信息”可以查看内存的工作情况 C.系统规定文件名最多由128个字符组成 D.Vista是Microsoft公司推出的Windows XP操作系统的后继版本 9.算法设计是编写程序的基础。下列关于算法的叙述中,正确的是( 9 ) 。 A.算法必须产生正确的结果C.算法可以没有输出 B.算法必须具有确定性D.算法的表示必须使计算机能理解 10.因特网使用TCP/IP协议实现全球范围的计算机网络互连,连接在因特网上的每一台主机

计算机二级VB考试题及答案

计算机二级VB考试题及答案 为了使广大考生在备战计算机等级考试时,更快的掌握相应知识点,下面是搜索的计算机二级VB考试题及答案,供参考练习,预祝考生们考出自己理想的成绩! 1.在窗体上画一个名称为Text1的文本框,一个名称为Command1的命令按钮,然后编写如下事件过程和通用过程: Private Sub Command1_Click( ) n = Val(Text1.Text) If n2 = n/2 Then f = f1(n) Else f = f2(n) End If

Print f; n End Sub Public Function f1(ByRef x) x=x*x f1=x+x End Function Public Function f2(ByVal x) x=x*x f2=x+x+x End Function 程序运行后,在文本框中输入3,然后单击命令按钮,窗体上显示的是(D)(单)

A.72 36 B.108 36 C.72 6 D.27 3 2.在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click( ) c = "1234" For i = 1 To 4 c1 = Trim(Str( )) Print c1

Next i End Sub 程序运行后,单击命令按钮,要求在窗体上显示如下内容 12 123 1234 则在下划线处应填入的内容为(B)(单) A.Right(c1,i) B.Left(c1,i) C.Mid(c1,i,1) D.Mid(c1,i,i)

2016年计算机二级《VB》基础练习题及答案(2)

2016年计算机二级《VB》基础练习题及答案(2) 1[简答题]在名称为Forml的窗体上添加两个名称分别为Textl和Text2的文本框,它们的高、宽分别为300、2400和1200、2400。窗体的标题为“窗口”。请通过属性窗口设置适当的属性,满足如下要求: ①Text2可以显示多行文本,并且有垂直和水平两个滚动条; ②程序运行时在Textl中显示输入的字符为“*”。 程序运行后的窗体如图所示。 注意:存盘时必须存放在考生文件夹下,工程文件名保存为sjtl.vbp,窗体文件名保存为sjtl.frm。 参考解析: 【考点分析】本题考点有:窗体的Caption属性,文本框的Name、Width、Hei【ght、PasswordChar、Text、MuhiLine、ScrollBars属性。 【解题思路】文本框控件的MuhiLine属性用于设置文本框是否显示多行文本,值为Tr ue表示是,值为False则表示否。ScrollBars属性设置文本框是否有水平或垂直滚动条,它有0、l、2和3这4个值,0表示没有滚动条(默认值),1表示只有水平滚动条,2表示只有垂直滚动条,3表示有水平和垂直滚动条。文本框的PasswordChar属性常用于设置用某字符(如“*”)屏蔽用户在文本框中键入的内容,常用于口令输入。 【操作步骤】 步骤1:新建一个窗体,按照题目要求建立文本框控件并设置其属性,程序中涉及的控件及属性见表3.8和表3.9。

步骤2:调试并运行程序,关闭程序后按题目要求存盘。 【易错提示】由于ScrollBars属性的设置值较多,易混乱,请考生牢记4个值分别设置的文本框滚动条属性。 2[单选题]在下列模式中,能够给出数据库物理存储结构与物理存取方法的是()。 A.外模式 B.内模式 C.概念模式 D.逻辑模式 参考答案:B 参考解析:数据库系统的三级模式是概念模式、外模式和内模式。概念模式是数据库系统中全局数据逻辑结构的描述,是全体用户公共数据视图。外模式也称子模式或用户模式,它是用户的数据视图,给出了每个用户的局部数据描述。内模式又称物理模式,它给出了数据库物理存储结构与物理存取方法,所以选择B。 3[单选题]以下关系表达式中,其值为True的是()。 A.1f.XYZ”>”XYz” B.”VisualBasic”<>”visualbasic” C.P the-.=’’there·t D.”Integer”<”Int” 参考答案:B 参考解析:用关系运算符比较两个操作敷时,如果两个操作数是字符型的,按字符的A SCIl码从左到右一一比较,即先比较第1个,若相同再比较第2个,依次比较,直到比较

(完整word版)计算机二级VB编程题目含答案

Private Sub Command1_Click() Dim n As Integer, i As Integer, s As Double n = Val(Text1.Text) s = 0 For i = 1 To n s = s + i ^ 2 Next i Text2.Text = s End Sub Private Sub Command1_Click() ''' 不得删除本行注释 Dim i As Integer Open App.Path & "\" & "yssj.txt" For Input As #1 For i = 1 To 10 Input #1, a(i) Next i Close #1 End Sub Private Sub Command2_Click() ''' 不得删除本行注释 Dim i As Integer Text1.Text = "" For i = 1 To 10 If a(i) Mod 3 = 2 Then Text1.Text = Text1.Text & Str(a(i)) End If Next i End Sub

Private Sub command1_Click() '''不得删除本行注释 Dim a As Integer, b As Double, i As Integer, n As Integer n = Val(Text1.Text) a = 0 b = 0 For i = 1 To n a = a + i b = b + a Next i Text2.Text = b End Sub Private Sub Command1_Click() '''不得删除本行注释 Dim i%, xh$, xm$ Open App.Path & "\" & "Xhxm.txt" For Output As #1 For i = 1 To 3 xh = InputBox("请输入学号") xm = InputBox("请输入姓名") Write #1, xh, xm Next i Close #1 End Sub Private Sub Command2_Click() '''不得删除本行注释 Dim s as string Open App.Path & "\" & "Xhxm.txt" For Input As #2 Do While Not EOF(2) Line Input #2, s Text1.Text = Text1.Text & s & vbCrLf Loop Close #2 End Sub

计算机二级VB考试试题

站长提醒广大考生:下面的138道题目,在二级考试中命中率极高。 一、选择题 (1) 下面叙述正确的是(C) A. 算法的执行效率与数据的存储结构无关 B. 算法的空间复杂度是指算法程序中指令(或语句)的条数 C. 算法的有穷性是指算法必须能在执行有限个步骤之后终止 D. 以上三种描述都不对 (2) 以下数据结构中不属于线性数据结构的是(C) A. 队列 B. 线性表 C. 二叉树 D. 栈 (3) 在一棵二叉树上第5层的结点数最多是(B) 注:由公式2k-1得 A. 8 B. 16 C. 32 D. 15 (4) 下面描述中,符合结构化程序设计风格的是(A) A. 使用顺序、选择和重复(循环)三种基本控制结构表示程序的控制逻辑 B. 模块只有一个入口,可以有多个出口 C. 注重提高程序的执行效率 D. 不使用goto语句 (5) 下面概念中,不属于面向对象方法的是(D) 注:P55-58 A. 对象 B. 继承 C. 类 D. 过程调用 (6) 在结构化方法中,用数据流程图(DFD)作为描述工具的软件开发阶段是(B) A. 可行性分析 B. 需求分析 C. 详细设计 D. 程序编码 (7) 在软件开发中,下面任务不属于设计阶段的是(D) A. 数据结构设计 B. 给出系统模块结构 C. 定义模块算法 D. 定义需求并建立系统模型 (8) 数据库系统的核心是(B) A. 数据模型 B. 数据库管理系统 C. 软件工具 D. 数据库 (9) 下列叙述中正确的是(C) A.数据库是一个独立的系统,不需要操作系统的支持 B.数据库设计是指设计数据库管理系统 C.数据库技术的根本目标是要解决数据共享的问题 D.数据库系统中,数据的物理结构必须与逻辑结构一致 (10) 下列模式中,能够给出数据库物理存储结构与物理存取方法的是(A) 注:P108

2017年计算机二级考试VB重点-VisualBasic的特点

2017年计算机二级考试VB重点:Visual Basic的特点 一、Visual Basic的特点和版本 (一)Visual Basic 的特点 Visual Basic是一种可视化的、面向对象和采用事件驱动方式的结构化高级程序设计语言,可用于开发Windows环境下的各类应用程序。 总的来看,Visual Basic有以下主要特点: 1.可视化编程 2.面向对象的程序设计 3.结构化程序设计语言 4.事件驱动编程机制 5.访问数据库 6.动态数据交换(DDE) 7.对象的链接与嵌入(OLE) 8.动态链接库(DLL) 9.建立用户自己的ActiveX 控件 10.建立ActiveX 文档

11」nternet 组件下载 12.枚举类型 (二)Visual Basic 的版本 Visual Basic6.0包括3种版本,分别为学习版、专业版和企业版。 (1)学习版:Visual Basic的基础版本,可用来开发Windows应用程序。该版本包括所有的内部控件(标准控件)、网络(Grid)控件、Tab对象以及数据绑定控件。 (2)专业版:该版本为专业编程人员提供了一整套用于软件开发、功能完备的工具。它包括学习版的全部功能,同时包括ActiveX控件、In ternet 控件、Crystal Report Writer 和报表控件。 (3)企业版:可供专业编程人员开发功能强大的组内分布式应用程序。该版本包括专业版的全部功能,同时具有自动化管理器、部件管理器、数据库管理工具、Microsoft Visual SourceSafe 面向工程版的控制系统等 二、Visual Basic的启动与退出 开机并进入中文Win dows 后,可以用多种方法启动Visual Basic。 第一种方法:使用“开始”菜单中的“程序”命令。操作如下: (1)单击Windows 环境下的“开始”按钮,弹出一个菜单,把光标移到“程序”命令上,将弹出下一个级联菜单; (2)把光标移到“ Microsoft Visual Basic6.0 中文版”,弹出下一个级联菜单,即Visual Basic6.0程序组;

计算机二级考试《VB》模拟试题及答案

计算机二级考试《VB》模拟试题及答案 2016计算机二级考试《VB》模拟试题及答案 一、基本操作题 (1)在名称为Forml、标题为“球类项目”且没有最大化和最小化按钮的窗体上画1个名称为Combol的组合框。组合框中的文本内容为空,表项内容有“乒乓球”、“羽毛球”和“网球”3项。运行后的窗体如图所示。 注意:存盘时必须存放在考生文件夹下,工程文件名为 sjtl.vbp,窗体文件名为sjtl.frm。 (2)在名称为Forml、标题为“转换”的窗体上,画1个名称为Shapel、边框宽度为3的形状。再画两个标题分别为“椭圆”和“圆”的命令按钮。如下图所示。 要求:编写适当的事件过程,使得单击“椭圆”按钮时,Shapel 的形状变换为椭圆;单击“圆”按钮时,Shapel的形状变换为圆。程序中不得使用变量,每个事件过程中只能写一条语句。 注意:存盘时必须存放在考生文件夹下,工程文件名为 sjr2.vbp,窗体文件名为sjr2.frm。 二、简单应用题 (1)在考生文件夹下有一个工程文件sjt3.vbp。窗体Forml上有两个标题分别是“读数据”和“查找”的命令按钮。请画1个名称为Textl、初始值为空的文本框,该文本框允许显示多行内容,且有垂直滚动条,如图所示。程序功能如下。 ①在考生文件夹下的in.3.dat文件中存有100个正整数。单击“读数据”按钮,则将文件in3.dat中的数据读入数组a中。 ②单击“查找”按钮,则查找数组a中所有为7的倍数的数据,并将这些数据顺次显示在Textl文本框内(数据之间用空格隔开)。

“读数据”按钮的Click事件过程已经给出,请编写程序完成“查找”按钮的Click事件过程,实现上述功能。 注意:考生不得修改窗体文件中已经存在的控件和程序,在结束程序运行之前,必须使用“查找”按钮完成查找过程,且必须用窗 体右上角的关闭按钮结束程序,否则无成绩。最后将程序按原文件 名存盘。 (2)考生文件夹下有一个工程文件sit4.vbp。在窗体Forml上有 两个名称为Commandl和Command2、标题分别为“重输”和“查找”的命令按钮。程序功能如下。 单击“重输”按钮,则清空Textl中的`内容,等待用户输入由 空格隔开的若干个英文单词;单击“查找”按钮,则找出Textl中最 长的单词,并将其显示在Text2中。某一次的运行效果如图所示。 请将“查找”按钮的Click事件过程中的注释符去掉,把?改为正确 内容,以实现上述程序功能。 注意:考生不得修改窗体文件中已经存在的控件和程序,最后将程序按原文件名存盘。 三、综合应用题 考生文件夹下有一个工程文件sjt.s.vbp。在窗体Forml上有两 个标题分别是“产生数据”和“重新排列”的命令按钮,有两个标 题为“原始数据”和“排列数据”的标签。程序功能如下。 ①单击“产生数据”按钮,则随机产生20个一位整数,存人数 组a中,并同时显示在Textl中。 ②单击“重新排列”按钮,则重新排列数组a中的元素:使等值的元素相邻存放,并且保持它们在数组a中首次出现的相对次序;最 后将排列结果显示在Text2中。某一次运行结果如图所示。 请将“重新排列”按钮的Click事件过程中的注释符去掉,把“?”改为正确内容,以实现上述程序功能。

最新[考试中心]安徽省计算机二级VB笔试权威模拟试题及答案2

全国高等学校(安徽考区) 计算机水平考试试卷B (二级 Visual Basic 语言) 一、单项选择题(每题1分,共40分) 1.计算机硬件系统中最核心的部件是 C 。 A)内存储器B)输入/输出设备C)CPU D)硬盘 2.计算机最早的应用领域是 A 。 A)科学计算B)图形处理C)过程控制D)人工智能3.下列属于文字处理软件的是 B 。 A)Windows B)Word C)PowerPoint D)Excel 4.在计算机系统内部,所有数据都是采用 D 表示。 A)十六进制B)十进制C)八进制D)二进制5.在Windows系统中,下面文件命名合法的是 B 。 A)A*.DOC B)AB.DOC C)A?.DOC D)A>.DOC 6.计算机可以播放DVD等音像制品, 主要运用的是 A 技术。 A)多媒体B)人工智能C)数据库D)数据挖掘7.将文件从FTP服务器传输到本地计算机的过程称为 D 。 A)上传B)浏览C)查找D)下载 8.下列IP地址中,错误的是 C 。 A)219.231.10.155 B)192.168.5.1 C)219.260.20.12 D)192.10.6.7 9.下列关于计算机病毒的叙述中,正确的是 C 。 A)加密文件不会感染计算机病毒 B)系统软件不会感染计算机病毒 C)有防火墙的计算机系统也会感染病毒 D)压缩的文件不会感染计算机病毒 10.计算机能直接运行的是 B 。 A)目标程序 B)机器语言程序C)汇编语言程序 D)高级语言程序 11.下列选项中是Visual Basic的合法变量名的是 C。 A)1_abc B)abc-1 C)abc_1 D)abc.1 12.对正整数X、Y,有下列表达式,不能判断X能被Y整除的是 C 。 A)X/Y=Int(X/Y) B)X Mod Y =0 C)X\Y=Fix(X/Y) D)X\Y=X/Y 13.下面可以正确定义2个整形变量和一个字符型变量的语句是 B 。 A)Dim x, y As Integer, n As String B) Dim x%, y As Integer, n As String C) Dim x%, y$, n As String D) Dim x As Integer, y, n As String 14.下面表达式中, A 的运算结果与其他三个不同。 A)Exp(-3.5) B)Int(-3.5)+0.5 C)-Abs(-3.5) D)Sgn(-3.5)-2.5 15.将任意一个正的两位整数N的个位数与十位数对换的表达式为 A 。 A)(N-Int(N/10)*10)*10+Int(N/10) B)N-Int(N)/10*10+Int(N)/10 C)Int(N/10)+(N-Int(N/10)) D)(N-Int(N/10))*10+Int(N/10) 16.执行语句s = Mid("VisualBasic",1,6)后,s的值是 A 。 A) Visual B) Basic C) 6 D) 11 17.表达式5 Mod 3+3\5*2的值是 B 。

全国计算机等级考试二级笔试试卷VB语言程序设计

2011年9月全国计算机等级考试二级笔试试卷VB语言程序设计 一、选择题 1、下列叙述中正确的是 A、算法就是程序 B、设计算法时只需要考虑数据结构的设计 C、设计算法时只需要考虑结果的可靠性 D、以上三种说法都不对 2、下列关于线性链表的叙述中,正确的是 A、各数据结点存储空间可以不连续,但它们的存储顺序与逻辑顺序必须一致 B、各数据结点的存储顺序可以不一致,但它们的存储空间必须连续 C、进行插入与删除时,不需要移动表中的元素 D、以上三种说法都不对 3、下列关于二叉树的叙述中,正确的是 A、叶子结点总是比度为2的结点少一个 B、叶子结点总是比度为2的结点多一个 C、叶子结点数是度为2的结点数的两倍 D、度为2的结点数是度为1的结点数的两倍 4、软件按功能可以分为应用软件、系统软件和支撑软件(或工具软件)。下面属于应用软件的是( )。 A、学生成绩管理系统 B、C语言编译程序 C、UNIX操作系统D 5 该系统总体结构图的深度是 A、7 B、6 C、3 D、2 6、程序调试的任务是 A、设计测试用例 B、验证程序的正确性 C、发现程序中的错误 D、诊断和改正程序的错误 7、下列关于数据库设计的叙述中,正确的是 A、在需求分析阶段建立数据字典 B、在概念设计阶段建立数据字典 C、在逻辑设计阶段建立数据字典 D、在物理设计阶段建立数据字典 8、数据库系统的三级模式不包括 A、概念模式 B、内模式 C、外模式 D、数据模式 9、有三个关系R、S和T如下: R S 则由关系R和S得到关系T的操作是 A、自然连接 B、差 C、交 D、并 10、下列选项中属于面向对象设计方法主要特征的是 A、继承 B、自顶向下 C、模块化 D、逐步求精 11、以下描述中错误的是 A、窗体的标题通过其Caption属性设置

计算机等级考试二级VB模拟试题四及答案解析

计算机等级考试二级VB模拟试题四及答案解析 一、选择题 (1)在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private SubCommand1_Click() Move 500,500 End Sub 程序运行后,单击命令按钮,执行的操作为 A)命令按钮移动到距窗体左边界、上边界各500的位置 B)窗体移动到距屏幕左边界、上边界各500的位置 C)命令按钮向左、上方向各移动500 D)窗体向左、上方向各移动500 正确答案: B (2)在窗体上有若干控件,其中有一个名称为Text1的文本框。影响Text1的Tab顺序的属性是 A)TabStop B)Enabled C)Visible D)TabIndex 正确答案: D (3)以下定义数组或给数组元素赋值的语句中,正确的是 A)Dim a As Variant a=Array(1,2,3,4,5) B)Dima(10)As Integer a=Array(1,2,3,4,5) C)Dim a%(10) a(1)="ABCDE" D)Dim a(3),b(3)As Integer a(0)=0 a(1)=1 a(2)=2 b=a 正确答案: A (4)在窗体上画一个名称为List1的列表框,为了对列表框中的每个项目都能进行处理,应使用的循环语句为 A)For i=0 ToList1.ListCount-1 …… Next B)For i=0 To List1.Count-1 …… Next C)For i=1 To List.ListCount …… Next

D)For i=1 ToList1.Count

计算机二级考试题库:VB程序题

编写一个复制字符串的程序,如图x_17.jpg 所示。 * 界面要求: * 使用文本框、命令按钮完成。 * 运行要求: * 1、点击“清除”按钮,将所有的文本框内容清空; * 2、点击“复制”按钮,如上面文本框有选中的文本,则将选中的文本复制到下面文本框中, * 否则,将上面文本框所有内容复制到下面文本框中。 * (此题要求上载窗体文件,不要求填写程序运行结果) 编写程序: * 使用冒泡法,对数组ia(1)=8,ia(2)=6,ia(3)=9,ia(4)=3,ia(5)=2,ia(6)=7 * 从小到大排序,并以紧凑格式在一行上输出。 编写一个秒表程序,如图K_309.jpg 所示。 * 界面要求: * 使用一个标签、两个命令按钮、一个时钟控件完成。 * 运行要求: * 1、点击“开始计时”按钮,开始计时,标签中显示时间,时间精度是百分之一秒; * 2、点击“结束计时”按钮,停止计时。 * 3、未计时时,“开始计时”按钮可用,“结束计时”按钮不能用。 * 计时过程中,“开始计时”按钮不可用,“结束计时”按钮能用。 * (此题要求上载窗体文件,不要求填写程序运行结果) 编写程序: * 利用随机函数产生20个10~99之间(包括10和99)的随机整数存入一维数组A,* 找出其中的最大值和最小值。 编写程序: * 求出斐波那契数列前9项的和。 * 提示:前两项为:0,1,从第3项开始,每一项均为其前两项的和(即:0+1+1+2+3+5+...)。 编写一个字母转换的程序,如图K_401.jpg 所示。 * 界面要求: * 使用文本框、命令按钮控件完成。 * 运行要求: * 在文本框1中输入任意字符串; * 点击“字母转换”按钮,将小写字母转换成大写字母,大写字母转换成小写字母,其余字母不变, * 并在文本框2中显示转换后的字符串。 * (此题要求上载窗体文件,不要求填写程序运行结果) 编写程序:

zlegfa考试中心安徽省计算机二级VB笔试权威模拟试题及复习资料

-+ 懒惰是很奇怪的东西,它使你以为那是安逸,是休息,是福气;但实际上它所给你的是无聊,是倦怠,是消沉;它剥夺你对前途的希望,割断你和别人之间的友情,使你心胸日渐狭窄,对人生也越来越怀疑。 —罗兰 全国高等学校(安徽考区) 计算机水平考试试卷B (二级Visual Basic 语言) 一、单项选择题(每题1分,共40分) 1.计算机硬件系统中最核心的部件是 C 。 A)内存储器B)输入/输出设备C)CPU D)硬盘 2.计算机最早的应用领域是 A 。 A)科学计算B)图形处理C)过程控制D)人工智能3.下列属于文字处理软件的是 B 。 A)Windows B)Word C)PowerPoint D)Excel 4.在计算机系统内部,所有数据都是采用 D 表示。 A)十六进制B)十进制C)八进制D)二进制 5.在Windows系统中,下面文件命名合法的是 B 。 A)A*.DOC B)AB.DOC C)A?.DOC D)A>.DOC 6.计算机可以播放DVD等音像制品, 主要运用的是 A 技术。 A)多媒体B)人工智能C)数据库D)数据挖掘7.将文件从FTP服务器传输到本地计算机的过程称为 D 。 A)上传B)浏览C)查找D)下载 8.下列IP地址中,错误的是 C 。 A)219.231.10.155 B)192.168.5.1 C)219.260.20.12 D)192.10.6.7 9.下列关于计算机病毒的叙述中,正确的是 C 。 A)加密文件不会感染计算机病毒 B)系统软件不会感染计算机病毒 C)有防火墙的计算机系统也会感染病毒 D)压缩的文件不会感染计算机病毒

2013计算机二级(VB)考试机试题库

2013年VB题库 第01套简单应用题 (1)在考生文件夹下有一个工程文件sjt3.vbp,窗体上已经有一个标签Label1,请添加一个单选 按钮数组,名称为Op1,含三个单选按钮,它们的Index属性分别为0、1、2,标题依次为"飞机"、 "火车"、"汽车",再添加一个名称为Text1的文本框。窗体文件中已经给出了Op1的Click事件过 程,但不完整,要求去掉程序中的注释符,把程序中的?改为正确的内容,使得在程序运行时单 击"飞机"或"火车"单选按钮时,在Text1中显示"我坐飞机去"或"我坐火车去",单击"汽车"单选按 钮时,在Text1中显示"我开汽车去",如图所示。 注意:不能修改程序中的其他部分。最后将修改后的文件按原文件名存盘。 Private Sub Op1_Click(Index As Integer) Dim a As String, b As String, c As String a = "我坐" b = "我开" ' Select Case ? ***** Index ***** Case 0 Text1.Text = a + Me.Op1(0).Caption + "去" Case 1 ' Text1.Text = ? + Me.Op1(1).Caption + "去" ***** a ***** Case 2 Text1.Text = b + Me.Op1(2).Caption + "去" End Select End Sub (2)在考生文件夹下有一个工程文件sjt4.vbp,Form1窗体中有一个文本框,名称为Text1;请在窗体上添加两个框架控件,名称分别为F1、F2,标题分别为"性别"、"身份";在F1中添加两个单选按钮控件Op1、Op2,标题分别为"男"、"女";在F2中添加两个单选按钮控件Op3、Op4,标题分别为"学生"、"教师";再添加一个命令按钮,名称为C1,标题为"确定"。如图所示。请编写适当的事件过程,使得在运行时,在F1、F2中各选一个 单选按钮,然后单击"确定"按钮,就可以按照下表把结果显示在文本框中。 性别身份在文本框中显示的内容 男学生我是男学生 男教师我是男教师 女学生我是女学生 女教师我是女教师 最后把修改后的文件以原来的文件名存盘。 注意:考生不得修改窗体文件中已经存在的程序和Text1的属性,在结束程序运行之前,必须进行能够产生上表中一个结果的操作。必须用窗体右上角的关闭按钮结束程序,否则无成绩。 … ***** 请考生编写程序***** If op1 and op3 then Text1.Text=”我是男学生” If op1 and op4 then Text1.Text=”我是男教师” If op2 and op3 then Text1.Text=”我是女学生” If op2 and op4 then Text1.Text=”我是女教师” *****第01套综合应用题 以下数列:1,1,2,3,5,8,13,21,…,的规律是从第3个数开始,每个数都是 其前面两个数之和。 在考生文件夹下有一个工程文件sjt5.vbp。窗体中已经给出了所有控件,如图所示。

全国计算机等级考试二级VB语言笔试试题与答案

2005年9月 全国计算机等级考试二级笔试试卷 公共基础知识和Visual Basic 语言程序设计 (考试时间90 分钟,满分100 分) 一、选择题 (每小题 2 分,共 70 分 ) 下列各题A) 、 B) 、C)、 D) 四个选项中,只有一个选项是正确的。请将正确选项填涂在答题卡相应位置上,答在试卷上不得分。 (1)下列叙述中正确的是 A .程序设计就是编制程序 C.程序经调试改错后还应进行再测试C。 B.程序的测试必须由程序员自己去完成 D.程序经调试改错后不必进行再测试 (2)下列数据结构中,能用二分法进行查找的是A .顺序存储的有序线性表 B .线性链表 A C.二叉链表 。 D.有序线性链表 (3)下列关于栈的描述正确的是C。 A.在栈中只能插入元素而不能删除元素 B.在栈中只能删除元素而不能插入元素 C.栈是特殊的线性表,只能在一端插入或删除元素 D.栈是特殊的线性表,只能在一端插入元素,而在另一端删除元素 (4)下列叙述中正确的是D。 A.一个逻辑数据结构只能有一种存储结构 B.数据的逻辑结构属于线性结构,存储结构属于非线性结构 C.一个逻辑数据结构可以有多种存储结构,且各种存储结构不影响数据处理的效率 D.一个逻辑数据结构可以有多种存储结构,且各种存储结构影响数据处理的效率 (5)下列描述中正确的是C。 A.软件工程只是解决软件项目的管理问题 B.软件工程主要解决软件产品的生产率问题 C.软件工程的主要思想是强调在软件开发过程中需要应用工程化原则 D.软件工程只是解决软件开发中的技术问题 (6)在软件设计中,不属于过程设计工具的是D。 A . PDL( 过程设计语言 ) B .PAD 图C. N-S 图 D. DFD 图 (7)下列叙述中正确的是A。 A .软件交付使用后还需要进行维护B.软件一旦交付使用就不需要再进行维护C.软件交付使用后其生命周期就结束D.软件维护是指修复程序中被破坏的指令 (8)数据库设计的根本目标是要解决A。 A .数据共享问题B.数据安全问题C.大量数据存储问题 D .简化数据维护

计算机等级考试(二级VB)模拟试题二

计算机等级考试(二级VB)模拟试题二 第一部分计算机基础知识 1.是我国安全部开发的一种检测和消除计算机病毒的杀毒软件。 A.Kill B.Scan C.Vsafe D.WPS 2.用n位二进制来表示一个整数的补码,用最高位作为符号位,其整数的表示范围是. A.-2n-1~+2n-1-1 B.-2n-1+1~+2n-1 B.-2n-1~+2n-1D.-2n~+2n-1 3.下列四个数中最大的数是。 A.十进制数1789 B.十六进制数IFF C.二进制数10100001 D.八进制数227 4.存储器体系由不同类型的存储器组成多层结构,按存取速度从快到慢的是。 A.快存、辅助、主存、海量存储器B.光盘、主存、辅助、海量存储器 C.快存、主存、辅助、海量存储器D.DVD、主存、辅助、海量存储器 5.高级语言采用解释方式时的执行速度与采用编译方式时的执行速度相比,下列是正确的。 A.相等B.前者快C.前者慢D.不能确定 6.设汉字字库包括全角符号和一、二级汉字共8000个,进入汉字操作系统调用16x15点阵汉字库,且全部常驻内存中,则内存开销约为。 A.640KB B.1.47KB C.240KB D.70KB 7.下列软件中,不属于应用软件的是。 A.字表处理软件B.财务管理软件 C.股市分析软件D.高级语言编译程序 8.传送速率单位“bps”代表的意义是。 A.Bytes Per Second B. Bits Per Second C.Band Per Second D. Billion Per Second 9.软件需求分析一般应确定的是用户对软件的。 A. 功能需求 B. 非功能需求 C. 性能需求 D. 功能需求和非功能需求 10.计算机网络中的拓扑结构是一种。 A.实现异地通信方案B.理论概念 C.设备在物理上的连接形式D.传输信道的分配 11.E-mail地址中@后面的内容是指。 A.收信服务器名称B.寄信服务器名称 C.帐号D.密码 12.如果用户正在用到3个文件夹,每个文件夹至少含有4个文件,若想不移动文件,工作却更方便,应当。 A.在桌面上右击鼠标,为这些文件夹建立快捷键 B.把这些文件夹增加到快捷文件夹中去

江苏省计算机二级VB试题库

一.选择题 1.窗体上有多个控件,在Form_Activate()事件过程中添加____ B______语句,就可确保每次运行程序时,都将光标定位在文本框Text1上。 A.Text1.Text="" B.Text1.SetFocus C.Form1.SetFocus D.Text1.Visible=True 2.语句Print "5*20"输出的结果是______C___。 A."5*20" B.出现错误信息 C.5*20 D.100 3.不能打开代码窗口的操作是______B__。 A.双击窗体设计器的任何地方 B.按下F4键 C.单击工程窗口中的“查看代码”按钮 D.选择“视图”下拉菜单中的“代码窗口” 4.在VB中可以作为容器的是______B__。 A.Form、TextBox、PictureBox B.Form、PictureBox、Frame C.Form、TextBox、Label D.PictureBox、TextBox、ListBox 5.能被对象所识别的动作与对象可执行的活动分别称为对象的___D_____。 A.方法、事件B.过程、方法 C.事件、属性D.事件、方法 6.计算下面的表达式,其值是_____B___。 CInt(4.5) * Fix(-3.81) + Int(4.1) * (5 Mod 3) A.-7 B.-4 C.-8 D.6 7.以下有关对象属性的说法中正确的是___D_____。 A.对象所有的属性都罗列在属性窗口列表中 B.不同对象不可能有同名属性 C.不同对象的同名属性取值一定相同 D.对象的某些属性既可在属性窗口中设置,也可通过程序代码设置或改变 8.要使定时器控件可以使用,需设置的属性是____B_____。 A.Interval B. Enabled C. Value D. Text 9.在某过程中已说明变量a为Integer类型、变量s为String类型,过程中的以下四组语句中,不能正常执行的是 ___D_____。 A.s=2*a+1 B.s="237" & ".11":a=s C.s=2*a>3 D.a=2:s=16400*a 10.在程序代码中,将图片文件“abc.jpg”装入图片框Picture1的语句是_____C___。 A.Picture1.Picture = "abc.jpg" B.Picture1.image = "abc.jpg " C.Picture1.Picture = LoadPicture("abc.jpg") D.LoadPicture("abc.jpg") 11.多窗体程序由多个窗体组成。在缺省情况下,VB在执行应用程序时,总是把_______B__指定为启动窗体。 A.不包含任何控件的窗体 B.设计时的第一个窗体

计算机二级考试VB一般程序设计习题

般程序设计习题 '〖第1题〗:(事件)单击窗体。 '(响应)求100以内偶数的和,并将结果输出在窗体上。 '将结果存入变量SUM中 '答案:DimiAsInteger Fori=ITolOO lfiMod2=0Then sum=sum+i EndIf Next Printsum '〖第2题〗:(事件)双击窗体。 '(响应)求s=1+1X 2+1 X 2X 3+…+1X 2 X 3X …X 10, '并将结果存到变量S中 答案:DimijAsInteger DimkAsLong k=1 s=0 Fori=1To10 Forj=1Toi k=k*j Next s=s+k k=1 Next Print(CStr(s)) '〖第3题〗:(事件)单击窗体。 '(响应)求1+2+3+……+100的值,并把结果输出在窗体上。'结果存入变量SUM中o '答案:DimiAsInteger Fori=1To100 sum=sum+i Next Printsum '〖第4题〗:判断一个数是否是素数。 '答案:DimiAsInteger Prime=True Fori=2ToInt(Sqr(m)) lfmModi=0ThenPrime=False:ExitFor Nexti '〖第5题〗:(事件)单击窗体。 '(响应)求1-1/2+1/3-1/4+ ……+1/99-1/100 的值。 '将结果存入变量J中。 DimiAsInteger Fori=1To100 IfiMod2=1Then j=j+1/i ElseIfiMod2=0Then j=j-1/i EndIf Next Printj ”〖第6题〗:(事件)单击窗体。 '(响应)求200~300之间既能被3整除又能被7整除的数 '并求出所有数之和存入变量SUM中 '答案:DimiAsInteger Fori=2 0仃o300 If((iMod3)=0)And((iMod7)=0)Then Print(CStr(i)) sum=sum+i

计算机二级考试VB一般程序设计习题

一般程序设计习题 '〖第1题〗:(事件)单击窗体。 ' (响应)求100以内偶数的和,并将结果输出在窗体上。 ' 将结果存入变量SUM中 '答案:Dim i As Integer For i = 1 To 100 If i Mod 2 = 0 Then sum = sum + i End If Next Print sum '〖第2题〗:(事件)双击窗体。 ' (响应)求s=1+1×2+1×2×3+...+1×2×3× (10) ' 并将结果存到变量S中 答案:Dim i, j As Integer Dim k As Long k = 1 s = 0 For i = 1 To 10 For j = 1 To i k = k * j Next s = s + k k = 1 Next Print (CStr(s)) '〖第3题〗:(事件)单击窗体。 ' (响应)求1+2+3+……+100的值,并把结果输出在窗体上。' 结果存入变量SUM中。 '答案:Dim i As Integer For i = 1 To 100 sum = sum + i Next Print sum '〖第4题〗:判断一个数是否是素数。 '答案:Dim i As Integer Prime = True For i = 2 To Int(Sqr(m)) If m Mod i = 0 Then Prime = False: Exit For Next i '〖第5题〗:(事件)单击窗体。 ' (响应)求1 - 1/2 + 1/3 - 1/4 + ……+ 1/99 - 1/100的值。 ' 将结果存入变量J中。 Dim i As Integer For i = 1 To 100 If i Mod 2 = 1 Then j = j + 1 / i ElseIf i Mod 2 = 0 Then j = j - 1 / i End If Next Print j ''〖第6题〗:(事件)单击窗体。 ' (响应)求200~300之间既能被3整除又能被7整除的数。' 并求出所有数之和存入变量SUM中 '答案:Dim i As Integer For i = 201 To 300 If ((i Mod 3) = 0) And ((i Mod 7) = 0) Then Print (CStr(i)) sum = sum + i End If Next Print sum '〖第7题〗:(事件)单击窗体。

相关文档
相关文档 最新文档