vb实验报告小结.doc

精品学习资料范文 vb实验报告小结 篇一：华北科技学院VB实验总结报告 华北科技学院计算机学院综合性实验 实 验 报 告 课程名称程序设计语言(VB) 实验学期 至 学年 第 学期 学生所在系部 年级班级 学生姓名 学号 任课教师 实验成绩 计算机学院制 计算机学院综合性实验报告 《 程序设计语言（VB） 》课程综合性实验报告 篇二：VB实验报告 内蒙古工业大学能动学院 实 验 报 告 课程名称： 高级语言程序设计（VB）Ⅰ 实验名称：选择、循环、数组和过程综合程序设计 实验类型： 验证性□ 综合性√ 设计性□ 实验室名称： 校计算中心 班级： 学号： 姓名： 组别： 同组人：成绩：实验日期： 实验报告撰写要求 一、 实验前用预习报告纸撰写预习报告，预习报告包括以下内容 1． 实验目的 2． 实验用仪器设备、器材或软件环境 3． 实验原理、方案设计、程序框图、预编程序等 4． 实验过程中需要记录的实验数据表格 二、 实验过程中，要认真观察，仔细记录 三、 完成实验后用实验报告纸撰写实验报告，包括以下内容 1． 仪器设备型号及编号 2． 实验器材或软件环境 3． 实验步骤、程序调试方法 4． 实验数据处理及结果分析 5． 实验中存在的问题 6． 体会及思考题 四、 报告撰写时，要求格式规范、书写整齐 预习报告成绩：指导教师审核（签名）： 年 月 日 预习报告 （ 一 ） 实验目的 学会综合运用选择结构、循环结构、数组和过程进行程序设计的方法。 （二）实验仪器及软件环境： 普通台式电脑、microsoft visual basic 6.0标准环境下 （三）实验原理： 利用Rnd函数产生80个随机整数，再利用For循环将产生的随机整数入到数组中，最后用If语句按每行10个数输出到第一个文本框中；用If句和Mod函数判断是否为奇偶数，后利用冒泡排序法将奇偶数排序分别输到二、三文本框中。调用Function函数判断素数，利用For循环和If函输出，用累计求和法将素数的个数求出放入第四、五个文本框中。 （四）方案设计：界面设计如下： 存语出数 （五）程序框图如下 （六）预编代码： Option Base 1 Dim i%, j%, a%(), b%(), c%(80), l%, m%, n%, w%, p%, q% Private Sub Command1_Click() For i = 1 To 80 Randomize c(i) = Int(Rnd * 90 + 10) Text1.Text = Text1.Text c(i) s = s + 1 If s Mod 10 = 0 Then Text1.Text = Text1.Text vbCrLf End If Next i For i = 1 To 79 For j = 1 To 79 If c(j) c(j + 1) Then t = c(j) c(j) = c(j + 1) c(j + 1) = t End If Next j Next i For i = 1 To 80 If c(i) Mod 2 = 0 Then m = m + 1 ReDim Preserve a(m) As Integer a(m) = c(i) Else n = n + 1 ReDim Preserve b(n) As Integer b(n) = c(i) End If Next i For i = 1 To n / 2 l = b(i) b(i) = b(n + 1 - i) b(n + 1 - i) = l Next i End Sub Private Sub Command2_Click() For i = 1 To m Text2.Text = Text2.Text a(i) p = p + 1 If p Mod 10 = 0 Then Text2.Text = Text2.Text vbCrLf 篇三：VB实验报告一 《VB程序设计》实验单元一 实验报告 专业班级：姓名 学号 指导教师：完成时间： 实验 一VB环境和可视化编程基础 一、 实验目的 1 了解Visual Basic的安装 2 掌