赤峰学院vb模拟试题库含答案-本科论文.doc

模拟试题一
1．VB是一种面向对象的程序设计语言，（ ）不是面向对象系统所包含的三要素。 
Ａ.属性   Ｂ.变量   Ｃ.方法   Ｄ.事件 
2.不论何控件，共同具有的是( )属性。
A．Caption B.Text C. Name D.ForeColor
3. 程序代码如下：
Command1.Caption=”确定”，则Command1、Caption、“确定”分别代表（ ）  
A.属性、对象、值 Ｂ.对象、值、属性
C.对象、方法、属性　　 Ｄ.对象、属性、值
4.下面( )是不合法的整型常数。
A．278 B. &O278 C. &H278 D. 278％
5.为了给x、y、z三个变量赋初值1，下面正确的赋值语句是( )。
A．x=y=z=1 B．x=1，y＝1，z＝1
C．x=1：y＝1：z＝1 D．xyz=1
6.赋值语句：a=123+Mid(“123456”，3，2)执行后，变量a中的值是( )。
A．”12334” B．12334 C．157 D．123
7. 数学关系3≤x<10表示成正确的VB表达式为（　　）
Ａ、3<=x<10 　　 Ｂ、3<=x AND x<10　
　Ｃ、x>=3 OR x<10 　　Ｄ、3<=x AND <10
8.产生[10，37]之间的随机整数的VB表达式（　）
Ａ.Int(Rnd(1)*27)+10 　　Ｂ.Int(Rnd(1)*28)+10　
　Ｃ.Int(Rnd(1)*27)+11 　　Ｄ.Int(Rnd(1)*28)+11
9. 表达式16/4-2^5*8/4 MOD 5\2的值为（ ）。
A.20 B.14 C.4 D.2
10.对命令按钮的Picture属性装入.bmp图形文件后，命令按钮上并没有显示图形，原因是没有对（ ）属性设置为1。
A.MousePictrue B.Style
C.DownPicture D.DisabledPicture
11．下列对象中不能做为容器的控件是( )。
A．窗体 B． PictureBox控件
C．Image控件 D． Frame控件
12.下面程序段运行后，显示结果是( )。
Dim x
If x Then Print x Else Print x+1
A．0 B．1 C．－1 D．显示出错信息
13.循环语句For i= -3.5 To 5.5 Step -0.5的循环次数是( )。
A．20 B．19 C．18 D．0
14.如下数组声明语句Dim a(3，-2 to 2，5) As Long，则数组a包含元素的个数是( )。
A．120 B．75 C．60 D．13
15．决定组合框样式的属性是( )。
A．List B．Text C．Style D．Caption
16．滚动条的（　　）属性用于返回或设置滚动条的当前值。
Ａ.Ｖalue　　Ｂ.Max　　Ｃ.Min　　Ｄ.Data
17.下面子过程语句说明合法的是( )。
A．Function f1%(f1%) B．Function f1(ByVal n%)
C．Sub f1(Byval n%( )) D．Sub f1(n%) As Integer
18.在过程中定义的变量，若希望在离开该过程后，还能保存过程中局部变量的值，则应使用( )关键字的在过程中定义局部变量。
A．Static B．Public C．Private D．Dim
19.下列控件中没有Caption属性的是（ ）。
A．框架 B．单选按钮 C．列表框 D．复选框
20. 以下不属于键盘事件的是（　　）
A.KeyDown　　B. KeyUp　　C. Unload　　D. KeyPress
21.下列关于菜单的说法，错误的是( )。
A．每个菜单项都是一个控件，与其它控件一样也有自己的属性和事件
B．菜单项的快捷键不能任意设置
C．在程序运行时，如果菜单项的Enabled属性为False，则该菜单项编程灰色，不能被用户选择
D．除了Click事件之外，菜单项还能响应其它的事件，如DblClick
22.下列关于通用对话框的叙述中，错误的是( )。
A．通用对话框可以用来制作和显示“帮助”对话框
B．CommonDialog1.ShowFont显示“字体”对话框
C．在“打开”或“另存为”对话框中，用户选择的文件名可以经FileTitle属性返回
D．在“打开”或“另存为”对话框中，用户选择的文件名及其路径可以经FileName属性返回
23. 指令“Circle（1000，1000），500，，－6，－3”将绘制( )。
A．画圆 B．椭圆 C．扇形 D．圆弧
24．假如列表框（List1）有四个数据项，把数据项“数据库原理”添加到列表框的最后，应使用（ ）语句。
A．List1.AddItem “数据库原理”，List1.ListCount
B．List1.AddItem “数据库原理”，List1.ListCount-1
C．List1.AddItem 3，“数据库原理”
D．List1.AddItem “数据库原理”，3
25. VB提供了结构化程序设计的三种基本结构，三种基本结构是（ ）。
A．递归结构、选择结构、循环结构
B．选择结构、过程结构、顺序结构
C．过程结构、输入、输出结构、转向结构
D．选择结构、循环结构、顺序结构
26.在一个多窗体程序中，Form1是启动窗体，当程序运行后要想显示Form2窗体，正确的语句是( )。
A．Show Form2 B．Form2.show C．Load Form2 D．Form2.Load
27．要从磁盘上读入一个文件名为“c:\t1.txt”的顺序文件，下列（ ）正确。
A.f=”c:\t1.txt” B.f=”c:\t1.txt”
Open “f” For Input As #1 Open f For Input As #1
C.Open ”c:\t1.txt”For output As #1 D.Open c:\t1.txt For input As #1
28．假定有如下事件过程：
Private Sub Form_MouseDown(Button as Integer,Shift as Integer, X as Single,Y as Single)
If Button=2 Then PopupMenu PopForm
End Sub
则以下描述中错误的是（ ）。
　A.该过程的功能是弹出一个菜单
　B.popForm是在菜单编辑器中定义的弹出式菜单的名称
　C.参数X、Y指明鼠标的当前位置
　D.Button＝2表示按下的是鼠标左键
29.Print #1,Str1$中的Print是( ).
A．在窗台上显示的方法 B．文件的写语句
C．子程序明 D．以上均不是
30. 在窗体上画一个命令按钮，名称为Command1，然后编写如下事件过程：

