1、1,第四章课堂作业：,1. 编写大小写转换函数程序。在文本框中输入英文字母，按”转大写“按钮，文本变成大写；按”转小写“按钮，文本变成小写。 2. 设某职工应发工资x元，试求各种面额钞票总张数最少的付款方案。 3. 设计工程，输出在指定范围内的3个随机数，范围在文本框中输入。,2,第5章作业练习:,1. 建立如图所示界面，对文本框进行字体选择和效果选择，用计时器进行前景和背景色选择。,3,2. 设计一个窗体，通过文本框接受数据，计算总成绩，平均成绩，再评定等级。等级评定标准：平均分91100分为“优秀”，平均分8190为“良好”，平均分6090为“中等”，平均分60以下为“差”，如图所示。,4
2、,第6章作业：,1. 文字字符效果设计器。创建一个窗体，通过文本框输入文本信息，利用组合框中的项目确定字体和大小，列表框确定字形。,5,第7章作业：,1. 随机产生10个两位数，找出其中最大值、最小值和平均值。,6,2. 设计一个“通信录”程序，如图所示。当用户在选择姓名下拉列表框中选择一个人名后，在电话号码文本框中显示对应的电话号码，当用户选择或取消“单位”和“住址”复选框后，将打开或关闭“工作单位”和“家庭住址”文本框。,7,作业： 1.编写计算阶乘的函数，利用计算ex的近似公式计算e值（直到最后一项小于10-6为止）。 ex=1+x/1!+x2/2!+x3/3!+xn/n!2. 编写程序
3、，实现英语单词的加密/解密操作。加密/解密的基本原则是：把单词中每个字符的ASCII码加上2，使其变成另外一个字符。例如：Abcde加密后变成cdefg.,编写一个加密函数完成加密： Public Function jiami(inp As String) Dim i As Integer Dim sout As String, scur As String, snew As String i = Len(inp) For x = 1 To iscur = Mid$(inp, x, 1)snew = Chr$(Asc(scur) + 2)sout = sout & snew Next x ji
4、ami = sout End Function,8,1. 建立如图所示界面，对文本框里的内容，通过列表框选择字体，字体大小通过水平滚动条控制，字型效果通过复选按钮控制。,第10章作业：,9,2. 习题10.6 输入学生学号、姓名、语文、英语、数学成绩，计算每个人平均成绩，并显示各科成绩。在此基础上，增加计算全班平均成绩的功能和按某科成绩排序的功能。,10,11,11章作业：,1. 用circle 方法在窗体中画一个有缺口的饼，如图所示。,12,作业：,2. 编写程序，实现利用滚动条控制图形的大小。vb11lx1,13,作业：,3. 编写程序，实现利用滚动条控制色彩，还可以返回色彩的rgb值。v
5、b11lx2,14,12章作业：,新建一个工程，设计窗体以及菜单如图所示。窗体上同时包含一个文本框和一个通用对话框控件，各子菜单按以下要求设计： 1.“字体”菜单按如图a所示，要求将子菜单项设计成一个控件数组，单击某一子菜单项将文本框内容设成相应的字体。 2.“颜色”菜单下的子菜单如图b所示，单击“文字颜色”后，利用通用对话框控件打开一个标准的“颜色”对话框，用于设置文本框中的文字颜色，单击“背景颜色”后，利用通用对话框控件打开一个标准的“颜色”对话框，用于设置文本框中的背景颜色。 3. ”属性“菜单下的子菜单初始状态如图c所示，单击”只读“可以在该项前面打上或取消，用于控制文本框是否为只读；而单击”隐藏“后将文本框隐藏起来，同时名称变成”显示”,再单击“显示”将文本框设置为可见，同时该项名称变成“隐藏”，即属性菜单运行时有两种状态。 4. 在完成以上内容基础上添加一个文字样式工具栏，如图所示，要求运行时鼠标指向按钮时有相应的功能提示，从左到右依次为“加粗”，“倾斜”，“删除线”.,15,a),b),c),d),16,14章作业：,1.使用文件系统控件设计一个简单的图片浏览器。,17,14章作业：,2. 通过键盘输入数据，包括学号、姓名、性别及数学、英语，电子的成绩等数据，将这些数据输入到一个顺序文件中去。,3. 将2题中的数据输入到一个随机文件中去。,
