做出题的大侠本人赠送三百分

lanwairen 2003-01-07 08:21:14
一、填空、选择、判断等题
1. VB6.0有哪三种不同的版本?
2. Windows操作系统给每个窗口分配一个独立的标志号也称为什么?
3. VB设计的应用程序是什么驱动的?
4. 命令按钮和文本框起名时应以什么开头?
5. 在VB中,最主要的两种对象是什么?
6. 什么是用来创建对象的样板?
7. 窗体的大小由___属性和____属性控制?
8. 对象的属性既可以设计时设置,也可以在_____时设置。
9. 通常VB窗体在整个存活期中有4种状态,分别是?
10. ____事件标志着加载状态的开始?
11. 要使一个窗体可见,应调用____方法?
12. 如果要隐藏一个窗体,应调用窗体的____方法?
13. ______和________事件是窗体在可见状态下两个十分重要的事件
14. 窗体在卸载前最后发生_____事件
15. 要使窗体在关闭之间询问是否要真的关闭,应加什么代码,加在什么事件中?
16. 用什么方法结束程序。
17. 字节型、日期型、整型、布尔型所占字节数分别为多少?
18. 常量与变量的区别?
19. 变量的第一个必须是_____,在同一范围内,变量名必须是______。
20. 变量可以显示声明,也可以______声明。
21. 变量的作用范围主要有三种,分别是什么?
22. 类型转换函数Cint,Cbool,Cdbl的意思?
23. 数组有固定大小的数组和______的数组。
24. 定义可变数组的步骤是?
25. VB中有三种不同的模块,分别为?,窗体模块、标准模块的扩展名是什么?
26. VB中有三种过程,分别为?
27. 子过程和函数过程的区别?
28. VB注释的方法是在注释语句前加一个_____.
29. 程序续行符是什么,一行写多个语句时应在各语句间加什么?
30.10/4=____,10\4=_____,2^2^2=_____,10 mod 3=____
31.VB中两个连接符都是什么,它们的区别?
32.and,or,not,xor的用法?
33.内部函数int,日期函数:Date,Now,Time,Year,字符串操作函数strcomp,space(n),string(m,’a’)的意义?
二、改错题
1. Dim I as integer
I=1
Do I<10
I=I+1
Loop
2. For I=10,15 step 2
Print I
Next I
3. property set pen(p as object)
currentpen=p
end property
4. dim I,j as integer
j=345
for I=1 to 658
if I=j then exit for
end if
next

三、程序结果题
1.
一个窗体的代码窗口中有如下代码,运行程序之后窗体上的内容为:
public a as integer,b as integer,c as integer
private sub form_activate()
a=5:b=3
print tab(15);”a”;tab(25);”b”;tab(35);”c=a*b”
print “调用prod前”;tab(14);a;tab(24);b;tab(34);c
call prod
print “调用prod后”;tab(14);a;tab(24);b;tab(34);c
print
print tab(15);”a”;tab(25);”b”;tab(35);”c=a+b”
print “调用sub前”;tab(14);a;tab(24);b;tab(34);c
call sum
print “调用sum后”;tab(14);a;tab(24);b;tab(34);c
end sub
sub prod()
c=a*b
print “prod 子程序”;tab(14);a;tab(24);b;tab(34);c
end sub
sub sum()
c=a+b
print “prod 子程序”;tab(14);a;tab(24);b;tab(34);c
end sub
2.sub beepsound(n as integer)
dim I as integer,j as long
for I=1 to n
beep
for j=0 to 1000000
next
end sub
以上过程的功能是什么?
3.private sub form_click()
static index as integer
index=index+1
if index=1 then
form1.caption=”翰墨功名里”
elseif index=2 then
form1.caption=”江山富贵人”
elseif index=3 then
form1.caption=”倏看双鸟下”
elseif index=4 then
form1.caption=”已负百年身”
index=0
else
index=0
end if
end sub
在一个窗体的代码窗口中有以上代码,运行程序后随着点击窗体的标题有什么变化?
四、编程题
1.设计窗体,并编写代码,做到当输入的用户名和密码正确时,输出“合法用户!”的对话框,否则输出”非法用户!”的对话框。
2.要使一个主窗体退出时,使其他所有子窗体退出,应在窗体的Unload事件中加什么代码?

...全文
5 点赞 收藏 1
写回复
1 条回复
切换为时间正序
请发表友善的回复…
发表回复
liangfang 2003-01-07
只答一部份有分吗?
————————————————————————————————
一、填空、选择、判断等题
1. VB6.0有哪三种不同的版本?
学习版,专业版,企业版
2. Windows操作系统给每个窗口分配一个独立的标志号也称为什么?
窗口句柄
3. VB设计的应用程序是什么驱动的?

4. 命令按钮和文本框起名时应以什么开头?
命令按钮(cmd) 文本框(txt)
5. 在VB中,最主要的两种对象是什么?

