02Visual Basic 语言基础.docx
- 文档编号:6517051
- 上传时间:2023-01-07
- 格式:DOCX
- 页数:18
- 大小:122.13KB
02Visual Basic 语言基础.docx
《02Visual Basic 语言基础.docx》由会员分享,可在线阅读,更多相关《02Visual Basic 语言基础.docx(18页珍藏版)》请在冰豆网上搜索。
02VisualBasic语言基础
VisualBasic语言基础
一、单选题
1.在一行内写多条语句时,每个语句之间用___B_____来分隔。
A), B):
C)、 D);
2.下面________是合法的变量名。
A)X_yx B)123abc C)integer D)X-Y
3.下面________是不合法的整常数。
A)100 B)&O100 C)&H100 D)%100
4.下面________是合法的字符常数。
A)ABC$ B)"ABC" C)'ABC' D)ABC
5.下面________是合法的单精度型变量。
A)num!
B)sum% C)xint$ D)mm#
6.下面________是不合法的单精度常数。
A)100!
B)100.0 C)1E+2 D)100.0D+2
7.表达式16/4-2^5*8/4MOD5\2的值为________。
=16/4-32*8/4Mod5\2
=16/4-256/4Mod5\2
=4-64Mod2
=4-0
=4
A)14 B)4 C)20 D)2
8.数学表达式3≤x<10在VB中的逻辑表达式为________。
A)3<=x<10 B)3<=xANDx<10
C)x>=3ORx<10 D)3<=xAND<10
9.与数学表达式ab/3cd对应,不正确的VB表达式为________。
A)a*b/(3*c*D) B)a/3*b/c/d
C)a*b/3/c/d D)a*b/3*c*d
10.RND函数不可能是下列________值。
A)1 B)0 C)0.123 D)0.00005
11.Int(198.55*100+0.5)/100的值为________。
=Int(19855.5)/100
=19855/100
=198.55
A)198 B)199.6 C)198.55 D)200
12.Int(198.555*100+0.5)/100的值为_______。
=Int(19855.5+0.5)/100
=Int(19856)/100
=19856/100
=198.56
A)198 B)199.6 C)198.56 D)200
13.PrintDateAdd("m",1,#1/30/2000#)语句显示的结果为________。
A)2000-2-29 B)2000-2-28 C)2000-2-30 D)2000-1-31
DateAdd函数返回已添加指定时间间隔的日期。
DateAdd(interval,number,date)
参数
interval必选项。
字符串表达式,表示要添加的时间间隔。
有关数值,请参阅“设置”部分。
number必选项。
数值表达式,表示要添加的时间间隔的个数。
数值表达式可以是正数(得到未来的日期)或负数(得到过去的日期)。
date必选项。
Variant或要添加interval的表示日期的文字。
设置
interval参数可以有以下值:
设置
描述
yyyy
年
q
季度
m
月
y
一年的日数
d
日
w
一周的日数
ww
周
h
小时
n
分钟
s
秒
说明
可用DateAdd函数从日期中添加或减去指定时间间隔。
例如可以使用DateAdd从当天算起30天以后的日期或从现在算起45分钟以后的时间。
要向date添加以“日”为单位的时间间隔,可以使用“一年的日数”(“y”)、“日”(“d”)或“一周的日数”(“w”)。
DateAdd函数不会返回无效日期。
如下示例将95年1月31日加上一个月:
NewDate=DateAdd("m",1,"31-Jan-95")
在这个示例中,DateAdd返回95年2月28日,而不是95年2月31日。
如果date为96年1月31日,则返回96年2月29日,这是因为1996是闰年。
如果计算的日期是在公元100年之前,则会产生错误。
14.表达式DateDiff("y",1,#12/30/1999#,#1/13/2000#)的结果为________。
A)1 B)11 C)14 D)99
DateDiff(I,D1,D2[,FW[,FY]])
计算两个日期之间的期间。
返回的是后一个时间减前一个时间的差值,整形数。
I:
设定两个日期之间的期间计算之单位。
譬如>I="m"表示计算的单位为月。
>I的设定值如:
yyyy>Year年
qQuarter季
mMonth月
dDay日
wWeekday星期
hHour时
nMinute分·[这里应该用n代表,很多书说m其实是错的]·
sSecond秒
D1,D2:
计算期间的两个日期表达式,若>date1较早,则两个日期之间的期间结果为正值;若>date2较早,则结果为负值。
FW:
设定每周第一天为星期几,若未设定表示为星期天。
>FW的设定值如下:
0使用>API的设定值。
1星期天
2星期一
3星期二
4星期三
5星期四
6星期五
7星期六
FY:
设定一年的第一周,若未设定则表示一月一日那一周为一年的第一周。
>FY的设定值如下:
0使用>API的设定值。
1一月一日那一周为一年的第一周
2至少包括四天的第一周为一年的第一周
3包括七天的第一周为一年的第一周
按小时的绝对值,24以内为0;
datediff(day,'2006-09-1816:
25:
03.563','2006-09-1909:
16:
02.360')运行结果为0;
15.表达式Len("123程序设计ABC")的值是________。
A)10 B)14 C)20 D)17
16.表达式LenB("123程序设计ABC")的值是________。
LenB()函数求字符串字节数,每个字符占2个字节,汉字也是如此。
A)10 B)14 C)20 D)17
17.下面正确的赋值语句是________。
A)x+y=30 B)y=pr*r应该为y=p*r*r
C)y=x+30 D)3y=x
18.为了给x,y,z三个变量赋初值1,下面正确的赋值语句是________。
A)x=1:
y=1:
z=1 B)x=1,y=1,z=1
C)x=y=z=1 D)xyz=1
解释见题1内容
19.赋值语句:
a=123+MID("123456",3,2)执行后,a变量的值是是________。
a=123+”34”=157,123是数值,所以“+”将“34”转化为数值再进行加法运算。
A)“1234” B)123 C)12334 D)157
20.赋值语句:
a=123&MID("123456",3,2)执行后,a变量的值是是________。
A)“12334” B)123 C)12334 D)157
A=123+”34”=157,123是数值,所以“&”将123转化为字符串再进行连接运算。
21.表达式12000+"123"&100的结果为________。
=12000+123&100=12123&100=12123100
A)12000123100 B)出错 C)12123100 D)12223
22.表达式String(3,"ABCDED")的值为________。
A)C B)"ABC" C)ABC D)"AAA"
String(3,"ABCDED")为重复取字符串"ABCDED"中的第一个字符的次数为3。
23.表达式InStr(3,"EFABCDEFG","EF")的值为________。
A)1 B)7 C)2 D)“EF”
InStr(3,"EFABCDEFG","EF")是从字符串"EFABCDEFG"中第3个位置开始查找字符串"EF"在它内的位置。
字符串"EFABCDEFG"中第3个位置后的"EF"位置为7。
24.以下合法的VisualBasic标识符是______。
A)ForLoop B)Const C)6abc D)b#x
25.VisualBasic中的数值可以用十六进制或八进制表示,十六进制数以&H开头,八进制数以______开头。
A)$O B)&O C)$E D)&E
26.设有如下声明:
DimXAsInteger
如果Sgn(X)的值为-1,则X的值是______。
A)整数 B)大于0的整数 C)等于0的整数 D)小于0的数
Sgn(X),x大于1,结果为1;x小于1,结果为-1;x=0,结果为0。
27.产生[5,46]之间随机整数VB表达式是______。
A)Int(Rnd
(1)*42)+6B)Int(Rnd
(1)*42)+5
C)Int(Rnd
(1))+41 D)Int(Rnd
(1)*41)+5
28.设a="VisualBasic",下面使b="Basic"的语句是_______。
A)b=Left$(a,8,5) B)b=Right$(a,5,5)
C)b=Mid$(a,8,5) D)b=InStr(a,8)
29.表达式Int(-17.8)+Sgn(17.8)的值是______。
-18+1=-17
A)18 B)-17 C)-18 D)-16
30.表达式Val(".123E2CD")的值是______。
E2表示0.123乘以10的2次方。
CD为无效字符,忽略了。
val表示把字符串转化为数值型,所以,输出12.3
A)123 B)0 C)12.3 D)123E2CD
31.设a=5,b=10,则执行c=int((b-A)*Rnd+A)+1后,c值的范围为______。
Rnd随机数最小值为0,c=int((10-5)*0+5)+1=6;Rnd随机数最大值为0.9,c=int((10-5)*0.9+5)+1=int((5)*0.9+5)+1=int(4.5+5)+1=9+1=10
A)5~10 B)6~9 C)6~10 D)5~9
32.设有如下变量声明
DimTestDateASDate
能为变量TestDate正确赋值的是______。
A)TestDate=#1/1/2007#
B)TestDate=#"1/1/2007"#
C)TestDate=date("1/1/2007")
D)Testdate=Format("m/d/yy","1/1/2007")
语句DimTestDateASDate将TestDate声明为日期型变量,故只能按日期型赋值。
33.在窗体中添加一个命令按钮,并编写如下程序:
PrivateSubCommand1_Click()
a%=2/32/3=>0.666667,结果为1
b%=32/932/9=>3.55555555,结果为4
Printa%,b%
EndSub
运行下列程序,输出结果为______。
A)0 4 B)0 3 C)1 3 D)1 4
奇进偶不进
要求取的有效数字的末一位的后一位数字小于等于四则舍,大于等于六则入,等于五则看其前一位,加1后为奇数则舍,为偶数则入。
VB6中文版说Round函数是四舍五入函数,实际上这个函数采用的四舍六入五留双。
VB的Round所采用的算法是这样的:
1.25留一位,则1.2=round(1.25)
如果是1.35,则1.4=round(1.35)
例如:
5.5、8.5,则会将小数转换成最接近的正偶整数(必定为双数)。
例如5.5取整数会得到6,8.5取整数会得到8。
34.以下关系表达式中,其值为False的是______。
A)"ABC">"AbC"
B)"the"<>"they"
C)"VISUAL"=UCase("Visual")
D)"Integer">"Int"
35.若N=365,下述的语句中______显示的值是33。
A)Printn-Int(n/100)*100
B)PrintInt(n/10)-Int(n/100)*10
C)PrintInt(n/10)-Int(n/100)
D)PrintInt(n-Int(n/10)*10)/10
36.表达式2*3^2+2*8/4+3^2的值为______。
=2*9+16/4+9
=18+4+9=31
A)64 B)31 C)49 D)22
37.表达式Str(Len("1234"))+Str(5.9)的值为______。
A)45.9 B)4 5.9 C)12345.9 D)1234 5.9
38.语句Print5/4*6\5Mod2的输出结果是______。
=(((5/4)*6)\5)Mod2
=(1.25*6)\5Mod2=7.7\5Mod2=1Mod2=1
A)0 B)1 C)2 D)3
39.表达式2+3*4^5+Sin(x+1)/2中最先进行的运算是______。
A)4^5 B)3*4 C)x+1 D)Sin()
括号内的优先级别最高
40.表达式A%*B&-D#\3.0+F!
的结果是______。
A)整型 B)长整型 C)单精度型 D)双精度型
类型符号#为双精度型
41.如果x是一个正实数,对x的第3位小数四舍五入的表达式是______。
A)0.01*Int(x+0.005) B)0.01*Int(100*(x+0.005))
C)0.01*Int(100*(x+0.05) D)0.01*Int(x+0.05)
42.表达式Int(8*Sqr(36*(10^(-2))*10+0.5))/10的值是______
=Int(8*(sqr(0.36*10+0.5))/10
=INt(8*sqr(4.1))/10
=Int(8*2.024)/10
=Int(16.192)/10=1.6
A)1 B)16C)1.6 D)0.16
43.若N=235,下述的语句中______显示的值为3。
A)PrintN-Int(N/100)*100
B)PrintInt(N/10)-Int(N/100)*10
C)PrintInt(N/10)-Int(N/100)
D)PrintInt(N-Int(N/10))/10
44.在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:
PrivateSubCommand1_Click()
a$="VisualBasic"
PrintString(3,a$)
EndSub
程序运行后,单击命令按钮,在窗体上显示的内容是______。
A)VVV B)Vis C)sic D)ll
45.函数String(n,"str")的功能是______。
A)把数值型数据转换为字符串
B)返回由n个字符组成的字符串
C)从字符串中取出n个字符
D)从字符串中第n个字符的位置开始取子字符串
46.以下程序段在立即窗口中输出______。
A="your"
B="sname"
C="iscr"
PrintRight(A,3)窗体上显示
Picture1.PrintMid(B,2,4)图片框内显示
Debug.PrintLeft(C,2)立即窗口中显示
A)name B)our C)is D)ournameis
47.设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)
48.设a=10,b=5,c=1,执行语句Printa>b>c后,窗体上显示的是______。
A)True B)False C)1 D)出错信息
这里>号是作为关系运算符使用的,你的a>b>c违反了基本的数学定义.你的算式可看作:
a大于(b>c)的结果或(a>b)的结果大于c。
这是无法比较的,所以Print语句报错,显示False。
49.设x=4,y=6,则以下不能在窗体上显示出"A=10"的语句是______。
A)PrintA=x+y B)Print"A=";x+y
C)Print "A="+Str(x+y) D)Print"A="&x十y
Print后使用””才能将引号内的内容按原样输出。
50.下面表达式中,______的运算结果与其他三个不同。
A)Exp(-3.5) B)Int(-3.5)+0.5
C)-Abs(-3.5) D)Sgn(-3.5)-2.5
Exp(n)表示e的n次幂
51.设a=5,b=4,c=3,d=2,下列表达式的值是_______
3>2*bOra=cAndb<>cOrc>d
=3>8Ora=cAndb<>cOrc>d
=falseOrfalseAndtrueOrtrue
=falseOrfalseOrtrue
=falseOrtrue
=true
A)1 B)True C)False D)2
52.设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)
53.假定有如下的窗体事件过程:
PrivateSubForm_Click()
a$="MicrosoftVisualBasic"
b$=Right(a$,5)
c=Mid(a$,1,9)
MsgBoxa$,34,b$
EndSub
MsgBox方法的第一个参数为提示信息,第二个参数为按钮类型,第三个参数为标题栏显示信息
程序运行后单击窗体,则在弹出的信息框中的标题
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 02Visual Basic 语言基础 02 Visual 语言 基础