vb加试填空题

节VB选考填空题

莁【201509】编写VB程序，实现如下功能：在文本框Textl中输入一个整数，单击按钮Command1 采用对分查找法在数组 A (从小到大排序，并显示在标签Labell中)中查找该数。若找到，则从

数组A中删除该数(该数后面的数组元素都前移一位)，并在标签Label2中显示删除后的结果，运行效果如图所示；否则，在标签Label2中显示“该数没有找到”。

I I

蚅实现上述功能的VB代码如下，但加粗加下划线部分代码有错，请改正。

莄DimA(1to10)asl nteger

I / ?/广

蚃Form_Load事件过程产生10个整数，按升序保存在数组A中，并在标签Label1中显示

?'~y I f / ? J I

蝿PrivateSubComma nd1_click()

蚈DimIasi ntegerjasi nteger,masi nteger,kasi nteger

X / 』I x' \ /

X | ：/ y ■

蒄Dimxasintegerfasboolean '变量f用于标记是否在数组中找到x

螀X=val ( Text1.text )

蒁I=1:j=10 | |

蒇F=false

薄Dowhile(i<=j)and(f=false)

賺M=i nt((i+j)/2)

羈lfa(m)=xthenf=true

芆If a(m)>xthenl=m+1elsej=m-1

蚄Loop

薁Iff=truethe n

蚀Fork=mto9

芈A(k+1)=a(k)

螄Next

羂Label2.caption=

膈Fork=1to9

肇Label2.capti on=Iabel2.capti on+str(a(k))+ ””

袄Nextk

莃Else

袀Label2.caption= ”该数没有找到”

螆En dif

I / ?/广

羄Endsub

\ ' / i -1' 1

h \ \ y I / . I* I I

薀【201509】用VB编写一个字符串分行程序，功能如下：单击“分行”按钮Command1, 将文本框Text1中的英文文本在列表框List1 中分行显示(分行时单词不得跨行，每行字符尽可能多但不超过40个)，并在标签Label1中输出总行数，运行效果如第17 题图所示。分行算法如下：

；

芈(1)将文本框中的字符串保存到变量s中

薅⑵当s中字符个数超过40时，循环执行下列①、②、③步，否则跳转到(3):

羃①如果第41个字符不是英文字母，则分行位置p=40;否则，向左逐个查找，直至找到第一个非英文字母，将其位置作为分行位置p;

! j \ ■.j 、* i

?\ I |

羁②截取s的前p个字符，作为新增行显示在列表框List1中，同时总行数加1;③将s中未分行部分重新赋

值给变量s。肀⑶将s作为新增行显示在列表框List1 中，同时总行数加1

蚈实现上述功

能的VB程序

如下，请在划

线处填入合适

代码。

肃

PrivateSubComma nd1_click()

莂Dimsasstring,casstring

蒈Dimrasi nteger,totalasi nteger,pasi nteger

莇Total=0

膃S= ______________

螃DoWhilele n(s)>40

膀R=41

膆C=mid(s,r,1)

I z

芃Ifnot((c>= ” a” andc<=” z ” )or(c>= ” A” andc<=” Z” ))then

q ； ji | i

膄P=40

蚇Else

X / 严I X、J /

腿‘从第41个字符开始向左找到第1个非英文字母，并将其位置值赋给p 莃DoWhile((c>= ” a” andc<=” z” )or(c>= ” A” andc<=” Z” ))

芀r=

_- i | ' - - L.I

蚃c=mid(s,r,1)

芁Loop

! j \ ■.j 、* i

' “ \ i i

蚇P=r

羅En dif

莅List1.additemmid(s,1,p)

羀Total=total+1

螇S= _________________

莆Loop

螃List1.additems

蝿Total=total+1

袇Labell.captio n= “共” +str(total)+ “行”

螇EndSub

薅【201510】n个数据的冒泡排序需要经过n-1遍加工，每一遍加工自下而上比较相邻两个数据，把较小者交换到上面。小刘发现：当某一遍加工过程中没有数据交换，说明数据已经有序，无需进

一步加工。为此，小刘对算法进行优化，编写了一个VB程序，功能如下：运行程序时，在列表框Listl中显示排序前数据，单击“排序”按钮Commaiid1，在列表框List2中显示这些数据按升序

排序后的结果，在标签Label3中显示排序过程的加工遍数。运行效果如图所示。

螂实现上述功能的VB代码如下，但加框处代码有错，请改正。

羆Dima(仃o8)Asl nteger

I ■'./ .. 4 1| \

袄Dimn AsI nteger

F \ \: Z I I i1i ■ I I

羃PrivateSubForm_Load()

薁’n=8，排序前数据存储在数组a中，并在列表框Listl中显示

J I I ■*r

肆'代码略

芅EndSub

蚅PrivateSubComma nd1_Click()

il "X ”JI \

莀DimflagAsBoolean ' flag 值为True表示一遍加工中发生过交换

莀i=1

蚆flag=True

\ \ \ I I *

\ \ I I

■

膃DoWhile' ( 1)

莃i<=n-10rflag=True

蒀flag=False

肇Forj=nToi+1Step-1

袅Ifa(j)

膂k=a(j):a(j)=a(j-1):a(j-1)=k

薀flag=True

蒈Endlf

节Nextj

袀i=i+1

蚀Loop

蚄Label3.Caption="排序过程的加工遍数为"+'( 2) | 肄

Str(i)

虿Fori=1T on

螀List2.AddltemStr(a(i))

肅Nexti

蒂EndSub

/ /

蚂4.【201510】某数据加密方法描述如下：

X \ I y ■| jT '

袀(1)以字节为单位进行加密处理；

蒆(2)将1个字节的8位二进制数分割成前4位与后4位两个二进制数; 膄(3)分别将上述两个4位二进制数转换为十进制数；

蒁(4)将每个十进制数转换为1个加密字符，对应的“密码表”如下：

衿小明按照上述方法，设计了一个字符串(仅包含ASCII字符)加密的VB程序，功能如下：单击“加密”

按钮Commandl程序依次将文本框Textl中每个字符的ASCII码值作为1个字节转换为两个加密字符，连接这些加密字符，最后在文本框Text2中输出加密结果。下表显示了字符串中一个字符的加密过程：

膃程序运行效果如第17题图所示。

羂实现上述功能的VB程序如下: 賺(1)请在划线处填入合适代码

莇PrivateSubComma nd1_Click()

芆Dimn Asl nteger,sAsStri ng,iAsl nteger,ssAsStri ng

肂DimaAsInteger'存储加密前字符的ASCII码

莈Dimb1AsI nteger,b2Asl nteger' 分别存储分割、转换后的两个十进制数

聿s=Text1.Text

羅①

—

