只答一部份有分吗？
————————————————————————————————
一、填空、选择、判断等题
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 sub2.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 IfEnd Sub
2.要使一个主窗体退出时，使其他所有子窗体退出，应在窗体的Unload事件中加什么代码？
End
————————————————————————————————
一、填空、选择、判断等题
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 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 sub2.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 IfEnd Sub
2.要使一个主窗体退出时，使其他所有子窗体退出，应在窗体的Unload事件中加什么代码？
End
解决方案 »
免费领取超大流量手机卡，每月29元包185G流量+100分钟通话, 中国电信官方发货