程序运行后，如果单击命令按钮，则在窗体上显示的内容是（ ）。
　　A. 北京　　 B. 上海　 　C. 天津　　 D. 重庆

二、填空题（每空2分，共20分）
1．ＶＢ是一种面向对象的可视化程序设计语言，采取了_[ 1]_的编程机制。
2．算术表达式 |x+y|+35 写成VB表达式的形式为 [2 ] 。
3．使文本框可以获得焦点的方法是 [ 3 ] 。
4．表示x是5的倍数或是9的倍数的逻辑表达式为 [4] 。
5．Inputbox函数的返回值是 [5] 类型，Msgbox函数的返回值是 [6] 类型。
7.在调用自定义函数时，参数的传递有 [ 7 ] 和 [ 8 ] 两种形式。
7．在默认情况下，如下数组声明语句中 Dim s(4，4) As Integer，第二个数组元素的引用形式是 [9 ] 。
8．如果要每隔12s触发一个Timer事件，则Interval属性应设置为 [ 10] 。
三、写出下列程序的正确运行结果（每题5分，共10分）
1. Private Sub Command1_Click( )
x=Int(Rnd)+3
If x^2>8 Then y=x^2+1
If x^2=9 Then y=x^2-2
If x^2<8 Then y=x^3
Print “y=”;y
End Sub

2． Public Sub Swap(ByVal x As Integer, y As Integer)
Dim t As Integer
t=x: x=y: y=t
End Sub
Private Sub Command1_Click( )
Dim a As Integer ,b As Integer
a=30: b=20
Swap a ,b
Print “a=”; a ;”b=”; b
End Sub
四、程序设计题（10分）
求1+2+3+……+100累加和（单击窗体执行程序）。
答案
一、选择题（每题2分，共60分）
BCDBC CBBCB CBDAC ABACC DACAD BBDBC

二、填空题（每空2分，共20分）

【1】事件驱动 【2】Abs(x+y)+3^5 【3】SetFocus
【4】x mod 5=0 or x mod 9=0 【5】字符 【6】数值 【7】传值
【8】传址 【9】s (1,1) 【10】12000

三、写出程序的正确运行结果（每题5分，共10分）
1. y= 7
2. a=30 b=30

四、编程题（10分）
Private sub form_click()
Dim i%，s！ (2’)
S=0 (2’)
For i=1 to 100 (2’)
S=s+I (2’)
Next
Print “s=”;s (2’)
End Sub