肂Fori=1T on

蝿a=Asc(Mid(s,i,1))

蒇b1=a\16

螄b2=aMod16

膂ss=ss+Code2Char(b1)+Code2Char(b2)

膀Text2.Text=ss

膈Nexti

螇EndSub | | 〔.I

- \ f*1*」

节'十进制值转换为加密字符的函数

\ \ 'i '| *'■-■■^1

■.I I

薀Fun ctio nCode2Char(cAsl nteger)AsStri ng

蚆DimsAsStri ng

薅s="llikeCHNpostcard"

莂Code2Char=^

羁EndFunction

莈(2)若将“密码表”中值为“ 0”对应的加密字符“ I ”改成“ i ”，加密后的密文可能无法解密，原因是。

莄5.【201604】某地1900-1999年的平均降水量数据保存在数据库中。现要求找出相邻两年年平均降水量变化(即本年度与上年度“年平均降水量”差值的绝对值)最大的年份区间。如果多个符合

要求的年份区间，只输入距今最近的。小吴为此编写了VB程序，程序运行时，单击按钮Comma nd1后，在文本框Textl中输出运行结果。实现上述功能的VB代码如下，但加框处代码有错，请改正。

蒂Dimw(仃o100)AsSingle'依次存储1900-1999年的年平均降水量数据

肇Co nstn=100

祎PrivateSubForm_Load()

肃'本过程从数据库中按19000-1999年依次读取年平均降水量数据，并存储在数组w中

薂'代码略

葿EndSub

? L一_

薈PrivateSubComma nd1_Click()

膆DimiAsI nteger,imaxAsl nteger

蚁imax= □

/ / . ' i

羆Fori=3Ton

X | ：/ y ■

羅lfAbs(w(i)-w(i-1))>=Thenimax=i

Abs(w(i-1)-w(i-2))

薅Nexti

羂Text1.Text="年平均降水量变化最大的年份区间是"+Str(imax+1898)+"-"+Str(imax+1899)

羈EndSub

肅6.【201604】某数据压缩方法描述如下：

羆1)原始数据中，某数不为0且相邻无重复，压缩数据用该数据表示；

蒀2)原始数据中，某数为0且相邻无重复，压缩数据用两个数表示，第1个位0，第2个为0;

羁3)原始数据中，某数据相邻有重复，压缩数据用3个数表示：第1个位0，第2个为重复数的个

数，第3个为该数本身；

膅根据上述压缩方法，对应的解压缩方法示例如图a所示。

肃图a

膂小明编写了一个解压送VB程序，功能如下：窗体加载时，自动读取压缩数据，依次存储在数组元素

a(1)、a(2)、a(3) ............... 中，压缩数据的个数存储在变量n中，压缩数据显示咋文本框Text1中。单击“解压缩”按钮Comma nd1程序对压缩数据依次进行解压缩处理，解压缩数据显示在文本框Text2中。程序运行界面如图b所示。

螀图b

芅(1)如果压缩数据为“ 23,0,21,66,0,0,77,0,5,0 ”，则解压缩数据的个数是。蒄(2)实现上述功能的VB程序如下。请在划线处填入合适代码。

袃Dima(仃o100)Aslnteger'存储压缩数据，最大处理个数为100

薈Dimb(仃o1000)Aslnteger'存储解压缩数据，最大处理个数为1000

芅DimnAsInteger'存储压缩数据的个数

袄PrivateSubForm_Load()

莁'压缩数据由上述压缩方法生成

芇'本过程用于读取压缩数据并存储在数组a，压缩数据个数存储在变量n中莅'代码略

/ I J / ./■

芅EndSub

肃PrivateSubComma nd1_Click()

莀DimpaAsInteger'存储压缩数组当前处理位置

蒅DimpbAsInteger'存储解压缩数组当前处理位置

■.I

蒂DimfirstdataAsInteger,countAsInteger,iAsInteger

蒁pa=1:pb=1

聿DoWhilepa<=n

薄firstdata=a(pa)

袃lffirstdata<>0Then '示例1情况处理

芃b(pb)=firstdata

袈pa=pa+1:pb=pb+1

羈Else

芄coun t=a(pa+1)

蚁Ifcount=0Then '示例2情况处理

袁b(pb)=0

羈pa=^:pb=pb+1

蚅Else'示例3情况处理

莃Fori=1Toco unt

蚀②

肇Nexti

肆pa=pa+3:pb=pb+co unt

袁Endlf

匸‘/ /. ：j

葿EndIf

蒂Loop

蒇Text2.Text=Str(b(1))

祎Fori=2To ③■ J | ■ - U

蒂Text2.Text=Text2.Text+","+Str(b(i))

乂\ \ 'l 'i f、|

薂Nexti

袇EndSub

芄7.【201608温州模拟卷】小明编写了一个VB程序，功能如下：在文本框Text1中输入一段英文，并在文本框Text2中输入英文段落中的某个单词(或字符串)，单击Comma nd后，在文本框Text3 中显示该单词在文中某两次出现的最大间距，若只出现一次货不出现则显示值为0。程序运行界面

如下图所示：

蒄实现上述功能的VB程序如下：

薂PrivateSubComma nd1_Click()

芈Dima(1To1000)AsString'数组a存储文中出现该指定单词或字符串的各个位置

羆DimsAsStri ng,cAsStri ng,chAsStri ng

芃Dimn AsI nteger,MaxAsl nteger,iAsl nteger

蚂s=Text1.Text

虿c=Text2.Text

蒄n=O:Max=O

肂Fori=1ToLe n( s)-Le n( c)+1

I I

螂ch= _______________

螆Ifch=cThen

I / ?/广

膆n=n+1

/ 'j/ .■' ；' i1".1

螁a(n )=i

袁lfn>=2Then

腿lfa(n )-a( n-1)-Le n( c)>MaxThe nMax=a( n)-a( n-1)-Le n(c)

蚄EndIf

袄Endlf

-.■ 11 . - L.I

羁Next

薈Text3.Text= ______________

! j \ ■.j 、* i

莆EndSub

蚃8.【201608温州模拟卷】合唱队列是按队员的身高进行排列，形成中间高两边有序降低的队形：例如有6个队员“己、戊、丁、丙、乙、甲”的身高一次由小到大，则排列后的顺序为“戊、丙、甲、乙、丁、己”。小李用VB编写模拟“合唱队列”程序，功能如下：在文本框Text1中输入各队

员身高，输入结束并回车，则输入的各队员身高分别存入数组a中；单击“合唱队列”按钮Command1对数组a的元素进行有序排列后，将各元素存入数组C中形成合唱队列，并将结果显示在文本框Text2中。程序运行界面如图所示：

肁实现上述功能的VB程序如下：