6. 什么是用来创建对象的样板?
类模板
7. 窗体的大小由___属性和____属性控制?
Height Width
8. 对象的属性既可以设计时设置,也可以在_____时设置。
运行时
9. 通常VB窗体在整个存活期中有4种状态,分别是?
1,创建,但不加载。2,加载,但不显示。3,显示。4,内存和资源完全收回
10. ____事件标志着加载状态的开始?
Load
11. 要使一个窗体可见,应调用____方法?
Show
12. 如果要隐藏一个窗体,应调用窗体的____方法?
Hide
13. ______和________事件是窗体在可见状态下两个十分重要的事件
LostFocus GotFocus
14. 窗体在卸载前最后发生_____事件
QueryUnload
15. 要使窗体在关闭之间询问是否要真的关闭,应加什么代码,加在什么事件中?
Form_Unload(Cancel As Integer)
如果 cancel 为 0,则窗体被删除。将 cancel 设置为任何一个非零的值可防止窗体被删除。
16. 用什么方法结束程序。
end
17. 字节型、日期型、整型、布尔型所占字节数分别为多少?
1 个字节,8 个字节,2 个字节,2 个字节
18. 常量与变量的区别?
是否可重新赋值
19. 变量的第一个必须是_____,在同一范围内,变量名必须是______。

20. 变量可以显示声明,也可以______声明。

21. 变量的作用范围主要有三种,分别是什么?
全局 模块级 本地到过程
22. 类型转换函数Cint,Cbool,Cdbl的意思?
Cint →Integer Cbool →Boolean CDbl →Double
23. 数组有固定大小的数组和______的数组。

24. 定义可变数组的步骤是?

25. VB中有三种不同的模块,分别为?,窗体模块、标准模块的扩展名是什么?

26. VB中有三种过程,分别为?

27. 子过程和函数过程的区别?

28. VB注释的方法是在注释语句前加一个_____.
Rem 或 '
29. 程序续行符是什么,一行写多个语句时应在各语句间加什么?
" : "
30.10/4=____,10\4=_____,2^2^2=_____,10 mod 3=____
2.4, 0.4, 16 , 1
31.VB中两个连接符都是什么,它们的区别?

32.and,or,not,xor的用法?
用来对两个表达式进行逻辑连接;用来对两个表达式进行逻辑析取运算。用来对表达式进行逻辑否定运算。用来对两个表达式进行逻辑互斥或运算。
33.内部函数int,日期函数:Date,Now,Time,Year,字符串操作函数strcomp,space(n),string(m,’a’)的意义?

二、改错题
1. Dim I as integer
I=1
Do I<10
I=I+1
Loop
I<10 错了 →I>10
2. For I=10,15 step 2
Print I
Next I
For I=10,15 step 2→少了"To"
3. property set pen(p as object)
currentpen=p
end property

4. dim I,j as integer
j=345
for I=1 to 658
if I=j then exit for
end if
next
多了 end if

三、程序结果题
1.
一个窗体的代码窗口中有如下代码,运行程序之后窗体上的内容为:
public a as integer,b as integer,c as integer
private sub form_activate()
a=5:b=3
print tab(15);”a”;tab(25);”b”;tab(35);”c=a*b”
print “调用prod前”;tab(14);a;tab(24);b;tab(34);c
call prod
print “调用prod后”;tab(14);a;tab(24);b;tab(34);c
print
print tab(15);”a”;tab(25);”b”;tab(35);”c=a+b”
print “调用sub前”;tab(14);a;tab(24);b;tab(34);c
call sum
print “调用sum后”;tab(14);a;tab(24);b;tab(34);c
end sub
sub prod()
c=a*b
print “prod 子程序”;tab(14);a;tab(24);b;tab(34);c
end sub
sub sum()
c=a+b
print “prod 子程序”;tab(14);a;tab(24);b;tab(34);c
end sub

2.sub beepsound(n as integer)
dim I as integer,j as long
for I=1 to n
beep
for j=0 to 1000000
next
end sub

以上过程的功能是什么?
3.private sub form_click()
static index as integer
index=index+1
if index=1 then
form1.caption=”翰墨功名里”
elseif index=2 then
form1.caption=”江山富贵人”
elseif index=3 then
form1.caption=”倏看双鸟下”
elseif index=4 then
form1.caption=”已负百年身”
index=0
else
index=0
end if
end sub
在一个窗体的代码窗口中有以上代码,运行程序后随着点击窗体的标题有什么变化?
翰墨功名里 或 江山富贵人 或 倏看双鸟下 或 已负百年身


四、编程题
1.设计窗体,并编写代码,做到当输入的用户名和密码正确时,输出“合法用户!”的对话框,否则输出”非法用户!”的对话框。
Private Sub cmd进入_Click()

If txt户名.Text = "合法户名" And txt密码.Text = "合法密码" Then
MsgBox "合法用户"
Else
MsgBox "非法用户"
End If

End Sub
2.要使一个主窗体退出时,使其他所有子窗体退出,应在窗体的Unload事件中加什么代码?
End

回复
发动态
发帖子
VB基础类
创建于2007-09-28

7451

社区成员

VB 基础类
申请成为版主
社区公告
暂无公告