模拟试题二
一、选择题（四个选择项中，有一个为正确答案。每题2分，共50分）
1．下列符号中哪个是VB程序中合法的变量名（ ）。
A、123abc B、integer C、X_yz D、X—Y
2．程序代码如下：
Text1.text=”Visual Basic”，则Text11、text、“Visual Basic”分别代表（ ）  
Ａ、对象、属性、值 Ｂ、对象、值、属性
Ｃ、对象、方法、属性　　 Ｄ、属性、对象、值 
3．文本框没有（ ）属性
A、Enabled B、Visible
C、BackColor D、Caption
4．下面( )是不合法的整型常数。
A．278 B. &O278 C. &H278 D. 278％
5．表达式16/4-2^5*8/4 MOD 5\2的值为（ ）。
A、20 B、14 C、4 D、2
6．下面正确的赋值语句是（ ）。
A、x+y=30 B、y=π*r*r   C、y=x+30 D、3y=x
7．用If语句表示分段函数
f(x)=
x+1
x>=1
X2+3
x<1

下列不正确的程序段是（ ）。
A、If x>=1 Then B、If x<1 Then
f=sqr(x+1) f=x*x+3
Else Else
f=x*x+3 f=sqr(x+1)
End If End If
C、If x>=1 Then f=sqr(x+1) D、If x>=1 Then f=sqr(x+1)
If x<1 Then f=x*x+3 f=x*x+3
8．循环语句For i= -3.5 To 5.5 Step -0.5的循环次数是( )。
A．20 B．19 C．18 D．0
9． 数学关系3≤x<10表示成正确的VB表达式为（　　）
Ａ、3<=x<10 　　 Ｂ、3<=x AND x<10　
　Ｃ、x>=3 OR x<10 　　Ｄ、3<=x AND <10
10．在数组声明语句Dim a(3，-2 to 2，5) As Long中，数组a包含元素的个数为（ ）。
Ａ、13　 Ｂ、60　 Ｃ、75　　 Ｄ、120
11．滚动条的（　　）属性用于返回或设置滚动条的当前值。
Ａ、Ｖalue　　Ｂ、Max　　Ｃ、Min　　Ｄ、Data
12．在过程中定义的变量，若希望在离开该过程后，还能保存过程中局部变量的值，则应使用（　　）关键字在过程中声明局部变量。
Ａ、Private　　Ｂ、Public　　Ｃ、Static　　Ｄ、Dim
13．假如列表框（List1）有四个数据项，把数据项“数据库原理”添加到列表框的最后，应使用（ ）语句。
A、List1.AddItem “数据库原理”，List1.ListCount
B、List1.AddItem “数据库原理”，List1.ListCount-1
C、List1.AddItem 3，“数据库原理”
D、List1.AddItem “数据库原理”，3
14．要从磁盘上读入一个文件名为“c:\t1.txt”的顺序文件，下列（ ）正确。
A、f=”c:\t1.txt” B、f=”c:\t1.txt”
Open “f” For Input As #1 Open f For Input As #1
C、Open ”c:\t1.txt”For output As #1 D、Open c:\t1.txt For input As #1
15．下列关于菜单的说法中，错误的是  ( )。
Ａ、每个菜单项都是一个控件，与其它控件一样也有自己的属性和事件。     
   Ｂ、菜单项的快捷键不能任意设置。
