重庆大学2022年《可视化程序设计(VB) 》( 第3次 )
发布时间:2023-05-31 14:05:49浏览次数:38第 3 次作业一、填空题(本大题共 40 分,共 10 小题,每小题 4 分)1. Rnd 函数的功能是。2. 控件共用一个的控件名字称控件数组,控件数组的下标也称。3. 使用 Call 调用 Sub 事件过程的语句为_______________。4. 在 VB 中,字符型类型符是________。5. 、与是面向对象程序设计技术的三大特征。6. 改变窗体前景色的属性是。7. 表达式"123"& 123 的结果为。8. 开发应用程序需要、、三个基本步骤。9.
1 2 32 3 13 2 3解题方案:评分标准:4. 参考答案:12解题方案:评分标准:5. 参考答案:3,6,1,4,4,4,解题方案:评分标准:三、简答题(30 分,共 5 题,每小题 6 分)1. 参考答案:单击工程资源管理器窗口的“查看代码”按钮。解题方案:评分标准:
2. 参考答案:(1)面向对象的程序设计(2)具有结构化程序设计语言(3)事件驱动编程机制(4)强大的数据库、多媒体功能(5)完备的联机帮助功能解题方案:评分标准:3. 参考答案:(1)标签用来显示文本信息;(2)文本框可以用于输入、编辑、显示文本;(3)区别在于标签只能用于输出,文本框即可输入、又可输出。解题方案:评分标准:4. 参考答案:(1)数字串转换成数值用 val 函数;(2)判定是否是数字串用 isnumeric 函数。
(2)取字符串某几个字符使用 mid 函数。(3)大小写字母转换用 lcase 函数\ucase 函数。解题方案:评分标准:5. 参考答案:(1)对象是面向对象程序设计的核心,是构成应用程序的基本元素。(2)类是对同种对象的抽象描述,是创建对象的模版。(3)事件过程是对某个对象事件所做的操作。解题方案:评分标准:
Rnd 函数的返回值介于()之间。10. 下列程序单击窗体时的输出结果是______。Private Sub Form_Click( ) Dim Mystr, Mystr1, Mystr2 As StringMystr1="B" For I=1 To 3 Mystr2=Lcase(Mystr1) Mystr1=Mystr1+Mystr2 Mystr=Mystr+Mystr1 Print MystrMystr1=Chr(Asc(Mystr1)+I) Next I End Sub二、程序阅读题(本大题共 30 分,共 5 小题,每小题 6 分)1. 在窗体上画一个文本框和一个列表框,然后编写如下两个事件过程:Private Sub Form_Load( ) List1.AddItem “123 ” List1.AddItem “456 ”
List1.AddItem “369”List1.AddItem “789 ” Text1.Text = “ ”End SubPrivate Sub List1_DblClick( ) a = List1.Text Print a + Text1.TextEnd Sub程序运行后,在文本框中输入“248”,然后双击列表框中的“369”,则输出结果()2. 写出下面程序运行时单击窗体的输出结果。Private Sub f(a%, b%) a = a + b b = a - bEnd SubPrivate Sub Form_Click() Dim a%, b% a = 23 b = 12 Call f(a, b) Print "a=" & a; ",b=" & b
End Sub3. 程序为: option base 1 private sub command1_click( )dim a(3,3)for I=1 to 3 for j=1 to 3 if j>1 and I>1 then a(I,j)=a(a(I-1,j-1),a(I,j-1))+1 else a(I,j)=I*j end if print a(I,j);” “; next jprint next Iend sub程序运行后,单击命令按钮后,在窗体显示的结果是:
4. 在窗体上画一个名称为 Text1 的文本框和一个名称为 Command1 的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Dim array1(10, 10) As Integer Dim i, 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程序运行后,单击命令按钮,在文本框中显示的值是多少?5. 以下程序运行后。Si, sj, sk, I, j, k 的结果分别为( )Private sub command1_click( ) Si=0: sj=0 For I=1 to 3For j=1 to ISk=0 For k=j to 3 Sk=sk+1
Next k Sj=sj+1 Next j Si=si+1 Next I Print si,sj,sk,I,j,kEnd Sub三、简答题(本大题共 30 分,共 5 小题,每小题 6 分)1. VB 有多种类型窗口,若想在设计时看到代码窗口,怎样操作?2. 简述 VB6.0 的主要特点。3. 标签与文本框的区别是什么?4. 将数字串转换成数值用什么函数?判定是否是数字串用哪个函数?取字符串某几个字符使用什么函数?大小写字母转换用什么函数?5. 什么是对象?什么是类?什么是事件过程?
答案:一、填空题(40 分,共 10 题,每小题 4 分)1. 参考答案:产生随机数解题方案:评分标准:2. 参考答案:相同,索引号解题方案:评分标准:3. 参考答案:Call 过程名(实参列表)解题方案:评分标准:4. 参考答案:$解题方案:评分标准:
5. 参考答案:封装性、继承性、多态性解题方案:评分标准:6. 参考答案:ForeColor解题方案:评分标准:7. 参考答案:123123解题方案:评分标准:8. 参考答案:建立窗体(绘制界面)、设置属性、编写代码解题方案:评分标准:9. 参考答案:0 和 1
解题方案:评分标准:10. 参考答案:BbBbCcBbCcEe解题方案:评分标准:二、程序阅读题(30 分,共 5 题,每小题 6 分)1. 参考答案:369248解题方案:评分标准:2. 参考答案:a=35,b=23解题方案:评分标准:3. 参考答案: