期末复习题vb上机题复习_第1页
期末复习题vb上机题复习_第2页
期末复习题vb上机题复习_第3页
期末复习题vb上机题复习_第4页
全文预览已结束

付费下载

下载本文档

版权说明：本文档由用户提供并上传，收益归属内容提供方，若内容存在侵权，请进行举报或认领

文档简介

1、设计题在考生文件夹下创建一个工程，在窗体中添加一个命令按钮， 编写命令按扭的 Click 事件代码。通过 InputBox 函数输入矩形的长和宽，使用 MsgBox 函数显示矩形的面积，如图 picture2 所示。窗体保存为设计题 2.frm, 工程保存为工程 2.vbp。图 picture2编程题 1在考生文件夹下创建一个工程，窗体界面如图 Picture3 所示, 窗体中间为一个控件，下面两个命令按钮。当按“移动”按钮时，文字从左向右移动，文字移动到窗体右边界时（Label1.Left Form1.Width）退回到窗体的最左边，再往右移动；当按“停止”按钮时，停止文字的移动。图 Pic

2、ture3编程题 2在考生文件夹下创建一个工程，窗体界面如图 Picture4 所示,编写确定命令按钮的 Click事件代码。实现以下功能：在窗体上输出所有 Ascii 字符和对应的编码（Ascii 码 33127），每行输出 8 个字符。提示：要使用 CHR 函数。图 Picture4调试题 1运行窗体“调试题 1.frm”后，产生 Fibonacci 数列的前 20 项，放在一维数组中，在文本框中输入项数，点击确定按钮，用 msgbox 命令显示相应项的数列值。程序有错，请修改。工程保存为“工程 5.vbp”Dim a(20) As Private Sub Dim n%n = Text1e

3、gerd1_Click()MsgBox Fibonacci 数列的第 & n & 项为End Sub&a(n)Private Sub a(1) = 1a(2) = 1For i =1 ToForm_Load()加了本行，3 分201 改为 3，4 分a(i) = a(i - 1) + a(i - 2)End forEnd for 改为 next i，3 分End Sub调试题 2（10 分）“调试题 2.frm”的功能是随机生成 10 个 0100 之间的整数，返回 10 个数中的最大数和最小值。程序有错，请修改。工程保存为“工程 6.vbp”Private Subd1_Click()Dimm

4、ax%, min%, i%Dim a(10) Aseger Randomizemax minFor=i0100= 1 To 10a(i) = Rnd()*100 加了*100，3 分Pr IfIfa(i);min a(i) Then min max a(i) Then max=a(i)a(i)加了本行，4 分Next Pr Pr PrSubi最大数为最小数为&maxmax改为 min，3 分End数据库 1（10 分）在 D 盘根文件夹下有一个 Acs 数据库 books.mdb，该数据库中有一个表 book。要求在考生文件夹下创建一个工程，使用 DataGrid 控件显示 book 表中的书名、书价和,数量三个字段。单击计算命令按钮，显示 boo

人人文库> 全部分类> 教育资料 > 课件下载

温馨提示

  • 1. 本站所有资源如无特殊说明，都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
  • 2. 本站的文档不包含任何第三方提供的附件图纸等，如果需要附件，请联系上传者。文件的所有权益归上传用户所有。
  • 3. 本站RAR压缩包中若带图纸，网页内容里面会有图纸预览，若没有图纸预览就没有图纸。
  • 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
  • 5. 人人文库网仅提供信息存储空间，仅对用户上传内容的表现方式做保护处理，对用户上传分享的文档内容本身不做任何修改或编辑，并不能对任何下载内容负责。
  • 6. 下载文件中如有侵权或不适当内容，请与我们联系，我们立即纠正。
  • 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。

最新文档

评论

0/150

提交评论