Ｃ、除了Click事件之外，菜单项还能响应DblClick事件。   
Ｄ、在程序执行时，如果菜单项的Enabled属性为False，则该菜单项变成灰色，不能被用户选择。 
16．指令Circle(1000,1000)，500，8，-6，-3将绘制（ ）。
A、圆弧 B、扇形 C、圆 D、椭圆
17．下列关于通用对话框的叙述中，错误的是( )。
A．通用对话框可以用来制作和显示“帮助”对话框
B．CommonDialog1.ShowFont显示“字体”对话框
C．在“打开”或“另存为”对话框中，用户选择的文件名可以经FileTitle属性返回
D．在“打开”或“另存为”对话框中，用户选择的文件名及其路径可以经FileName属性返回
18．对命令按钮的Picture属性装入.bmp图形文件后，命令按钮上并没有显示图形，原因是没有对（ ）属性设置为1。
A、MousePictrue B、Style C、DownPicture D、DisabledPicture
19．当用户对滚动条施以（ ）动作时，便触发了滚动条的Scroll事件
A、单击滚动条的左右按钮时 B、双击滚动条的左右按钮时
C、单击滚动条的空白处时 D、拖动滚动条的滑块时
20．要使Print方法在Form_Load事件中起作用，要对窗体的（ ）属性进行设置。
A、AutoRedraw B、Caption C、BackStyle D、Visible
21．下列关于键盘事件的说法中，正确的是( )。
A．按下键盘上的任意一个键都会触发KeyPress事件
B．大键盘上的“1”键和数字键盘的“1”键的KeyCode码相同
C．KeyDown和KeyUp的事件过程中都有KeyCode参数
D．KeyDown和KeyUp的事件过程中都有KeyAscii参数
22. 在一个多窗体程序中，Form1是启动窗体，当程序运行后要想显示Form2窗体，正确的语句是( )。
A．Show Form2 B．Form2.show C．Load Form2 D．Form2.Load
23. 决定组合框样式的属性是( )。
A．List B．Text C．Style D．Caption
24. 下列对象中不能做为容器的控件是( )。
A．窗体 B．Image控件 C．PictureBox控件 D． Frame控件
25. 下面子过程语句说明合法的是( )。
A．Function f1%(f1%) B．Function f1(ByVal n%)
C．Sub f1(Byval n%( )) D．Sub f1(n%) As Integer
二、填空题（每空1分，共20分）
1．ＶＢ是一种面向 [ 1 ] 的可视化程序设计语言，采取了_[ 2 ]_的编程机制。
2．算术表达式 |x+y|+35 写成VB表达式的形式为 [3 ] 。
3．使文本框可以获得焦点的方法是 [ 4 ] 。
4．Inputbox函数的返回值是 [5] 类型，Msgbox函数的返回值是 [6] 类型。
5．在调用自定义函数时，参数的传递有 [ 7 ] 和 [ 8 ] 两种形式。
6．在如下数组声明语句中 Dim s(4，4) As Integer，第一个数组元素的引用形式是 [9 ] 。
7．如果要每隔0.5 s触发一个Timer事件，则Interval属性应设置为 [ 10 ] 。
8．单选按钮和复选框都有Value属性，但二者该属性值的类型不一样，其中单选按钮该属性值类型为 [ 11 ] ，复选框该属性值类型为 [ 12 ] 。
9．要在程序中显示通用对话框，要对CommonDialog控件的 [ 13 ] 属性赋以正确的值。
10．VB提供了三种访问文件的模式，按照访问模式可以把文件分为顺序文件、 [ 14 ] 和二进制文件。
11．使用Line方法画矩形，必须在指令中使用关键字 [ 15 ] 。
12．窗体上有一命令按钮，程序运行时，决定该按钮是否可用应设置的属性是 [ 16 ] ，决定该按钮是否显示应设置的属性是 [ 17 ] 。
13．VB程序设计语言具有结构化程序设计的三种基本结构，即 [18 ]、 [19 ] 、
[20 ] 。
三、写出下列程序的正确运行结果（每题5分，共10分）
1. Private Sub Command1_Click( )
x=Int(Rnd)+3
If x^2>8 Then y=x^2+1
If x^2=9 Then y=x^2-2
If x^2<8 Then y=x^3
Print “y=”;y
End Sub
2. Public Sub Swap(ByVal x As Integer, y As Integer)
Dim t As Integer
t=x: x=y: y=t
End Sub
Private Sub Command1_Click( )
Dim a As Integer ,b As Integer
a=30: b=20
Swap a ,b
Print “a=”; a ;”b=”; b
End Sub
四、判断对错（对的画“√”，错的画“×”。每题1分，共10分）
1．若用户在键盘上按下一个键，则会触发Click事件。（ ）
2．窗体大小只能通过鼠标拖动窗体边框来设置。（ ）
3．在编写程序代码时，在同一行上可以书写多条语句，语句间用“：”分隔。（ ）
4．在For循环语句中，能强制退出循环的语句是End For。（ ）
5．声明数组时，数组的下标可以是变量。（ ）
6．窗体上的Timer控件不可以改变大小。（ ）
7．自定义函数过程开始的保留字是“Sub”。（ ）
8．列表框的List属性是一个字符型数组。（ ）
9．将数据写入顺序文件，通常有打开、写入、 关闭三个步骤。（ ）
10．PictureBox和Image两个控件都是容器类控件，可在其中存放其它控件。（ ）

