Question

VB填空，求答案

1． VB 的工作模式可分为三种：“_______”、“______”以及“_____”。
2． 由For k=35 to 0 step 3 循环语句控制的循环次数是 ；For k=-3.5 to 5.5 step -0.5 循环语句控制的循环次数是 .
3． 设x的初值为5，则由下列循环语句控制的循环次数是 。
Do While x>=5
x=x-1
Loop
在上程序中，若x的初值为-5，则循环次数为
4． sst=”ABC12DE”,则Val(sst)= 。
5． 为了在按下回车键时执行某个命令按钮的事件过程，需要把该命令按钮的一个属性设置为True，这个属性是 。
6． 为了把焦点移到某个文本框控件，所使用的方法是 。
7． 用下面语句定义的数组的元素个数是 。
　　Dim A (-5 To 5) As Integer
8． 设组合框Combo1中有3个项目，则删除第一项的语句是
9． 由For k=35 to 0 step 3 循环语句控制的循环次数是 ；For k=-3.5 to 5.5 step -0.5 循环语句控制的循环次数是 .
10． 设x的初值为5，则由下列循环语句控制的循环次数是 。
Do While x>=5
x=x-1
Loop
在上程序中，若x的初值为-5，则循环次数为
11． sst=”ABC12DE”,则Val(sst)= 。
12． 给变量a赋值为【30，100】范围的随机数的表达式为 。
13． 在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：
Private Sub Command1_Click()
Cls
For n = 1 To 20
If n Mod 3 <> 0 Then m = m + n \ 3
Next n
Print m，n
End Sub
程序运行后，如果单击命令按钮，则窗体上显示的内容是
14． 在窗体上面画一个命令按钮，然后编写如下事件过程：
　　Option Base 1
　　Private Sub Commandl_Click()
　　Dim a
　　a = Array(9,8,7,6)
　　j = 1
　　For i = 4 To Step -1
　　s = s + a(i)*j
　　j =j*10
　　Next i
　　Print s
　　End Sub
　　运行上面的程序，单击命令按钮，其输出结果是 。
15． 为了改变计时器控件的时间间隔，应该修改该控件的 [13] 属性。
16． 在窗体上画一个名称为Lable1的标签和一个名称为List1的列表框。程序运行后，在列表框中添加若干列表项。当双击列表框中的某个项目时，在标签Label1中显示所选中的项目，如图所示。请在 [14] 和 [15] 处填入适当的内容将程序补充完整。
　　Private Sub Form_load()
　　List1.AddItem”北京”
　　List1.AddItem”上海”
　　List1.AddItem”湖北”
　　End Sub
　　Private Sub [14] ()
　　Label1.Caption= [15]
　　End Sub
17． Visual Basic提供的对数据文件的三种访问方式为随机访问方式_____和二进制访问方式。
18． 　为了在运行时把d:\pic文件夹下的图形文件a.jpg装入图片框Picturel，所使用的语句为_______。

Answer 1

我就做几道题，哪有这个时间呀
1、设计、运行、中断
2、0；0
3、1；0
4、12
5、Default
就做5道题，呵呵

追问

做四个你还做错一道

Answer 2

天啊 好难啊

Answer 3

1． VB 的工作模式可分为三种：“设计”、“运行”以及“中断”。
2． 由For k=35 to 0 step 3 循环语句控制的循环次数是0；For k=-3.5 to 5.5 step -0.5 循环语句控制的循环次数是0 .
3． 设x的初值为5，则由下列循环语句控制的循环次数是1。
Do While x>=5
x=x-1
Loop
在上程序中，若x的初值为-5，则循环次数为0
4． sst=”ABC12DE”,则Val(sst)= 0 。
5． 为了在按下回车键时执行某个命令按钮的事件过程，需要把该命令按钮的一个属性设置为True，这个属性是Default。
6． 为了把焦点移到某个文本框控件，所使用的方法是SetFocus。
7． 用下面语句定义的数组的元素个数是11。
　　Dim A (-5 To 5) As Integer
8． 设组合框Combo1中有3个项目，则删除第一项的语句是Combo1.RemoveItem 0
9． 由For k=35 to 0 step 3 循环语句控制的循环次数是 0；For k=-3.5 to 5.5 step -0.5 循环语句控制的循环次数是0.
10． 设x的初值为5，则由下列循环语句控制的循环次数是1。
Do While x>=5
x=x-1
Loop
在上程序中，若x的初值为-5，则循环次数为 0
11． sst=”ABC12DE”,则Val(sst)=0。
12． 给变量a赋值为【30，100】范围的随机数的表达式为int(rnd()*71)+30。
13． 在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：
Private Sub Command1_Click()
Cls
For n = 1 To 20
If n Mod 3 <> 0 Then m = m + n \ 3
Next n
Print m，n
End Sub
程序运行后，如果单击命令按钮，则窗体上显示的内容是42 21
14． 在窗体上面画一个命令按钮，然后编写如下事件过程：
　　Option Base 1
　　Private Sub Commandl_Click()
　　Dim a
　　a = Array(9,8,7,6)
　　j = 1
　　For i = 4 To Step -1
　　s = s + a(i)*j
　　j =j*10
　　Next i
　　Print s
　　End Sub
　　运行上面的程序，单击命令按钮，其输出结果是9876。
15． 为了改变计时器控件的时间间隔，应该修改该控件的interval 属性。
16． 在窗体上画一个名称为Lable1的标签和一个名称为List1的列表框。程序运行后，在列表框中添加若干列表项。当双击列表框中的某个项目时，在标签Label1中显示所选中的项目，如图所示。请在 [14] 和 [15] 处填入适当的内容将程序补充完整。
　　Private Sub Form_load()
　　List1.AddItem”北京”
　　List1.AddItem”上海”
　　List1.AddItem”湖北”
　　End Sub
　　Private Sub List1_DblClick()
　　Label1.Caption= list1.text
　　End Sub
17． Visual Basic提供的对数据文件的三种访问方式为随机访问方式顺序访问方式和二进制访问方式。
18． 　为了在运行时把d:\pic文件夹下的图形文件a.jpg装入图片框Picturel，所使用的语句为Picture1.picture=loadpicture("d:\pic\a.jpg")。