罿(1)如果输入各队员身高为“ 190,191,194,179,166 ”，则合唱队列的结果为________________ 。

螄(2)实现上述功能的VB程序如下，请在划线处填入合适代码。

莂Dima(仃o20)AsInteger

賺Dimn AsI nteger

莀PrivateSubtext1_keypress(keyasciiAsl nteger)

蒅'将输入各队员身高分别存入数组a中，队员个数为n,代码略!

蒅EndSub

螀PrivateSubComma nd1_Click()

肆Dimc(仃o20)Asl nteger

螆DimrightAs In teger,leftAs In teger,iAs In teger

蚃Fori=1Ton-1

螀Forj=1T on-i

i I 蒆If Then

y I ' / y '

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

蒁EndIf

袀Next - J | - ■I.. I

袇Next

羆'下列程序段实现数组C的合唱队列

芀m=(1+ n)\2

羀left=m:right=m

芈c(m)=a( n)

莄i=2

芃DoWhilei<=n

聿IfiMod2=0Then

莅right=right+1

肆c(right)=c (n-i+1)

肂Else

螆c(left)=a( n-i+1)

薄Endlf

袁Loop

艿s=

腿Fori=2T on

芆s=s+", "+Str(c(i))

袄Next

荿Text2.Text=s

薈EndSub

蚄9.【201610加试题】小吴为了研究冒泡排序过程中数据的“移动”情况，编写了一个VB程序，功能如下：在列表框List1中显示排序前数据（存储在数组a中），在文本框Text1中输入初始位置（即下标值），单击“排序”按钮Comma nd后，在标签Label1中显示指定初始位置的数据在排序过程中的位置变化情况，排序后的数据显示在列表框List2中。程序运行界面如图所示。

代码有蚃实现上述功能的VB程序如下，但加框处

错，请改正。

蚃Dima(仃o8)Aslnteger

芃Dimn AsI nteger

虿PrivateSubForm_Load()

⑷=72

蚆a(1)=30:a(2)=47:a(3)=30:a

螃a(5)=70:a(6)=23:a(7)=99:a(8)=24

荿n=8

腿Fori=仃08

蒄Listl.Addltema(i)

袃Nexti

螀EndSub

衿PrivateSubComma nd1_Click()

蒇DimiAsI ntegerjAsI nteger,kAsl nteger

羃DimposAsI nteger

賺DimsAsStri ng

莇s=Text1.Text

l' 1芆pos=Val(Text1.Text)

肃Fori=1T on-1

薂Forj=nToi+1Step-1

聿Ifa(j)

羅________________________

羃a(j-1)=a(j)

蒇a(j)=k

肇'如果pos位置的数据参与交换，则更新pos值，记录pos变化位置

I 「?__ ___ J

膂Ifpos=jThe n

膀pos=j-1

腿s=s+" —"+Str(pos)

螅pos=j

膅s=s+" —"+Str(pos)

袀Endlf

蚆Endlf

膆Nextj

蚃Nexti

蕿Labell.Caption="位置变化情况："+s

芀Fori=1T on

薅List2.AddltemStr(a(i))

羂Nexti

膂EndSub

VB程序：小王编写一个过程，该过程从数据库读取某一指定

科目的相关数据，存储在数组a中；小李编写一个过程，该过

程依据数组a中的相关数据统计各班平均分。小李与小王约定

的数组a各元素含义如图所示。

膀程序功能如下：在文本框Text1中输入科目名称，单击

“读取数据库”按钮Comma ng程序从数据库读取数据；单

击“开始统计”按钮Comma nd，程序进行统计处理，结果输

出在列表框List1中。程序运行界面如下图所示。

实现上述功能的VB程序如下，请回答下列问题：

(1)根据程序运行界面中的数据及数组a各元素的含义，数

组元素a(5)的值为(填写数值)。

(2)分析程序，可知数据库的文件名为

(3)请在划线处填入合适的代码。

Dima(仃o600)Asl nteger'数组大小满足处理要求

PrivateSubComma nd1_Click()

本过程由小王完成，从数据库读取指定科目的各相关数据，存储在数组a中

Dimco nn AsNewADODB.Co nn cction

DimrsAsNewADODB.Recordset connConncction Stri ng=source="+"Score.accdb" conn. Ope n Setrs.ActiveC onn ecti on=conn

'本过程的其他语句略

EndSub

PrivateSubComma nd2_Click()

'依据数组a中的相关数据统计各班级平均分

DimiAsI ntegerjAsI nteger, nAsI nteger

DimpAsI nteger,sumAsl nteger,averAsSi ngle

①

p=n+2

Fori=1T on

sum=0

Forj=1Toa(i+1)

i

②

P=P+1

Nextj

aver=sum/a(i+1)

List1.AddltemStr(i)+""+Str(a(i+1))+""+Str(aver)

Nexti

EndSub

答案：

冷jf ■

y I

1. (1)A(m)A(m)(2)A(k)=A(k+1)

2. (1)Text1.text(2)r-1(3)Mid(s,p+1 丄en(s)-p) 或Mid(s,p+1)或Right(s,Len(s)-p)

3. ( 1) i<=n-1Andflag=True ( 2) Str(i-l)

4. (1)①n=Len(s)或n=Len(Text1.Text) ②Mid(s，c+1,1)

(2)加密字符i对应两个值0，2

5.2Abs(w(imax)-w(imax-1))

6. 29pa+2b(pb+i-1)=a(pa+2)pb-1

7. ⑴(2 分)Mid(s,i,Len(c)) ⑵(2 分)Str(Max)

8. ⑴(2 分)166,190,194,191,179

⑵①(2 分)a(j)>a(j+1) ②(2 分)left=left -1③(1 分)Str(c(1))

9. k=a (j-1 ) ElseIfpos=j- 1Then

10. 33Score.accdbn=a(1)sum=sum+a(p)

VB新题库(填空题)