五、程序设计题（10分）
1．编写事件代码，求1—100之间能被5整除或被7整除的数的累加和，要求单击窗体时执行事件代码，并在窗体上输出运行结果。
答案
一、选择题（四个选择项中，有一个为正确答案。每题2分，共50分）
CADBC CDBBD ACBBC BABDA CBCBB

二、填空题（每空1分，共20分）
[1] 对象 [2] 事件驱动 [3] Abs(x+y)+3^5 [4] SetFocus
[5] 字符型 [6] 数值(整型) [7] 传值 [8] 传址
[9] S(0，0) [10] 500ms [11] 逻辑型 [12] 数值型(整型)
[13] Action [14] 随机文件 [15] B [16] Enabled
[17] Visible [18] 顺序结构 [19] 选择结构 [20] 循环结构
三、写出下列程序的正确运行结果（每题5分，共10分）
1. y= 7
2. a= 30 b=30
四、判断对错（对的画“√”，错的画“×”。每题1分，共10分）
××√×× √×√√×

五、程序设计题（10分）
Private Sub Form_Click( )
Dim i%,s！
S=0
For i=1 to 100
If i mod 5=0 or i mod 7=0 then s=s+i
Next i
Print “s=”;s
End Sub

模拟试题三
一、 选择题（每题2分，计60分）
(1)下列可自动设置滚动条的控件是( )
A) 复选框 B) 框架 C) 文本框 D) 标签框
(2) 计时器控件的（　　）属性用于设置Timer事件发生的时间间隔。
A) Stretch　B) Interval　　C) Value　　D) Length
(3) 表达式（7\3+1）*(18\5-1)的值是（   ）
A) 6       B) 7.8             C) 8．76             D) 6.67
(4) 函数InStr(“VB程序设计教程”,”程序”)的值为（   ）
A)1          B)2               C)3            D)4
(5) 有程序代码如下：
Label1.caption=”程序设计”
则label1、caption、”程序设计”分别代表（）。
A) 对象、属性、值 B)对象、值、属性
C) 对象、方法、属性　　 D)属性、方法、值
(6) Inputbox函数返回值的类型是（）。
A) 整型数值 B) 字符串 C)变体 D)数值或字符串
(7) 设a=6，则执行 x=IIf(a>5,-1,0)后，x 的值为() 。  
A) 5  B) 6  C) 0  D) -1  
(8) 产生[60，100]之间的随机整数的Visual Basic表达式是（）。 
A) Int(Rnd*40)+60         B) Int(Rnd*40)+61
C) Int(Rnd*41)+60         D) Int(Rnd*41)+61
(9) 执行语句s=Len(Mid("VisualBasic",1,6))后，s的值是
A) Visual  B) Basic C) 6  D) 11
(10) 下面（）是合法的变量名。
A) dim       B) m-1     C) _123     D) X_t6
(11) 下面正确的赋值语句是（）。
A）x=y+3 B）x=y=3
C）x+y=3 D）3x=y
(12)VB提供了结构化程序设计的三种基本结构，三种基本结构是（）。
A）递归结构、选择结构、循环结构
B）选择结构、过程结构、顺序结构
C）过程结构、输入、输出结构、转向结构
D）选择结构、循环结构、顺序结构
(13) 确定一个控件在窗体上的位置的属性是（）。
A) Width和HeightB) Width或Height
C) Top和Left D) Top或Left
(14) 在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程
 Private Sub Command1_Click()
 Text1.Text = "Visual"
 Text1 = "Basic"
 Text1 = "Program"
End Sub
程序运行后，如果单击命令按钮，则在文本框中显示的是
A) 出错 B) Visual C) Basic  D) Program
(15) 在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程：
Private Sub Command1_Click()
 Dim array1(10, 10) As Integer
 Dim i As Integer, j As Integer
 For i = 1 To 3
 For j = 2 To 4
 array1(i, j) = i + j
 Next j
 Next i
 Text1.Text = array1(2, 3) + array1(3, 4)
