1、10、什么是类？什么是对象？什么是事件过程？类是同类对象集合的抽象，它规定了这些对象的公共属性和方法；对象是类的一个实例，对象包含三个要素：属性、方法和事件。当在对象上发生了事件后，应用程序就要处理这个事件，而处理的步骤就是事件过程。11、属性和方法的区别是什么？属性是对象的特征，方法是对象的行为。前者有值，可以被赋值或引用；后者没有值，表示能够执行的操作。12、当标签边框的大小由Caption属性的值进行扩展或缩小时，应对该控件的什么属性进行何种设置？ 。true属性值设置为Autosize将该控件的答：13、在VB6.0中，命令按钮的显示形式可以有标准的和图形的两种选择，它们通过什么属性来
2、设置？若选 择图形的，则通过什么属性来装入图形？若已在规定的属性里装入了某个图形文件，但该命令按钮还是不能显示该图形，而显示的是Caption属性设置的文字，应怎样修改？命令按钮的显示形式通过将Style属性值设置为Graphical来实现。 通过Picture属性来装入图形。 不能显示图形是因为Style属性值被设置为Standard，只要将其改为Graphical，并且将Caption的值设置为空即可。14、如果文本框要显示多行文字，应对什么属性设置为何值？将MultiLine属性的值设置为True。15、标签和文本框的区别是什么？在程序运行时，标签只能显示文字，不能输入文字，显示文字通过
3、对Caption属性赋值来实现；而文本框既能显示文字，也能输入文字，这通过text属性来实现。16、要让文本框获得焦点的方法是什么？SetFocus方法。17、简述文本框的Change和KeyPress事件的区别 相同点是当在文本框输入内容时，同时激发上述两个事件；不同点是Keypress事件可通过参数KeyAscii返回所按键的编码值，可依此判断数据输入的正确性或数据输入结束与否，因而该事件使用较多；change事件还可以发生在程序改变文本框的text属性时。18、当某文本框输入数据后（按了回车键），经判断后认为是数据输入错，应怎样删除原来文本框中的数 据？假定文本框的名称为Text1，则事
4、件过程如下：Private Sub Text1_KeyPress（KeyAscii As Integer ） if KeyAscii = 13 then if 出错条件判断成立 then Text1=” end if end sub 注意：删除刚输入的字符，通过KeyAscii=0语句实现；焦点定位文本框对象采用SetFocus方法。19、在程序运行前，对某些控件设置属性值，除了在窗体中直接设置外，还可以通过代码设置，这些代码 一般存放在什么事件中？如果要将命令按钮定位在窗体的中央，试写出事件过程代码。这些代码一般放在Forem_Load（）事件过程中。将窗体定位在屏幕的中央，只能在属性窗口中
5、将Form1窗口的StartUpPosition属性值设置为2（表示屏幕中心），该属性不能在运行时设置。要将按钮定位在窗体的中央，事件过程如下：Private sub Form_Load（） Command1.left= Form1.scaleWidth2-command1.Width2 Command1.Top = Form1.ScaleHeight 2 command1.Height 2 End Sub 其中，ScaleWidth、ScaleHeight表示窗体的相对宽度和高度。20、VB6.0提供的大量图形文件存放在哪个目录？若你的计算机上没有安装，应怎样安装这些图形文件？存放在Grap
6、hics目录下。在VB6.0的安装盘上可以找到Graphics子目录，将其复制到硬盘上的VB目录下。 21.略（书上page36） 第3章：1、合法的有：（1）单精度（3）单精度（4）双精度（6）整形（7）字符型（9）日期型（10）双精度（12） 八进制表示（14）十六进制表示（15）逻辑型（18）单精度数 2、合法变量有：（1），（2），（6），（9），（10），（11） 3、算术表达式写成VB表达式 56（a+xy）2） （ ? abs（x+y） +z5 ? （1（）| x+y | + z1 + x * y ） 6 （3） ? （10*x + sqr（3*y） ） / （x * y ） （
7、4）? （ -b+sqr（b2-4*a*c） ）/2/a （5） ? 1 / （1/r1+1/r2+1/r3） （6）? sin（45*3.14/180）+ （ exp（10）+ log（10） ）/ sqr（ x+y+1） 4、根据条件写出相应的VB表达式 （1） chr（ int （ Rnd * 10 +67 ） （2） int （ Rnd * 101 +100 ） （3） x * y 0 （4） x%5=0 or x % 7 =0 （5） （x mod 10） 10 + x /10 （6）Round（123.2389*100）/100 （7） Ucase （c ） =”A” and Uc
8、ase（c ）=”a” and Lcase（c ）=10 and x 20 （10） （ x z ） or （ x z and y z and y z 5、下出下列表达式的值:（1） 123+23 mod 10 7 +Asc（“A”） ? 188, （2） 100+”100” & 100 ?200100 （3） Int （ 68.555*100+0.5）/100 ? 68.56 （4） 已知A$=“87654321”，求表达式Val（Left$（A$,4）+ Mid（A,4,2）的值 ? 876554 （5）DateAdd（“m”,1,#1/30/2000#） ? 2000-2-29 （6）
9、Len（”VB程序设计”）? 6 6、略 第4章：VB控制语句 1、结构化程序设计的三种基本结构是什么？顺序结构、选择结构和循环结构。2、指出下列赋值语句中的错误（包括运行时错误）：（1）10x=sin（x）+y 10x是非法变量名 （2）c=3+sqr（-3） 待求平方根的数为负数 （3）c+x+y=c*y 赋值符左边是表达式了 （4） x=sin（x）/（20 mod 2） 分母为零了 3、Msgbox函数与InputBox函数之间有什么区别？各自获得什么值？两个函数共同之处都显示对话框。区别：Inputbox函数等待用户在文本框中输入数据，获得的是输入 函数等待用户按一按钮，获得的是表示
10、按钮的整数值，以决定程序的流向。Msgbox的字符串数据；位小数，并在窗体显示，应使用什么函数？如何编写对应的3位、2位、4、要使单精度变量x,y,z分别保留1 方法？print 函数，具体如下：使用format print Format（x,”0.0” ） Format （ y , “ 0.00 “ ）print Format （ z , “ 0.000 “ ）print 中的表达式可以是算术、字符、关系、逻辑表达式中的哪些？if then 5、语句 算术、关系、逻辑表达式答： 指出下列语句中的错误：6、 x=y表达式书写错误，应写成： if x） y then print x （1 10x
11、 and x20表达式书写错，应是：x20 then x=x+20 （2） if 10 20 x=val（ text1） y = x * x + 3 * x +2 if x 20 then case is=10 y = x * x + 3 * x +2 y = sqr （ 3 * x ） 2 x=10 then elseif case is 0 y = sqr （ 3 * x ） 2 y= 1 / x + Abs （ x ） elseif x0 then end select y= 1 / x + Abs （ x ） print y end if end sub print y end sub
12、 iif 中。中的最大值并存入变量函数两种方法求三个数x,y,zmax语句和）利用（3ifif xy then max=x else max = y if zmax then max = z max = iif （ max z, max , z ） max = iif （ xy , x , y ） :end elseifthenif在多分支结构的实现中，可以用 8、caseselect endif形式的语句，也可以用 Select形式的语句，由于后者的条件书写更灵活、简洁，是否完全可以取代前者？形式的语句中条件书写更灵活、简洁，程序可读性强，但使用它有限答：虽然Select Caseend S
13、elect 制。（适合于对一个变量判断的） 首先，看该语句的形式： Select Case 表达式列表 语句块 case Case else 语句块n+1 End Select 其中变量或表达式只能含有一个变量，任何含有多个变量的形式都是错误的。如，要判断x,y是否在第一、三象限内，若输入如下语句：select case x,y, VB程序会显示“缺少：语句结束”。其次，在后面的case表达式列表中不能出现Select case变量或表达式中使用的变量，也不能出现主教材上列出的四种形式以外的符号或关键字（符号是：逗号；关键字是：is, to）。9、计算下列循环语句的次数 （1）For I =
14、-3 to 20 step 4 6 （2） For I = -3.5 to 5.5 step 0.5 19 （3） For I = -3.5 to 5.5 step -0.5 无循环，因为步长0 ，循环初值小于终值 （4）For I = -3 to 20 step 0 无限循环，因为步长=0 10、下列30-90为语句标号，分别标记该语句，第40名共执行了几次，第50名共执行了几次，执行第90号 语句后显示的结果是多少？30 For j =1 to 12 Step 3 循环4次 40 For k = 6 to 2 step -2 循环3次，被执行4次 50 mk = k 共执行4*3=12次
15、60 print j , k 70 next k 80 next j 90 print j , k , mk 13 0 2 11、如果事先不知道循环次数，如何用forNext结构来实现？将循环终值设置得足够大，再在循环体内设置条件语句，满足条件退出循环。12、利用循环结构，实现如下功能：（1） s=0: for I =1 to 10 s = s + （ i+1）*（2*i+1） next i （2）分别统计1100中，满足3的倍数、7的倍数的数各是多少？ s3 = 0: s7 = 0 for I =1 to 100 if I mod 3 = 0 then s3 = s3 +1 if I mod
16、 7 = 0 then s7 = s7 +1 （3）将输入的字符串以反序显示。例如，输入“ASDFGHJKL”，显示“LKJHGFDSA”。 s = InputBox（“ 请输入字符串”） for I = Len（ s ） to 1 step -1 Mid （ s, I, 1 ） print 13、 下面程序的运行结果是什么？该程序的功能是什么？Private Sub Command1_Click（） Dim x$, n% 10100 转换成2进制数表示n = 20 将20Do While n y Then x = x - y Else y = y Print x, z / x 个随机数，显示
17、其中最大值，最小值和平均值。50100范围内的20利用随机函数产生15、 Private Sub Command3_Click（） Dim i%, min%, max%, avg!, x% min = 100: max = 50: avg = 0 For i = 1 To 20 x = Int（Rnd * 51 + 50） Print x; If x max Then max = x If x max Then max = c（i, j）: maxi = i: maxj = j End If （4）以下三角形式显示A矩阵，上三角形式显示B矩阵 For j = 1 To i Print a（i,
18、 j）; Space（2）; 牐湩?输出B上三角元素 Print Tab（i * 5）; For j = i To 4 Print b（i, j）;（5）将A矩阵第一行与第三行对应元素交换位置 t = a（1, j）: a（1, j） = a（3, j）: a（3, j） = t （6）求A矩阵 矩阵条对角线元素之和 Sum = 0 Sum = Sum + a（i, i） + a（i, 5 - i） （7）将A矩阵按列的次序把各元素放入一维数组D中，显示结果 Dim D%（16） For i = 1 To 4 For j = 1 To 4 D（k） = a（j, i）: k = k + 1 N
19、ext j Next i Print D一维数组无素为尺 For k = 0 To 15 Print D（k）; Next k 6、20声明一个一维字符类型数组，有 个元素，每个元素最多放10个字符，要求：1）由随机数形成小写字母构成的数组，每个元素的字符个数由随机数产生，范围110 2）要求将生成的数组分4行显示，规定每个元素宽度为10 3）显示生成的字符数组中字符最多的元素 Dim st（1 To 20） As String, c As String * 1 Dim i%, n% For i = 1 To 20 n = Int（Rnd * 11 + 1） For j = 1 To n c
20、= Chr（Int（Rnd * 26 + 97） st（i） = st（i） & c （2）按一行显示5个字符串要求输出 Print st（i）; Space（15 - Len（st（i）; If i Mod 5 = 0 Then Print （3）显示20个中字符个数最多的一个 maxlen = 0 maxstr = If Len（st（i） maxlen Then maxlen = Len（st（i） maxstr = st（i） 最多字符个数尺慭汸湥字符串是: maxstr 7、简述列表框和组合框的异同处 相同处都是可存放字符串；不同处在于：组合框是文本框和列表框的组合，可以输入内容，但要通过additem方法添加；列表框只能选择项目，不能直接输入内容。