所有填空题 1、VB6.0是运行于______操作系统环境下的一个快速可视化程序开发工具，用它进行程序设计，有两个基本的特点，即______和______。 答案：1：Windows9x/NT#Windows9x/NT#Windows9x\NT#Windows9x\NT#Windows9x#Windows NT#Windows9x#WindowsNT#windows9x/NT#windows9x/NT#windows9x\NT#windows9x\NT#windows9x#windows NT#windows9x#windowsNT 2：事件驱动编程#可视化设计 3：可视化设计#事件驱动编程 等级：1难度：1 知识点：VB知识点/VB简介 2、VB是一种面向______的可视化编程语言，它采用______的编程机制。 答案：1：对象 2：事件驱动 等级：1难度：1 知识点：VB知识点/VB的编程环境 3、在VB集成开发环境中，运行应用程序的方法有两种：______或______。 答案：1：编译运行模式#解释运行模式#编译运行#解释运行 2：解释运行模式#编译运行模式#解释运行#编译运行 等级：1难度：1 知识点：VB知识点/VB简介 4、VB的对象主要分为______和______两大类。 答案：1：窗体#控件 2：控件#窗体 等级：1难度：1 知识点：VB知识点/VB的对象、属性、方法和事件 5、VB中，用来描述一个对象的状态或特征的量称之为对象的______。 答案：1：属性 等级：1难度：1 知识点：VB知识点/VB的对象、属性、方法和事件 6、在VB中，最基本的对象是______。 答案：1：窗体 等级：1难度：1 知识点：VB知识点/VB的对象、属性、方法和事件 7、一个对象响应某个事件后所执行的操作是通过一段程序代码来实现，这段程序代码称______。 答案：1：事件过程 等级：1难度：1

vb程序设计试题(含答案)

第一套试题 一、选择题（每题2分，共30分） 1.在VB环境中，工程文件的扩展名是( C ) （A）.frm （B）.bas （C）.vbp （D）.frx 2.下面4项中不属于面向对象系统三要素的是( A ) （A）变量（B）事件（C）属性（D）方法 3. \、/、Mod、*这4个算述运算符中，优先级别最低的是( C ) （A）\ （B）/ （C）Mod （D）* 4.要使Print方法在Form_Load事件中起作用，要对窗体的( C )属性进行设置（A）BackColor （B）ForeColor （C）AutoRedraw （D）Caption 5.不论何控件，共同具有的属性是( B ) （A）Text （B）Name （C）ForeColor （D）Caption 6.要使Form1窗体的标题栏显示“欢迎使用VB”，以下语句正确的是( D ) （A）Form1.Caption=“欢迎使用VB”（B）Form1.Caption=ˊ欢迎使用VBˊ（C）Form1.Caption=欢迎使用VB （D）Form1.Caption=〞欢迎使用VB〞 7.VB提供了结构化程序设计的3种基本结构，这3种基本结构是( D ) （A）递归结构，选择结构，循环结构（B）选择结构，过程结构，顺序结构 （C）过程结构，输入、输出结构，转向结构（D）选择结构，循环结构，顺序结构 8.给变量赋值a=123+MID(“123456”,3,2)，a变量中的值是( D ) （A）“12334”（B）123 （C）12334 （D）157 9.下面If语句统计满足性别为男、职称为副教授以上、年龄小于40岁条件的人数，不正确的语句是( D ) （A）If sex=“男”And age＜40 And InStr(duty,“教授”)＞0 Then n=n+1 （B）If sex=“男”And age＜40 And (duty=“教授”Or duty=“副教授”) Then n=n+1 （C）If sex=“男”And age＜40 And Right(duty,2)= “教授” Then n=n+1 （D）If sex=“男”And age＜40 And duty=“教授”And duty=“副教授” Then n=n+1 10.若要清除列表框的所有内容，可用来实现的方法是( C )

VB题库程序填空

程序填空〖第1题〗『程序填空』(1分)(题号:59) '------------------------------------------------------- '【程序填空】 '------------------------------------------------------- ' 功能：输入一个数,若大于0,则显示"+"；若小于0， ' 则显示 "-"；若等于"0",则显示"零"。 '------------------------------------------------------- Private Sub Command1_Click( ) x = Val Select Case x '**********SPACE********** Case is > 0 = "+" Case Is < 0 '**********SPACE********** = "-" '**********SPACE********** Case is = = "零" End Select End Sub 答案： 1). Case Is > 0 2). = "-" 3). Case 0 或 Case Else 或 Case Is = 0 〖第2题〗『程序填空』(1分)(题号:60) '------------------------------------------------------- '【程序填空】 '------------------------------------------------------- '功能：输入任何一个英文字母x, ' 若x的值为"a","c","d-f" ,则显示x的大写字母； ' 若x的值为"m","o","p-z",则显示x的小写字母； ' 若x的值为其它的值,则显示xa（如输入的X的值是g，则显示ga）。 '------------------------------------------------------- Private Sub Command1_Click() x = '**********SPACE********** 【】 '**********SPACE********** Case 【】 = UCase(x) Case "m", "o", "p" To "z" = LCase(x) Case Else '**********SPACE********** 【】 End Select End Sub 答案： 1). Select Case x 2). "a", "c", "d" To "f" 3). = Trim(x) + "a" 或 = x + "a" 〖第3题〗『程序填空』

vb课后练习答案习题解答 (5)

第5章数组与记录 5．1 填空题 1．若要定义一个包含10个字符串元素，且下界为1的一维数组s，则数组说明语句为（）。 答案：Dim s(1 To 10) As String 2．若要定义一个元素为整型数据的二维数组a，且第一维的下标从0到5，第二维下标从-3到6，则数组说明语句为（）。 答案：Dim a(0 To 5,-3 To 6) As Integer 3．如果数组元素的下标值为实数，则VB系统会按（）进行处理。 答案：四舍五入原则 4．数组元素个数可以改变的数组称为（）；数组元素可以存放不同类型数据的数组称为（）。 答案：可调数组、可变类型数组 5．数组刷新语句用于（）。若被刷新的数组是数值数组，则把所有元素置（）；若被刷新的数组为字符串数组，则把所有元素置（）。 答案：清除指定数组内容、０、空字符串 10．控件数组是由一组类型和（）相同的控件组成，共享（）。 答案：名字、同一个事件过程 11．控件数组中的每一个控件都有唯一的下标，下标值由（）属性指定。 答案：Index 12．建立控件数组有两种方法：（）和（）。 答案：在设计阶段通过相同Name属性值来建立、在程序代码中使用Load方法 5．2 选择题 1．下列一维数组说明语句错误的是（）。 a) Dim b(100) AS Double b) Dim b(-5 To 0) AS Byte c) Dim b(-10 To –20) AS Integer d) Dim b(5 To 5) AS String 答案：c 2．若有数组说明语句为：Dim a(-3 To 8)，则数组a包含元素的个数是（）。 a) 5 b) 8 c) 11 d) 12 答案：d 3．设有数组说明语句：Dim c(1 To 10)，则下面表示数组c的元素选项中（）是错误的。 a) c(i-1) b) c(5+0.5) c) c(0) d) c(10) 答案：c 4.下列数组说明语句中正确的是（）。 a) Dim a(-1 To 5,8)AS String b) Dim a(n,n)AS Integer c) Dim a(0 To 8,5 To –1)AS Single d) Dim a(10,-10)AS Double

vb题库(选择与填空)