End Sub
程序运行后，单击命令按钮，在文本框中显示的值是
A) 15 B) 14 C) 13 D) 12
(16) 设菜单中有一个菜单项为"Open"。若要为该菜单命令设计访问键，即按下Alt及字母O时，能够执行"Open"命令，则在菜单编辑器中设置“Open"命令的方式是
A) 把Caption属性设置为&Open B) 把Caption属性设置为O&pen
C) 把Name属性设置为&Open D) 把Name属性设置为O&pen
(17) 在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：
Private Sub Command1_Click()
x=InputBox("Input")
Select Case x
Case 1,3
Print "分支 1"
Case 2,4
Print "分支 2"
Case Else
Print "Else 分支 "
End Select
End Sub
程序运行后，如果在输入对话框中输入2，则窗体上显示的是（）。
A） 分支1    B） 分支2     C） Else分支    D) 程序出错
(18) for k=13 to -5 step -2循环次数为：（）。
A) 7 B) 8 C) 9 D) 10
(19)用下面语句定义的数组的元素个数是( )
Dim a(3,1 To 5) As Integer
A)8 B)15 C)20 D)21
(20) 在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：
Private Sub Command1_Click()
a$="Program"
Print String(3,a$)
End Sub
程序运行后，单击命令按钮，在窗体上显示的内容是
A）Pro 　B) ram 　C) gra 　D) PPP
(21) 保存一个工程至少应保存两个文件，这两个文件分别是（ ）
A)文本文件和工程文件 B)窗体文件和工程文件
C)窗体文件和标准模块文件 D)类模块文件和工程文件
(22) 下列表达式的值为2123的是（ ）
A) Val("123asd") & 2000 B) Val("123") + 2000
C) Str(123) & "2000" D)Str(123)+"2000"
(23) 表示滚动条控件取值范围最大值的属性是（）。
A）Max B）LargeChange C）Value D）Max-Min
(24) 当使用Line方法时，参数B与F可组合使用，下列组合中（）不允许。
A)BF B)B C)省略不用 D)F
(25)可以RGB(x,y,z)函数获取颜色，下面的数字对应了x,y,z三个参数，其中不合法的是（）。
A)0，0，0 B) 200，255，129 C) 100，256，200 D)255，255，0
(26) 在用菜单编辑器设计菜单时，必须输入的项有（）。
A)快捷键 B)索引 C)热键 D)名称
(27) 在窗体上画一个命令按钮，名称为Command1，然后编写如下事件过程：
Option Base 0
Private Sub Command1_Click()
Dim city As Variant
city = Array("北京", "上海", "天津", "重庆")
Print city(1)
End Sub
程序运行后，如果单击命令按钮，则在窗体上显示的内容是
A）空白 B）错误提示 C）北京 D）上海
(28) 假定有以下函数过程：
Function Fun(S As String) As String
Dim s1 As String
For i = 1 To Len(S)
s1 = UCase(Mid(S, i, 1)) + s1
Next i
Fun = s1
End Function
在窗体上画一个命令按钮，然后编写如下事件过程：
Private Sub Command1_Click()
Dim Str1 As String, Str2 As String
Str1 = InputBox("请输入一个字符串")
Str2 = Fun(Str1)
Print Str2
End Sub
程序运行后，单击命令按钮，如果在输入对话框中输入字符串"abcdefg"，则 单击"确定"按钮后在窗体上的输出结果为
A）gfedcba B）ABCDEFG C）GFEDCBA D）abcdefg
(29) Circle(500,600)，500， ， ， ,3将绘制（ ）。
A)圆弧 B)扇形 C)圆 D)椭圆
(30) 在窗体上画一个命令按钮，名称为Command1，然后编写如下程序：
Private Sub Command1_Click()
int t1
Static t2
t1=t1+1
t2=t2+1
End Sub
三次单击命令按钮后，t1,t2的值分别为（）：
A) 1 1 B) 3 3 C) 1 3 D) 3 1
二、 填空题（每题2分,计16分）
1． 窗体上有一个名称为List1的列表框，一个名称为Text1的文本框，一个名称为Label1、Caption属性为“Sum”的标签，一个名称为Command1、标题为“计算”的命令按钮。程序运行后，将把1～100之间能够被7整除的数添加到列表框。如果单击“计算”按钮，则对List1中的数进行累加求和，并在