一、单选题（每小题1分，共99 分） 1. 假定Picture1 和Text1 分别为图片框和文本框的名称，下列语句中不正确的是______ 。 A Picture1.Print 25 B Text1.Print 25 C Print 25 D Debug.Print 25 2. 在Visual Basic 中要将一个窗体从内存中释放，应该使用以下语句中的______ 。 A UnLoad B Stop C Close D Hide 3. 如果组合框ComBo1中已有10项数据，应使用语句______将数据"Mydata"插入到第5项。 A ComBo1.Insert "Mydata", 4 B ComBo1.Insert "Mydata", 5 C ComBo1.AddItem "Mydata", 5 D ComBo1.AddItem "Mydata", 4 4. 如果列表框List1中已有10项数据，应使用语句______将数据"Mydata"插入到列表框的第3项。 A List1.Insert "Mydata", 3 B List1.AddItem "Mydata", 2 C List1.AddItem "Mydata" ,3 D List1.Insert "Mydata", 2 5. 语句If x=1 Then y=1，下列说法正确的是____________。 A x=1和y=1为赋值语句 B x=1为赋值语句，y=1为关系表达式 C x=1为关系表达式，y=1为赋值语句 D x=1和y=1均为关系表达式 6. 删除列表框中指定的项目所使用的方法为______ 。 A Move B Clear C Remove D RemoveItem 7. 不论何控件，共同具有的属性是______________。 A ForeColor B Name C Text

vb6.0练习题及答案

一、选择题 1．在设计应用程序时，可以查看到应用程序工程中的所有部分的窗口是（）。 A．窗体设计．代码C．属性D．工程资源管理器窗口>> 答案：d 2．窗体的Load事件的触发时机是（）。 A．用户单击窗体时B．窗体被加载时C．窗体显示之后D．窗口被卸载时>> 答案：ｂ 3．与传统的程序设计语言相比，Visual Basuc最突出的特点是（）。 A．结构化程序设计B．程序开发环境C．事件驱动编程机制D．程序调试技术 答案：C 4．VB6.0集成开发环境的主窗口不包括（）。 A．标题栏B．菜单栏C．状态栏D．工具栏 答案：c 5．如果对象的名称为Mytext，而且对象有一个属性Text，那么在代码中引用该属性的正确格式是（）。 A．Text.Mytext B．Mytext.text C．Mytext.（Text）D．Mytext*Text 答案：b 6．下列可以激活属性窗口的操作是（）。 A．用鼠标双击窗体的任何部位B．执行“工程”菜单中的“属性窗口”命令C．按Ctrl+F4 D．按F4键 答案：b d 7．假定已在窗体上画了多个控件，并有一个控件是活动的，为了在属性窗口中设置窗体的属性，预先应制造的操作是（）。 A．单击窗体上没有控件的地方B．单击任一个控件C．不执行任何操作D．双击窗体的标题栏 答案：a 8．如果在文本框中键入字符时，只显示某个字符，如星号（*），应设置文本框的（）属性。 A．Caption B．PasswordChar C．Text D．Char 答案：b 9．如果想让文本框中的内容在运行时不能编辑，需将文本框的（）属性设置为True。 A．Locked B．MultiLine C．TabStop D．Visible 答案：a 10．对于定时器（Timer）控件，设计其定时是否开启的属性是（）。 A．Index B．Tag C．Enabled D．Left 答案：c 11．要在窗体Form1内显示“myfrm”，使用的语句是（）。 A．Form.Caption=“myfrm”B．Form1.Caption=“myfrm”C．Form1.Print=“myfrm”D．Form.Print=“myfrm” 答案：ｂ 12．对象的性质和状态特性称为（）。 A．事件B．方法C．属性D．类 答案：c 13．下列正确的赋值语句是（）。 A．x+y=20 B．y=x+20 C．3x=y D．s=π*r*r

VB题库-填空练习题

填空题 第1题表达式 1 and 0的值 ______________________ 答案： False 第2题把"Visual Basic程序设计"添加到列表框 lstBooks____________________________ 答案： lstBooks.AddItem "Visual Basic 程序设计" 第3题 For k=35 to 0 step 3 next k 语句的循环次数是_______________________答案：0 第4题 Val("123.55ab456")的值是多少 _____________________________ 答案：123.55 第5题每隔定时器控件的Interval属性值时间间隔,单位为毫秒,定时器会触发一次 ________________________事件 答案：Timer 第6题表达式(-3) And 8 的值为 _______________________. 答案：True 第7题 Print "x=" & (2=4) 的结果为 ________________________. 答案： x=False 第8题要使同一类型控件组成一个控件数组,必须要求_______________________. 答案： Name 相同或名称相同 第9题循环语句FOR K=1 TO 10 STEP –1控制的循环次数为___________________. 答案： 0 第10题设a=2,b=3,c=4,d=5,则NOT a<=c OR 4*c=b^2 AND b<> a+c 的值为______________. 答案： False 第11题声明定长为10个字符变量Sstr的语句为______________________. 答案： Dim Sstr as String*10 或 Sstr as String*10 第12题在VB中,若要将字符串"12345"转换成数字值应使用的类型转换函数是 ____________. 答案： VAL 或 Cint 第13题在一条Dim语句中可以声明多个变量,如Dim strVar,intVar,sngVar As Integer, 则strVar、intVar与sngVar的数据类型分别是Variant、Variant和_____________________. 答案： Integer 第14题滚动条控件主要支持两个事件,它们是scroll和____________________事件. 答案： change 第15题所有控件都具有的共同属性是 ____________________属性. 答案： name 〖第16题〗Visual Basic为添加到窗体上的第一个图片框picture提供的默认对象名为 ______. 答案： Picture1 〖第17题〗A和B同为正整数或同为负整数的VB 表达式为________________. 答案： A=INT(A)★AND★ B=INT(B)★ AND ★ A*B>0 〖第18题〗变量min@表示_______________类型的变量. 答案：货币数据变量或货币 〖第19题〗表达式 32\7 MOD 3^2 的值是____________________. 答案： 4 〖第20题〗把整型数1赋给一个逻辑型变量,则逻辑变量的值为___________________. 答案： True 〖第21题〗求x与y之积除以z的余数的VB表达式为_________________________. 答案： x*y★Mod★z 〖第22题〗以图片框Pic1的中心位置为圆心,以700为半径在Pic1上画一个圆的方法是 ______ 答案： pic1.Circle (pic1.width/2,pic1.height/2),700 〖第23题〗要使一个按钮设为默认按钮,应把此按钮的_____________属性的值设为True. 答案： Default 〖第24题〗在VB中,若要使一个文本框(Text)中的内容在超过文本框的宽度时能够自动换行显示,应当将这个文本框的______________属性的值设置为True. 答案： MultiLine 〖第25题〗设置计时器控件只能触发 ____________________事件. 答案： timer 〖第26题〗VisualBasic6.0用于开发 ____________________环境下的应用程序. 答案： WINDOWS

vb练习题及答案.doc

vb 练习题及答案 【篇一：vb 习题(含答案)】 lass=txt>1 、vb 程序中，通常不会产生错误提示的是( )。（1 分） a、编译错误 b、逻辑错误 c、运行时错误 d、实时错误 2、在设计阶段，双击窗体上任一空白处，打开的窗口是( )。（1 分） a、工程资源管理器窗口 b、代码窗口 c、工具箱窗口 d、属性窗口 3、下列说法中，正确的说法是( )。（1 分） a、窗体名称和该窗体文件名必须一致 b、窗体名称和该窗体文件名 可以不相同 c、窗体名称和该窗体文件名不能使用汉字 d、窗体名称不能使用汉字、但该窗体文件名能使用汉字 4、visual basic 有完备的help 联机帮助功能，可以通过按下功能 键( )得到帮助。（ 1 分） a、f9 b 、f8 c、f1 d 、f5 5、以下( )控件可作为容器使用。（ 1 分） a、label b 、picturebox c、textbox d 、image 6、将窗体的boderstyle 属性设置为( )可使窗口不显示标题栏。（ 1 分） a、0 b 、1 c、2 d 、5 7、文本框没有( )属性（1 分） a、text b 、name c、caption d 、borderstyle 23、下列( )是不合法的常量。（ 1 分） a、100 b 、10e02 c、100.0 d 、10e0.5 24、下列对变量的定义中，定义x 为变体型变量的是( )。（1 分） a、dim x as double b 、dim x c、dim x! d 、x%=23

25、设有如下变量声明：dim testdate as date ，为变量testdate 正确赋值的表达方式是( )。（1 分） a、textdate=#1/1/2002# b 、testdate=#1/1/2002# c、textdate=date(1/1/2002) d 、 testdate=format(m/d/yy,1/1/2002) 26、在立即窗口中运行以下语句，a=beijing :b=shanghai :print a,b 对其输出结果的描述中，正确的是( )。（1 分） a、beijing 和shanghai 中间没有空格 b、beijing 和shanghai 中 间有1 个空格 c、beijing 和shanghai 中间有 6 个空格 d、beijing 和shanghai 前面有7 个空格 27、语句段a=3: b=5:t=a ：a=b: b=t 执行后( )。（1 分） a、a 值为3，b 值为3 b 、a 值为3，b 值为5 c、a 值为5，b 值为5 d 、a 值为5，b 值为3 28、下列语句中，正确的是( )。（1 分） a、if x3*y and xy then y=x^3 b 、if x3*y and xy then y=3x c、if x3*y : xy then y=x^3 d 、if x3*y and xy then y=x**3 29、下面程序段dim x%: x=5: if x then y=x+1 else y=x 运行后， y 结果是( )。（1 分） a、5 b 、6 c、1 d 、显示出错信息 30、执行语句 a = inputbox(today, tomorrow, yesterday, 5, 5) ， 将显示一个输入对话框，在对话框的输入区中显示的信息是( )。（1 分） a、today b 、tomorrow c、yesterday d 、5 31、窗体上有一个命令按钮command1, 编写如下事件过 程: private sub command1_click() :x = val(inputbox(x=)) : y = inputbox(y=) : print x + y : end sub, 单击命令按钮，先后在两个输 入对话框中输入123 和321 ，窗体显示的内容是( )。（1 分） a、444 b 、123321 c、123+321 d 、出错信息 32、执行语句msgbox aaa, 2, bbb 后，所产生的消息框的标题是 ( )。（1 分） a、aaa b 、bbb

程序设计语言VB单项选择题及答案

《程序设计语言VB》单选题 1. Visual Basic是一种面向（）的程序设计语言。 A. 用户 B. 事件 C. 程序 D. 对象 2.在Visual Basic6.0中规定工程文件的扩展名是（）。 A. vbp B. for C. frm D. bas 3. Visual Basic6.0中规定窗体文件的扩展名是（）。 A. for B. frm C. vbp D. bas 4.如何使一个标签或按钮控件在运行时不可用（）。 A. 把它的Visible属性设置成False B. 把它的Visible属性设置成True C. 把它的Enabled属性设置成False D. 把它的Enabled属性设置成True 5.控件的字体可在属性窗口的（）属性中调整？ A. Font B. Color C. Text D. Caption 6.若要将某命令按钮设置为默认命令按钮。则应设置为True的属性是（）。 A. Value B. Cancel C. Default D. Enabled 7.在VB中，记录对象数据的是（）。 A. 方法 B. 事件 C. 属性 D. 语句

8.在文本框上显示文本的属性是（）。 A. Value B. Text C. Print D. Enabled 9. InputBox函数返回值的类型为（）。 A. 字符串 B. 数值 C. 变体 D. 数值或字符串（视输入的数据而定） 10.设有语句：a = InputBox("请输入数值:","输入示例", "100") 程序执行后,若从键盘上输入数值20并按回车键,则变量a的值是（）。 A. 字符串"20" B. 字符串"120" C. 默认值100 D. 数值120 11.下列控件中可用于接受用户输入文本，又可用于显示文本的是（）。 A. Label控件 B. TextBox控件 C. Timer控件 D. CommandButton控件 12.语句PRINT "25*4"的输出结果是（）。 A. 25*4 B. "100" C. 100 D. 出现错误信息 13.只能用来显示字符信息的控件是（）。 A. 文本框 B. 标签框 C. 图片框 D. 图像框 14.下列可作为Visual Basic变量名的是（）。 A. A%A B. 4A C. ?xy D. Stemp 15.下列哪个符号不能作为VB中的变量名（）。 A. timefly B. pass4

VB期末复习题库Visual Basic(填空题)

VB期末复习题库Visual Basic（填空题） 1 假定当前日期为2002年7月12日，星期六，则执行语句Print day(now)后，输出结果是______（提示：不能出现符号#）。12 2 语句a%=3.14156:Print a%的输出结果是______。 3 3 "以下循环的执行次数是_____。 K=0 Do While k<=10 k=k+1 Loop" 11 4 Fix(5.8)的值是_______。 5 5 "下列程序段的执行后输出的结果为_____。 I=4:A=5 Do I=I+1:A=A+2 Loop Until I>=7 Print ""A="";A" A=11 6 表达式3/6*5的值是_______。 2.5 7 "下列程序的作用是将三个数按从大到小进行排序，请补充完该程序。 If a

vb试题及答案

VB试卷 一、单项选择题(每题2分,共40分) 1. 窗体的标题栏显示内容由窗体对象的属性决定。 A) BackColor B)BackStyle C)Text D)Caption 2. 窗体的示意图标可用属性来设置。 A) Picture B) Image C) Icon D) MouseIcon 3. 窗体的控制菜单的有无由窗体对象的属性决定。 A) ControlBox B) MinButton C) MaxButton D) BorderStyle 4. 若要取消窗体的最大化功能，则可设置属性为False来实现。 A) ControlBox B) MinButton C) MaxButton D) Enabled 5. 以下4个选项，不属于VB的工作模式。 A) 编译 B) 设计 C) 运行 D) 中断 6. 窗体的边框样式由窗体对象的属性来设置。 A) BackStyle B) BorderStyle C) WindowState D) FillStyle 7. 若要以程序代码方式设置在窗体中显示文本的字体大小，则可用窗体对象的属性来实现。 A) FontName B) Font C) FontSize D) FontBold 8. 命令按钮的标题文字由属性来设置。 A) Text B) Caption C) Name D) (名称) 9. VB是面向对象的程序设计，以下4个选项，不属于面向对象的三要素。 A) 变量 B) 属性 C) 事件 D) 方法 10. 若要将某命令按钮设置为默认命令按钮，可设置属性为True来实现。 A) Value B) Cancel C) Default D) Enabled 11. 若要使命令按钮不可见，可设置属性为False来实现。 A) Value B) Enabled C) Visible D) Cancel 12. 运行程序时，系统自动执行窗体的事件。 A) load B) click C) unload D) GotFocus 13. 若要设置文本框最大可接收的字符数，可通过属性来实现。 A) MultiLine B) Length C) Max D) MaxLength 14. 若要使某命令按钮获得控制焦点，可使用方法来设置。 A) Refresh B) SetFocus C) GotFocus D) Value 15. 若要使命令钮可响应事件，可通过设置属性的取值来实现。 A) Visible B) Enabled C) Default D) Value 16. 在运行时，若要调用某命令按钮的Click事件过程，可设置该命令按钮对象的 属性为True来实现。 A) Enabled B) Value C) Default D) Cancel 17. 标签框的边框，由属性的设置值决定。

vb真题(选择题)

1、下列叙述中，错误的是( A )。（1分） A、一条语句可以分为多行书写，但要在上行末加上VBCrLf B、在同一行上书写多条语句，应在两两语句中加上:号 C、可以用Rem或'注释单行语句 D、VB程序代码不区分字母的大小写 2、下列叙述正确的是( D )。（1分） A、Visual Basic的事件是由用户定义的 B、Visual Basic程序从主窗体开始执行 C、Visual Basic程序是过程驱动的 D、保存一个Visual Basic程序，应分别保存其窗体模块、标准模块和工程文件 3、被对象所识别的动作与对象可执行的动作分别称为对象的( A )。（1分） A、方法、事件 B、事件、方法 C、事件、属性 D、过程、属性 4、下列关于VB编码规则的叙述中，正确的是( C )。（1分） A、一条语句可以分为多行书写 B、多条语句不能书写在同一行上 C、每条语句以分号;结尾 D、应用程序代码字母是区分大小写的 5、( D )不属于面向对象系统的三要素。（1分） A、事件 B、属性 C、方法 D、变量 6、下列叙述中，不正确的叙述是( C )。（1分） A、注释语句是非执行语句，仅对程序的有关内容起注释作用，客观存在不被解释和编译 B、注释语句能放在整个代码程序的最后 C、注释语句可以放在代码中的任何位置 D、代码中加入注释语句的目的是提高程序的可读性 7、下列叙述错误的是( B )。（1分） A、不允许使用行号与标号 B、单条语句可分行书写 C、同一行上可以书写多条语句 D、VB代码不区分字母的大小写 8、窗体设计器是用来设计( B )。（1分） A、应用程序的代码段 B、应用程序的界面 C、对象的属性 D、对象的事件 9、启动Visual Basic后，系统为用户新建的工程起一个名为( A )的临时名称。（1分） A、工程1 B、窗体1 C、工程 D、窗体 10、在界面设计时，双击窗体中的对象后，Visual Basic将显示的窗口是( C )。（1分） A、立即窗口 B、属性窗口 C、代码窗口 D、工程资源管理器窗口 11、VB应用程序在( A )模式下不能编辑代码和设计界面。（1分） A、运行 B、中断 C、设计 D、以上均不能 12、如果要向工具箱中加入控件的部件，可以利用“工程”菜单中的( B )命令（1分） A、引用 B、部件 C、工程属性 D、加窗体 13、如果Visual Basic环境中缺少某个窗口，一般应该从主菜单的( D )下拉菜单中寻找并打开。（1分） A、编辑 B、文件 C、调试 D、视图 14、标准控件不包括( D )控件。（1分） A、驱动器列表框 B、目录列表框 C、文件列表框 D、通用对话框 15、在设计窗体时，如果窗体上没有显示网格会感到不方便，( c )可以使网格出现。（1分） A、使用“编辑”菜单上的相关命令 B、使用“格式”菜单上的相关命令 C、使用“工具”菜单上的相关命令 D、使用“工程”菜单上的相关命令 16、在Visual Basic中，某一事件对应的程序叫( b )。（1分）

vb题库及答案

| 最新VB题库及答案 一、选择题 第1部分 1、在窗体（名称为Form1）上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写一个事件过程。程序运行后，如果在文本框中输入一个字符，则把命令按钮的标题设置为“计算机等级考试”。以下能实现上述操作的事件过程是 A、Private Sub Text1_Change() = "计算机等级考试" End Sub ] B、Private Sub Command1_Click() Caption = "计算机等级考试" End Sub C、Private Sub Form_Click() = "计算机等级考试" End Sub D、Private Sub Command1_Click() = "计算机等级考试" { End Sub 2、在一行内写多条语句时，每个语句之间用（）符号分隔。 A、 , B、： C、. D、； 3、下面（）是合法的变量名。 A、X_YZ B、123ABC C、INTEGER D、X-Y ] 4、下面（）是合法的字符常量。 A、 ABC$ B、“ABC” C、‘ABC’ D、 ABC 5、表达式16/4 - 2^5*8 MOD 5\2的值为（）。 A、14 B、 4 C、20 D、2 6、设a=”MicrosoftVisualBasic”，则以下使变量的b值为”VisualBasic”的语句是 A、b=Left(a,10) B、b=Mid(a,10) — C、b=Right(a,10) D、b=Mid(a,11,10) 7、设a="a"，b="b"，c="c"，d="d"，执行语句x = IIf((a < b) Or (c > d), "A",

VB程序填空复习题

二级VB程序设计练习 程序填空 1．下面程序按每行10个数打印出30个介于-300到300间无重复的随机整数，并显示其中的最小值。数组b(30)存放所产生的无重复的随机整数，运行结果如图所示。 Private Sub Command1_Click() Dim b(30), j As Integer, k As Integer Dim y As Integer, x As Single, min As Integer For j = 1 To 30 lb: x = Rnd If x > 0.5 Then y = 1 Else y = -1 b(j) = y * Int(Rnd*301) k = 1 Do While k

If b(j) = b(k) Then Goto lb k = k + 1 Loop Print b(j); If j Mod 10=0 Then Print Next j min = b(1) For j = 1 To 30 If b(j) < min Then min=b(j) Next j Print min End Sub 2．下面程序用于对9位的准考证号进行校验。参数mno存放准考证号，mjy存放产生的校验位，tag判断校验正确否，若校验正确tag置1，否则为0。产生校验位的算法为：取准考证号右边的8位之和关于9的模作为校验值，准考证号最左边的一位为校验位。 Public Sub foe(ByVal mno As String, mjy As Integer, Tag As Integer) Dim msum As Integer, m As String msum = 0 for j=2 to 9

vb试题及答案

一、选择题（1-30 题每小题1分，共30分，31-45题每小题2分,共30分，总计60分）要使窗体Form1的标题栏中显示“正在复制文件…”，正确的语句是：a A．Form1.Caption=“正在复制文件…” B．Form1.Title=“正在复制文件…” C．Form1.Text=“正在复制文件…” D．Form1.名称=“正在复制文件…” 如果要求设置定时器时间间隔为1秒钟，那么它的Interval属性值应该等于：a A．1000 B．100 C．10 D．1 3、下列关于控件的基本操作中，错误的是 A)当控件处于活动状态时，可以对控件进行缩放 B) 在设计阶段不能移动控件 C) Visual Basic 6.0 允许对画好的控件进行复制和删除 D) 可以通过属性窗口改变控件的位置和大小 4、用Visual Basic 开发应用程序的一般步骤有：①设置窗体和控件的属性、②编写代码、③建立用户界面，其中正确的顺序是： A) ①②③B) ①③②C) ③②①D) ③①② 5、为使文本框只能显示不能输入，即只读，应设置文本框的属性是：c A．MaxLength设置为0 B．Cancel设置为True C．Locked设置为True D．Read设置为True 6、InputBox函数返回值的类型为。B A．数值B．字符串C．变体 D．数值或字符串（视输入的数据而定） 7、为了把焦点移到某个指定的控件，所使用的方法是：A A．SetFocus B．Visible C．ReFresh D．GetFocus 8、函数String(3,”str”)的功能是：b A．把数值型数据转换成字符串 B．返回有3个字符串组成的字符串 C．从字符串中第3个字符 D．从字符串中第3个字符的位置开始取字符串 9、双击窗体中的对象后，Visual Basic将显示的窗口是：c A．项目（工程）窗口B．工具箱C．代码窗口D．属性窗口 10、用于获得字符串s最左边4个字符的函数是：a A．Left(s,4) B．Left(1,4) C．LeftStr(s) D．LeftStr(3,4) 11、以下程序段的输出结果是：d a=Sqr(3) b=Sqr(2) c=a>b Print c A．-1 B．0 C．False D．True 12、用下面语句定义的数组的元素个数是：c Dim A (-4 to 6) As Integer A．6 B．7 C．11 D．9

vb考试题填空题

1假定当前日期为2002年7月12日，星期六，则执行语句Print day(now)后，输出结果是______（提示：不能出现符号#）。 2语句a%=3.14156:Print a%的输出结果是______。 3以下循环的执行次数是_____。 K=0 Do While k<=10 k=k+1 Loop 4 Fix(5.8)的值是_______。 5下列程序段的执行后输出的结果为_____。 I=4:A=5 Do I=I+1:A=A+2 Loop Until I>=7 Print "A=";A 6表达式3/6*5的值是_______。 7下列程序的作用是将三个数按从大到小进行排序，请补充完该程序。 If a

Print a,b,c 8在Select case 结构中应至少包含一个______子句。 9窗体的属性可在属性窗口中设置，也可在程序中用______语句动态设置。 10有如下Sub过程: Sub ind(a As Integer) Static x As Integer x = x+a Print x; End Sub 以下是调用它的事件过程，程序运行后，单击命令按钮Command1，输出结果为______。 Private Sub Command1_Click() Ind(2) End Sub 11逻辑常量值为TRUE或_______。 12货币类型的数据小数点的位置是固定的，精确到小数点后_____位。 13表达式（2+8*3）/2的值是______。 14以下程序用来判断一个整数X是否为偶数，并将其中的偶数在窗体上显示，请补充完该程序。 If X___2=____ Then Print X 15当对窗体中的对象进行_____操作时，Visual Basic 就会显示该对象的代码窗口。 16下列程序的执行结果是____。 T = O : m = 1 : Sum = 0 Do t = t + m : Sum = Sum + t : m = m + 2 Loop While m <= 9 Print Sum 17一组具有相同名称，不同下标的下标变量称为______。 18给定年份，下列程序用来判断该年是否闰年，请补充完该程序。

vb练习题及答案

vb练习题1 VB练习题一 一、选择题 1．Visual Basic程序设计的主要的步骤是C A、可视性程序设计 B、代码程序设计 C、可视性程序设计和代码程序设计 D、界面设计 2．窗体能响应的事件是C A、ActiveFrom B、Drive C、Load D、Change 3．获得系统时间的函数是B A、data$ B. time$ C. date$ D. gettime$ 4．在设计一个计算器时，必须要使用的控件是C A、滚动条 B、图片框 C、文本框 D、单选框 5．下列运算符号中属于关系运算符的是_____。B A、— B、= C、AND D、+ 6.Visual Basic规定工程文件的扩展名是C A、.for B、.frm C、.vbp D、.bas 7. OOP是面向_______的程序设计的简称。C A、用户 B、问题 C、对象 D、操作者 8. 设置对象中的字体应用___属性.C A、Caption B、Name C、Font D、Text 9.设置文本框中显示的内容应用___属性。D A、Caption B、Name C、Font D、Text 10.逻辑型又称_____。C A、数值型 B、字符串型 C、布尔型 D、整型 11.三种逻辑运算符号优先次序为：____。C A、AND、NOT、OR B、NOT、OR、AND C、NOT、AN D、OR D、OR、NOT、AND 12.关于高级语言，下列那一项叙述是正确的。(A) A、以类似英文的句子来表示 B、写成的程序执行速度最快 C、不必编译即可直接执行 D、受电脑机种限制大 13.可将高级语言翻译成机器语言的程序为。B A、汇编程序 B、编译程序 C、解释程序 4、以上皆可。