VB课设MP3设计报告

V B程序设计课程设计报告HEN system office room 【HEN16H-HENS2AHENS8Q8-HENH1688】《VB程序设计》课程设计报告（2016 — 2017 学年第 1 学期）题目：排序演示学院：经济与管理学院班级：物流管理1502学号：姓名：指导教师：阮冰时间：起 2017年1月3日止 1月6日一、课程设计基本信息课程代码：05190124课程名称：计算机基础课程设计课程英文名称: Computer-based Course Design课程所属单位（院（系）、教研室）：数学与计算机学院计算机基础课程群课程面向专业：生物科学类、制药工程、制药工程(生物制药)、药物制剂、物流管理课程类型：必修课先修课程：大学计算机基础通识选修课程、Visual Basic程序设计课程学分：1 总学时：16二、课程设计目标掌握所学语言程序设计的方法，熟悉所学语言的开发环境及调试过程，熟悉所学语言中的数据类型，数据结构、语句结构、运算方法，巩固和加深对理论课中知识的理解，提高学生对所学知识的综合运用能力。

通过综合设计要求达到下列基本技能：1．培养查阅参考资料、手册的自学能力，通过独立思考深入钻研问题，学会自己分析、解决问题。

2．通过对所选题目方案分析比较，确立方案，编制与调试程序，初步掌握程序设计的方法，能熟练调试程序。

3．系统设计编程简练，可用，功能全面，并有一定的容错能力。

用户界面良好，有较好的输出功能。

在完成课题基本要求后，具有创新型设计，具有一定的实用价值。

4．根据个人的设计调试过程，撰写设计报告。

三、课程设计内容利用已掌握的VB程序设计语言基础，以及面向对象的程序设计方法、事件驱动的编程方式，进行应用程序和系统的开发设计。

在强化巩固已有编程知识基础之上，训练新的设计与编程思路，通过综合应用所学知识设计、编制、调试实用的Visual Basic程序。

四、课程设计要求1.要求每个同学都要认真对待，积极参与。

VB程序设计
课程设计报告
设计题目：_________________________________
学院__________________
班级/学号__________________
指导教师__________________
学生姓名__________________
起止日期__________________
成绩__________________
（目录）
（正文）
一．课程设计题目
二．小组成员
三．系统分析及界面设计
1．
2．
3．
... ...
四．系统主要功能及流程图
五．源程序及功能描述
…………
（注意：源代码中要求在必要的地方加注释）
六．课程设计体会
（可以从以下方面考虑：1、具体叙述课程设计中的收获。

2、程序设计中的闪光点。

3、程序设计中遇到的困难以及是如何解决的。

4、程序仍有哪写需要改进的地方以及改进的思路。

）
参考文献：
按参考文献规范列出各种参考文献，包括参考书目，论文和网址等。

第2页。

沈阳航空航天大学课程设计任务书学院：机电工程专业：机械设计制造及其自动化班级：04060101 学号：2010040601020 题目：高考分数统计系统一、课程设计时间2012年3月5~9日（第1周），共计1周，20学时。

二、课程设计内容用VB编写软件完成以下任务：1 录入考生信息（考生信息包括考号、姓名、成绩等）；2 根据总分统计各分数段考生情况并显示（由高到低20分为一段）；3 显示超过重点线的考生信息（重点线自己设计）；4 将考生信息保存在文件myfile.txt文件中。

5自己再增加一项功能。

三、课程设计要求程序质量：✧贯彻事件驱动的程序设计思想。

✧用户界面友好，功能明确，操作方便；可以加以其它功能或修饰。

✧用户界面中的菜单至少应包括“考生信息录入”、“统计各分数段人数”、“显示过重点线考生信息”、“保存”、“退出”5项。

✧代码应适当缩进，并给出必要的注释，以增强程序的可读性。

课程设计说明书：✧课程结束后，上交课程设计说明书和源程序。

课程设计说明书的格式和内容参见提供的模板。

四、指导教师和学生签字指导教师：________ 学生签名：________五、说明书成绩六、教师评语目录需求分析 (4)设计分析 (4)技术要点 (6)主要界面截图 (6)总结 (7)完整的源程序 (9)参考文献 (17)需求分析高考分数统计系统，主要指对信息的“录入”、“查询”、“分段”和“统计”。

即:对文件的输入和分段要求：①能够随时录入学生的信息（姓名、总成绩）。

②能够随时显示学生已经录入的信息。

③能够随时对学生已经录入的成绩进行分段。

④能够随时显示过重点线的已录入的学生信息。

设计分析（1）概述：该程序主要使用了顺序文件的相关技术包括: (1)打开文件(2)写操作(3)关闭文件(4)读操作并且使用了For循环和Do While循环.主要实现考生信息录入,查询,统计,分段,保存,退出等功能.(2)总体设计：（3）详细设计：技术要点本程序最重要的组成部分就是文件读取部分，也就是随时能查看添加功能部分。

南京工程学院课程设计说明书(论文)题目密码登录课程名称VB课程设计报告院（系、部、中心）能源与动力工程专业建筑环境与设备工程班级暖通091学生姓名刘江淮学号207090822设计地点图书馆指导教师于雷1设计起止时间：2010 年6 月28 日至2010 年7 月 3一、设计任务补全代码，并按要求完成课程设计报告二、系统总体设计方案密码登录是每一个数据库应用程序所必备的一个功能模块，觅得是为了保证系统及数据的安全。

在用户进入某个系统时会弹出如同的对话框。

确认用户输入的权限师傅正确，级点击“确认”的按钮。

当用户输入的密码不正确时，系统将给出提示，如下图所示。

该模块的实现比较通用，在类似数据库应用中都需要用到。

有的系统还根据用户的需要提供了密码更改的功能。

当你需要更改密码的时候会出现如下的对话框。

首先输入原始密码，在输入新密码，确认新密码，然后点击“确认”键即可。

三、程序总体框架图四、系统的调试源代码写完后，对系统进行调试运行，要求变量声明，对可能出现的几种错误，如：编辑时错误、编译时错误、运行时错误、逻辑错误，进行修改，调试，运行，直至系统能正常运行。

五、收获体会Visual basic 语言是以结构化basic语言为基础，以事件驱动为运行机制。

他的诞生标志着元件设计和开发的新时代的开始。

VB具有面向对象可视化设计工具，是事件驱动的编程机制，同时也提供了易学易用的应用程序集成开发环境。

从Basic 语言、Visual basic 语言的学习开始接触到编程，以前有过一段Basic 语言的学习，觉得比较简单。

当时很想自己能够熟练的进行程序编辑，工程上的软件编辑。

随着大一的Visual basic 语言的学习才逐渐发现这理想想要实现的难度。

对我而言学习编程，不仅能够帮自己解决在生活中可能遇到的一些问题；自己设计一些小游戏还可以给自己带来一些乐趣。

同时也为自己在寻找理想工作添加重要的砝码。

所以，我觉得在学习VB是我们要明确学习的目的。

洛阳理工学院课程设计报告课程名称高级语言程序设计设计题目程序设计综合训练专业高分子材料与工程班级B110111学号B11011123姓名邓文旗完成日期2013年1月11日课程设计任务书设计题目：程序设计综合训练_________________________________________________________ 设计内容与要求菜单的使用图片框的使用列表框的使用文本框的使用单选按钮的使用复选按钮的使用命令按钮的使用图片的插入与移动等界面美观代码规范报告格式符合要求题目要求功能全部实现指导教师：郭恒川2013 年1 月11 日课程设计评语成绩：指导教师：_______________年月日第一章课程设计目的一年的vb程序设计课程已经结束，随着老师的辛勤指导与自己平时的努力训练，已经掌握的基本的掌握了简单的程序设计内容。

为了有效地提高学习效率，更有效的掌握所学知识，特此完成了以下简单的程序设计。

本课题主要进行了控件数组、框架、键盘事件处理、定时器控件、图片框、列表框等知识的运用。

第二章课程设计的要求题目介绍（1）画一个框架，添加三个复写框。

（2）画一个图片框，运行其中相关的图片的程序。

（3）通过控制按钮来控制汽车的各种运动。

（4）运行程序，计算正弦余弦值。

（6）通过“菜单”的各种命令，控制图片框中的变化。

（7）在列表框中添加项目，通过程序控制它的各种变化。

（8）通过图片框与其中的单选按钮，运行程序在文本框中显示不同的内容。

（9）通过单选按钮，程序运行时是文本框中的内容相互“交换”“连接”，并显示出来。

（10）通过“计算”“读入数据”“存盘”按钮，把已知文件中的数据计算并存盘。

课程设计功能要求（1）框架标题为“目的地”，框架中的三个复选框的标题分别为“上海”、“广州”、“巴黎”，其中“上海”为选中状态，“广州”为未选状态，“巴黎”为灰色状态。

（2）图片框名称为picture1，其高的宽分别为1900、1700.运行时，单击图片框，则装入相应的图片，单击窗体图片框中的图片消失。

VB MP3播放器今天，我们将制作一个MP3播放器。

程序运行时，可以选择MP3文件，选择左右声道声音，总共播放所需的时间等。

程序运行结果如图所示。

运行结果技术要点●注册Mp3Play控件●获得MP3文件的播放总时间●设置左右声道的声音●获得MP3文件的总帧数实现过程■新建项目打开Visual ，选择“新建项目”，在项目类型窗口中选择“Visual Basic项目”，在模板窗口中选择“Windows应用程序”，在名称域中输入“Mp3Play”，然后选择保存路径。

单击“确认”。

■添加控件向当前窗体添加七个Label控件，其中四个作为说明之用，其余三个分别用于显示MP3文件的播放时间、总帧数和文件名称。

鼠标右击工具箱，选择“自定义工具箱”，在弹出的对话框中选择Com组件，选中“Microsoft Common Dialog Control6.0”、“Microsoft Common Controls 6.0”、单击“浏览”，选中文件Mp3play.ocx，这时会在“”选项卡中出现“Dialog-Media Mp3Play ActiveX Control Module”一项。

添加一个CommonDialog控件、三个Slider控件和一个Mp3PlayCtrl控件。

■设置属性切换到“属性栏”，对窗体上的控件设置属性如下所示。

属性表■添加代码' 选择mp3文件Private Sub button1_Click(ByVal eventSender As System.Object, ByVal eventArgs AsSystem.EventArgs) Handles button1.ClickDim totaltimes As IntegerAXCommonDialog1.ShowOpen()If Len(AXCommonDialog1.FileName) = 0 Then Exit SubErr.Number = Mp3Play1.Open(AXCommonDialog1.FileName, "")' 取得mp3文件的总时间totaltimes = Mp3Play1.TotalTimelbltotaltime.Text = "播放时间：" & Str(totaltimes \ 60000) & ":" & Str(Int((totaltimesMod 60000) / 1000))lblmp3name.Text = AXCommonDialog1.FileName' 取得mp3文件的左右声道音量leftvolume = Mp3Play1.GetVolumeLeftrightvolume = Mp3Play1.GetVolumeRightsldPos.Value = 0' 取得mp3文件的总帧数sldPos.Max = Mp3Play1.FrameCountlblframe.Text = "共" & sldPos.Max & "帧"button2.Enabled = Truebutton3.Enabled = Truebutton4.Enabled = TrueEnd Sub' 开始播放Private Sub button2_Click(ByVal eventSender As System.Object, ByVal eventArgs AsSystem.EventArgs) Handles button2.ClickMp3Play1.Play()End Sub' 暂停播放Private Sub button3_Click(ByVal eventSender As System.Object, ByVal eventArgs AsSystem.EventArgs) Handles button3.ClickMp3Play1.Pause()End Sub' 停止播放Private Sub button4_Click(ByVal eventSender As System.Object, ByVal eventArgs AsSystem.EventArgs) Handles button4.ClickMp3Play1.Stop()End Sub' 程序启动时，必须进行注册，否则不能正确播放' 设置左右声道默认值为中间值Private Sub Form1_Load(ByVal eventSender As System.Object, ByVal eventArgs AsSystem.EventArgs) Handles MyBase.LoadMp3Play1.Authorize("LightBringer", "1441658209")SldLeft.Value = 50SldRight.Value = 50' 在没有选择mp3文件之前，令播放、暂停、停止按钮不可用button2.Enabled = Falsebutton3.Enabled = Falsebutton4.Enabled = FalseEnd Sub' 改变左声道的音量Private Sub SldLeft_Change(ByVal eventSender As System.Object, ByVal eventArgs AsSystem.EventArgs) Handles SldLeft.ChangeMp3Play1.SetVolume(leftvolume * SldLeft.Value / 100, rightvolume *SldRight.Value / 100)End Sub' 改变播放mp3文件的位置Private Sub sldPos_Change(ByVal eventSender As System.Object, ByVal eventArgs AsSystem.EventArgs) Handles sldPos.ChangeMp3Play1.Seek(sldPos.Value)Mp3Play1.Play()End Sub■运行结果单击菜单“调试|启动”或单击图标运行程序。

VB课程设计报告报告名称 MP3播放器详细设计报告年级 10级学院计算机学院专业计算机科学与技术专业学号 12101113 姓名张木春任课教师于时飞完成时间 2013.5.31 成绩（报告在给出成绩的同时须由评阅人写出评语）详细设计说明1.引言 (3)1.1编写目的 (3)1.2项目背景 (3)1.3定义 (3)1.4参考资料 (4)2.总体设计 (4)2.1需求概述 (4)2.2软件结构 (4)3.程序描述 (4)3.1功能 (8)3.2性能 (8)3.3输入项目 (8)3.4输出项目 (9)3.5限制条件 (9)3.6测试要点 (9)1．引言1.1编写目的编写本程序的目的是设计一个MP3播放器,能实现,播放,停止,暂停,音量设置,左右声道,音乐添加删除,音乐列表的记忆功能,顺序播放,随机播放,循环播放等功能.通过阅读详细设计说明书,我们可以清楚的知道界面上每个控件的功能及每段代码所实现的功能.该说明说适合于所有了解VB语言的读者,可读性强.1.2项目背景本项目是在我们上完Visual Basic 2005 程序设计课和软件工程课之后,王国伟老师为了对我们进行简单考核而提出的课程设计题目.该项目由王国伟老师直接主管,并依托于信息技术学院六楼数学实验室来完成,项目时间为两周.1.3定义1.3定义（1）数据类型：String 字符串Boolean 浮点型Integer 整型（2）常用控件及属性Button 命令按钮控件RadioButton 单选框控件OpenFileDialog 打开文件对话框控件File close（）关闭文件函数ListView控件：（属性）Add: 添加列表项SelectedItems()：选中的列表项Remove: 删除列表项AxWindowsMediaPlayer控件：（属性）URL：获取多媒体文件的路径及文件名Ctlcontrols: 获取多媒体文件的控制方法CurrentPosition:获取多媒体当前的播放进度TrackBar控件：（属性）Value:获取滑块目前所在的位置1.4参考资料[1] 李捷. Visual Basic 2005—程序设计教程-北京机械工业出版社,2007.7[2] 杨富国. Visual Basic 程序开发案例解析-清华大学出版社,2006.1[3]康祥顺. Visual Basic 案例开发集锦-电子工业出版社,2006.12．总体设计2.1需求概述本项目的开发宗旨是实现Windows Media player 的MP3播放器功能,使用户方便的播放音乐,并根据兴趣添加播放列表.根据系统实现的目的,可以描述出MP3播放器功能,该系统主要包括下列四部分:1.音乐播放功能;2.歌曲列表管理功能;3.音量设置,左右声道设置;4.播放模式更换功能.其中,音乐播放功能包括音乐的播放,暂停,停止, ,是本程序的基本功能.歌曲列表管理功能实现了歌曲列表的添加,删除保存等功能,方便用户使用.音量,声道设置功能可以实现,歌曲音量大小的调节和左右声道模式的转换.播放模式更换功能,可以实现顺序播放,随机播放,单曲循环等不同模式之间的转换,,使播放方式更加人性化.2.2软件结构需求分析---详细设计---调试----改进---再调试3．程序描述1.全局变量声明Public Class Form1'设置全局变量Dim paths() As String'定义打开文件路径数组Dim FileName As String'定义文件名Dim SingName As String'定义歌曲名称Dim i As IntegerDim selIndex As IntegerDim path As StringDim d1, d2 As Integer2.‘添加按纽事件Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.ClickDim sfile As String'定义歌曲名称Dim j As Integer'定义循环变量Dim count As Integer'定义已有歌曲数目With OpenFileDialog1 '打开新文件.Title = "打开mp3文件".Multiselect = True.Filter = "mp3文件(*.mp3)|*.mp3".ShowDialog()paths = .FileNamesEnd Withi = paths.GetUpperBound(0) '获取此次打开文件的数目For j = 0 To icount = ListView1.Items.Countsfile = paths(i - j).Substring(paths(j).LastIndexOf("/") + 1) '获取歌曲名称Dim mitem As New ListViewItem(Str(count + 1), j)mitem.SubItems.Add(sfile)mitem.SubItems.Add(paths(i - j))ListView1.Items.Add(mitem) '把新打开的文件添加到列表控件中NextEnd Sub3.'播放按纽事件Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.ClickselIndex = ListView1.SelectedItems(0).Text - 1FileName = ListView1.SelectedItems.Item(0).SubItems(1).Text '获取歌曲名称 path = ListView1.SelectedItems.Item(0).SubItems(2).TextAxWindowsMediaPlayer1.URL = path '设置播放文件 AxWindowsMediaPlayer1.Ctlcontrols.play() '开始播放Label2.Text = FileNameDim Str As StringLabel2.Text = FileNameTimer1.Enabled = TrueButton2.Enabled = TrueStr = FileName.Substring(stIndexOf("."))FileName = FileName.Remove(FileName.Length - _Str.Length, Str.Length)Label2.Text = FileName '对字符串进行处理,仅获取无后缀歌曲名End Sub4.'停止按纽事件,Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.ClickAxWindowsMediaPlayer1.Ctlcontrols.stop()End Sub5.'退出并保存列表按纽事件Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.ClickFileOpen(1, "d:\xs.txt", OpenMode.Output)Dim i, j As IntegerDim st As String = ""j = ListView1.Items.Count - 1For i = 0 To jst = ListView1.Items(i).SubItems(2).TextPrintLine(1, st)NextFileClose(1)Close()EndEnd Sub6.'计时器事件Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.TickDim m1, m2 As IntegerDim s1, s2 As IntegerDim n As Integerd1 = AxWindowsMediaPlayer1.Ctlcontrols.currentPosition '获取当前播放进度 d2 = AxWindowsMediaPlayer1.currentMedia.duration '获取需要的总时间 TrackBar1.Value = d1TrackBar1.TickFrequency = d2TrackBar1.Maximum = d2m1 = d1 \ 60 : s1 = d1 Mod 60m2 = d2 \ 60 : s2 = d2 Mod 60Label1.Text = "已播放" & m1 & ":" & Format(s1, "00") & "(" & m2 & ":" & Format(s2, "00") & ")"'显示播放进度If m1 = m2 And m1 <> 0 And s1 = s2 ThenIf RadioButton1.Checked = True Thenn = selIndexListView1.Items(n).Selected = Falsen = n + 1If n < ListView1.Items.Count - 1 ThenListView1.Items(n).Selected = Truebf()End IfElseIf RadioButton2.Checked = True Thenn = selIndexListView1.Items(n).Selected = FalseRandomize()n = CInt(Int((ListView1.Items.Count - 1 - 0 + 1) * Rnd()))ListView1.Items(n).Selected = Truebf()Elsebf()End IfEnd IfEnd Sub7 '列表视图控件Private Sub ListView1_DoubleClick(ByVal sender As Object, ByVal e As System.EventArgs) Handles ListView1.DoubleClickDim str As StringselIndex = ListView1.SelectedItems(0).Text - 1FileName = ListView1.SelectedItems.Item(0).SubItems(1).Text '获取歌曲名称 path = ListView1.SelectedItems.Item(0).SubItems(2).Text '获取歌曲路径 AxWindowsMediaPlayer1.URL = path '设置播放文件 AxWindowsMediaPlayer1.Ctlcontrols.play() '开始播放Label2.Text = FileNameTimer1.Enabled = TrueButton2.Enabled = Truestr = FileName.Substring(stIndexOf("."))FileName = FileName.Remove(FileName.Length - str.Length, str.Length)Label2.Text = FileNameEnd Sub8'删除Private Sub Button5_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button5.ClickDim INQ As IntegerDim ri As IntegerDim count As IntegerINQ = ListView1.SelectedItems(0).Text - 1ListView1.Items(INQ).Remove()count = ListView1.Items.CountFor ri = 0 To count - 1ListView1.Items(ri).SubItems(0).Text = Str(ri + 1)NextEnd Sub9 '左声道Private Sub Button6_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button6.ClickAxWindowsMediaPlayer1.settings.balance = -100End Sub10'右声道Private Sub Button7_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button7.ClickAxWindowsMediaPlayer1.settings.balance = 100End Sub11'暂停Private Sub Button8_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button8.ClickAxWindowsMediaPlayer1.Ctlcontrols.pause()End SubSub bf()selIndex = ListView1.SelectedItems(0).Text - 1FileName = ListView1.SelectedItems.Item(0).SubItems(1).Text '获取歌曲名称 path = ListView1.SelectedItems.Item(0).SubItems(2).TextAxWindowsMediaPlayer1.URL = path '设置播放文件 AxWindowsMediaPlayer1.Ctlcontrols.play() '开始播放Label2.Text = FileNameEnd SubEnd Class3.1功能1.音乐播放功能;2.歌曲列表管理功能;3.音量设置,左右声道设置;4.播放模式更换功能.3.2性能本播放器结构简单,性能良好,操作简单,适合于大众人群的使用.3.3输入项目对该播放器的播放列表添加想要播放的歌曲,播放器就能按要求播放音乐.3.4输出项目3.5限制条件硬件条件:普通的计算机和工作站软件条件:运行环境需安装Visual Basic 2005软件3.6测试要点对播放器的每个功能都需要逐一测试,具体要求是:1.对播放功能的各个控件功能进行测试2.对歌曲列表管理功能进行测试3.对音量设置功能进行测试,包括音量测试,和左右声道功能测试4.对不同的播放模式进行测试,看能否实现音乐的顺序播放,随机播放,单曲循环功能.。

VB课程设计(论文)任务书土木建筑学院土木工程专业 4 班一、课程设计(论文)题目：小人移动二、课程设计(论文)工作自2014 年 6 月16日起至 2014 年6 月 22 日止三、课程设计(论文) 地点: 计算中心8#605四、课程设计(论文)内容要求：1. 本课程设计的目的（1）进一步巩固和加深对“VB程序设计”课程基本知识的理解和掌握，了解VB语言在项目开发中的应用。

（2）学习程序设计开发的一般方法，了解和掌握项目开发过程及方式，培养正确的设计思想和分析问题、解决问题的能力，特别是项目设计能力。

（3）通过对标准化、规范化文档的掌握并查阅有关技术资料等，培养项目设计开发能力。

2. 课程设计的任务及要求(1) 基本要求：（1）对系统功能进行需求分析；（2）使用Visual basic开发环境进行程序开发；（3）提出系统的设计方案；（4）编写源程序代码并进行调试。

(2) 创新要求在基本要求达到后，可进行创新设计。

(3) 课程设计报告撰写及装订要求课程设计报告的撰写要求表述简明，图表准确。

报告按如下内容和顺序用A4纸进行打印并装订成册。

（1）封面采用统一的课程设计封面，并按要求填写好封面要求的个人信息和选题。

（2）设计任务书（3）评阅书（4）目录（5）正文（6）主要参考文献(4) 课程设计评分标准：（1）达到课程设计的目的与要求，程序的可读性较好，并调试正确，60分；（2）能正确回答设计的中老师所提问题，可增加10分；（3）课程设计报告书写规范整齐，可增加10分；（4）心得体会认真总结，可增加10分；（5）程序有创新性，可增加10分；成绩评定实行优秀、良好、中等、及格和不及格五个等级。

不及格者需重做。

(5) 课程设计进度安排华东交通大学VB课程设计报告（1）准备阶段（6学时）：选择设计题目、了解设计目的要求、查阅相关资料。

（2）程序模块设计分析阶段（8学时）：程序总体设计、详细设计。

(3) 代码编写调试阶段（10学时）：程序模块代码编写、调试、测试。

vb课程设计实践报告一、教学目标本课程的教学目标是让学习者掌握Visual Basic编程语言的基本语法、编程技巧以及数据库访问技术。

通过本课程的学习，学生应能设计并实现简单的应用程序，为后续的软件开发学习打下坚实的基础。

具体来说，知识目标包括：1.理解Visual Basic编程语言的基本概念和语法。

2.掌握常用的数据类型、运算符和表达式。

3.学会使用Visual Basic的窗体和控件。

4.掌握事件驱动编程的基本概念。

5.理解并能够使用Visual Basic进行数据库访问。

技能目标则要求学生：1.能够使用Visual Basic编写简单的程序。

2.能够使用Visual Basic进行数据库的连接和操作。

3.能够对程序进行调试和优化。

情感态度价值观目标则在于培养学生的创新精神和团队合作意识，通过完成项目任务，使学生感受到编程的乐趣，增强对计算机科学的热爱。

二、教学内容本课程的教学内容主要包括Visual Basic的基本语法、数据类型、控制结构、窗体和控件、以及数据库访问技术。

具体的教学大纲安排如下：1.课程引言：介绍Visual Basic的发展历程和应用领域。

2.基本语法：变量、数据类型、运算符、表达式等。

3.控制结构：条件语句、循环语句等。

4.窗体和控件：窗体的基本属性、控件的属性和事件等。

5.数据库访问：使用ADO对象进行数据库的连接和操作。

三、教学方法为了提高教学效果，将采用多种教学方法相结合的方式进行教学。

包括：1.讲授法：用于讲解基本语法和概念。

2.案例分析法：通过分析具体的案例，使学生理解编程思想和方法。

3.实验法：安排上机实验，让学生亲手编写代码，提高实践能力。

四、教学资源为了支持教学，将准备以下教学资源：1.教材：《Visual Basic编程教程》。

2.参考书：提供相关的编程书籍，供学生课后自学。

3.多媒体资料：制作教学PPT，辅助讲解。

4.实验设备：提供计算机实验室，让学生进行上机实验。

沈阳航空航天大学课程设计任务书学院：机电工程学院专业：机械设计制造及其自动化班级：04060101 学号：2010040601034 题目：“冒泡法”排序的动漫演示一、课程设计时间2012年3月5~9日（第一周），共计一周，20学时。

二、课程设计内容用控件数组技术实现动画，演示用冒泡法对数组（18,12,16,10,11,19）由小到大排序，元素变换的完整过程。

要求：准备换值的2个元素，使用明显颜色，闪烁效果。

三、课程设计要求程序质量：✧贯彻事件驱动的程序设计思想。

✧用户界面友好，功能明确，操作方便；可以增加其它功能或修饰。

✧代码应适当缩进，并给出必要的注释，以增强程序的可读性。

课程设计说明书：✧课程结束后，上交课程设计说明书和源程序。

课程设计说明书的内容参见提供的模板。

四、指导教师和学生签字指导教师：______ 学生签名：_____五、成绩六、教师评语目录需求分析 (4)设计分析 (4)技术要点 (5)主要界面截图 (6)总结 (7)完整的源程序 (8)参考文献 (12)一．需求分析题目要求用“冒泡法”对一组数据进行由小到大排序，并且动画演示排序过程中元素变换的过程。

也就是表示，比较相邻两个数大小和交换过程要可见，并用明显的颜色来区分正在比较的两个数字。

颜色的变换、数字的交换实现了动画的效果.二．设计分析1·基本原理：“冒泡法”排序——使用Label，Timer控件。

分别用来进行数组的输入和控制程序的运行。

2·总体设计思想：（1）从第一个元素开始，对数组中两辆相邻的元素比较，Label(0)与Label (1)比较，若为逆序，则Label (0)与Label (1)交换；然后Label (1) 与Label (2)比较，···，直到最后Label (N-1) 与Label (N)比较，这时一轮比较完毕，一个最大的数“沉底”，成为数组中的最后一个元素Label (N)，一些较小的数如同气泡一样“上浮”一个位置。

vb课程设计报告一、课程目标本vb课程设计旨在达成以下学习目标：1. 知识目标：学生掌握VB编程基础知识，理解面向对象编程思想，熟悉VB 开发环境及相关工具的使用。

具体包括：- 掌握VB基本语法和数据类型；- 学会使用VB控制结构，如循环、分支等；- 理解VB中事件驱动编程原理；- 了解VB中常用控件的使用方法和属性设置。

2. 技能目标：学生能够运用所学知识，独立设计并编写简单的VB程序，培养解决实际问题的能力。

具体包括：- 能够编写具有基本功能的VB程序，如计算器、文本编辑器等；- 能够运用面向对象编程思想，设计简单的类和对象；- 能够分析问题，运用VB编程解决实际问题。

3. 情感态度价值观目标：培养学生对编程的兴趣，提高逻辑思维能力和团队协作能力。

具体包括：- 增强学生对编程的热爱，激发学习动力；- 培养学生独立思考、解决问题的习惯；- 培养学生团队协作精神，学会与他人分享和交流。

课程性质：本课程为实践性较强的学科，注重培养学生的动手能力和实际应用能力。

学生特点：学生年级为初中或高中，具备一定的计算机操作基础，对编程有一定的好奇心和兴趣。

教学要求：结合学生特点和课程性质，采用任务驱动法，以实际项目为导向，让学生在实践中掌握VB编程知识，提高编程能力。

同时，注重培养学生的逻辑思维和团队协作能力，为后续学习打下坚实基础。

二、教学内容根据课程目标，本章节教学内容如下：1. VB基本语法和数据类型- 数据类型：整数型、浮点型、字符串型等；- 变量和常量的声明与使用；- 运算符和表达式。

2. VB控制结构- 条件语句：If...Then...Else和Select Case；- 循环语句：For...Next，While...Wend和Do...Loop。

3. VB事件驱动编程- 事件和事件过程的概念；- 鼠标和键盘事件；- 窗体和控件事件。

4. VB常用控件- 文本框、标签、按钮等基本控件的使用；- 列表框、组合框、图片框等高级控件的使用；- 控件属性的设置。

课程设计(论文)任务书学院专业班一、课程设计(论文)题目二、课程设计(论文)工作自10 年6月20日起至08 年 6 月30 日止。

三、课程设计(论文) 地点:四、课程设计(论文)内容要求：1．本课程设计的目的1. 综合Visual Basic相关知识制作简单的可视化应用程序2. 灵活对程序代码进行利用，修改和编写；3. 熟练将Visual Basic所学知识和其它知识相结合2．课程设计的任务及要求1）基本要求：1、目的是进一步培养学生综合应用VB的各种编程知识和技巧进行程序设计的能力。

通过课程设计，学生能达到具备设计功能较为复杂的Windows应用程序的能力。

2、至少多窗体界面（3-5个窗体）3、使用菜单、数组、文件操作、图形操作等制试点。

；4、对运算结果的正、误分析原因。

2）课程设计论文编写要求（1）要按照书稿的规格打印誊写毕业论文（2）论文包括目录、绪论、正文、小结、参考文献、谢辞、附录等（3）毕业论文装订按学校的统一要求完成3）参考文献：1:《Visual Basic程序设计教程》作者: 刘炳文、许蔓舒编著。

清华大学出版社2:《Visual Basic程序设计教程》（第二版）作者: 刘瑞新等编著，电子工业出版社3:《新编Visual Basic程序设计教程》作者: 梁普选主编，电子工业出版社4）课程设计进度安排内容天数地点查阅资料 2 图书馆系统设计 5 15-701编程与调试 3 15-701检查程序及提问（考核） 1 8-501学生签名：10 年6月20日课程设计(论文)评审意见（1）完成分析（20分）：优（）、良（）、中（）、一般（）、差（）；（2）设计过程（40分）：优（）、良（）、中（）、一般（）、差（）；（3）完成调试（20分）：优（）、良（）、中（）、一般（）、差（）；（4）回答问题（20分）：优（）、良（）、中（）、一般（）、差（）；（5）格式规范性及考勤是否降等级：是（√）、否（）评阅人：职称：讲师10 年6月30日电信计费管理系统一、开发简介（一）背景本学期系统学习了VB程序设计课程，按照惯例，在学期结束时进行VB程序设计课程软件的开发，也就是本次课程设计。

用VB制作一个简单的MP3播放器
用API函数[mciSendString]可以轻松实现MP3音乐文件的播放。

下面这段程序实现了MP3播放的大部分常规操作，对其稍加修改，做一个100KB大小的MP3播放器轻而易举
启动VB程序，在窗体上放置6个命令按钮，三个标签，一个公用对话框、一个进度条、一个状态栏和一个计时器，窗本的布置请参考附图
按钮"Open MP3 File"是用来打开对话框选择MP3文件，其他5个按钮分别为Play(播放)、Pause(暂停)、Stopplay(停止播放)、Back(向后跳跃)、Prew(向前跳跃)。

Label1用来表示歌曲当前时间；label2放在时度条的最左边，Caption属性为"00：00"；lable3放在时度条的右边，用来表示歌曲总长。

下面就可以编写代码了。

首先在窗体的"通用声明"部分声明函数
下面就是各个对象的代码了：
察看评论详细内容我要发表评论
2回顶部
察看评论详细内容我要发表评论
3回顶部
图中5个控制按钮，其实是把字体设为"Webdings"，让它们的Caption属性分别为"4" ";" "<" "7" "8"
就可以了。

vb课程设计实践报告一、教学目标本课程的教学目标是使学生掌握VB编程的基础知识，培养学生运用VB解决实际问题的能力。

具体分为三个部分：1.知识目标：学生需要掌握VB的基本语法、数据类型、变量、常量、运算符、控制结构、函数等编程基础知识和技能。

2.技能目标：学生能够运用VB编写简单的程序，解决实际问题，如计算器、文本排序等。

3.情感态度价值观目标：培养学生对编程的兴趣和主动性，提高学生分析问题、解决问题的能力。

二、教学内容根据教学目标，本课程的教学内容主要包括以下几个部分：1.VB基本语法和数据类型2.变量、常量和运算符3.控制结构：顺序结构、选择结构、循环结构4.函数：数学函数、字符串函数、日期时间函数等5.面向对象编程：类和对象、属性、方法、事件等6.常用控件及其属性和方法7.数据库访问技术三、教学方法为了达到教学目标，本课程将采用以下几种教学方法：1.讲授法：讲解VB的基本语法、数据类型、变量、常量、运算符、控制结构、函数等基础知识。

2.案例分析法：通过分析实际案例，使学生掌握面向对象编程、常用控件及其属性和方法。

3.实验法：让学生动手编写程序，解决实际问题，提高学生的编程能力。

4.讨论法：分组讨论，分享学习心得，互相答疑解惑。

四、教学资源为了支持教学内容和教学方法的实施，我们将准备以下教学资源：1.教材：《VB编程与应用》2.参考书：《VB编程实例教程》3.多媒体资料：教学PPT、视频教程4.实验设备：计算机、网络环境、编程软件以上教学资源将有助于丰富学生的学习体验，提高学生的编程能力。

五、教学评估为了全面、客观、公正地评估学生的学习成果，我们将采取以下评估方式：1.平时表现：评估学生的出勤、课堂参与度、提问回答等情况，占总成绩的20%。

2.作业：布置适量的作业，评估学生的编程能力和应用能力，占总成绩的30%。

3.考试：进行期中和期末考试，评估学生对VB基础知识和技能的掌握程度，占总成绩的50%。

计算机课程设计报告题目系别年级专业班级学号学生姓名指导教师设计时间目录第一章前言 (2)1. 1 选题背景1. 2 选题意义1. 3 具体功能及亮点第二章功能需求分析 (3)2. 1编程环境的选择2. 2系统可行性第三章系统设计和实现 (4)3. 1设计方案2. 2具体代码3. 3技术问题及解决方法3. 4系统设计亮点3. 5设计参考文献第四章结束语 (5)附录1 (6)第一章前言1. 1 选题背景任何学科的发展都与当时的环境和条件紧密相联。

管理信息系统也是一样，在人类进入工业社会以后，出于对生存与发展的需要，人们开始尝试使用更先进的设备和技术来处理和使用设备来解决现实中遇到的问题,从实际求出发，针对性强，功能齐备，旨在通过提高系统信息管理实现信息化，以提高企业管理的效率1. 2 选题意义随着人员流动规模的不断扩大，面对庞大的信息量，就需要有信息管理系统来提高管理工作的效率。

通过这样的系统，我们可以做到信息的规范管理和快速查询，从而减少了管理方面的工作量。

为了建立良好的管理秩序，在信息化时代充分利用计算机作为管理手段提高管理水平和业务处理，为了避免别人盗用篡改他人的身份，所以设计登录界面用户密码认证很有必要。

提供良好的人机交互界面，操作简单快捷，可以对大量管理信息进行处理，检索迅速，查找方便，可靠性高。

1. 3 具体功能及亮点该登录界面设计实现了一个用户名多次登录及禁止登录功能，按“确定”或“取消”按钮后，会有系统提示再次确定；当用户名或密码为空时，系统提示不能登录。

并且设置了建立新用户功能，方便直接增加用户，两次输入密码设置，更安全。

当选中添加新用户的时候，Command2显示“注册”；当没有选中添加新用户的时候，Command2显示“登录”。

为了使页面美观大方，页面颜色为绿色，并插入图片美观。

窗体被设置成一出来就位于页面中央，去除边框。

第二章功能需求分析2. 1编程环境的选择微软公司的Visual Basic 6.0是Windows应用程序开发工具，使目前最为广泛的,易学易用的面向对象的开发工具。

沈阳航空航天大学课程设计任务书学院：机电工程专业：机械设计制造及其自动化班级：04060101 学号：2010040601019 题目：模仿记事本程序一、课程设计时间2012年3月5~9日（第1周），共计1周，20学时。

二、课程设计内容Windows系统的记事本程序是一个纯文本的编辑软件。

要求模仿该程序，实现它的如下基本功能：文本的编辑、文件的保存与打开、文字的字体（包括字形、大小、颜色）的设置；其它功能则不要求。

三、课程设计要求程序质量：✧贯彻事件驱动的程序设计思想。

✧用户界面友好，功能明确，操作方便；可以加以其它功能或修饰。

✧代码应适当缩进，并给出必要的注释，以增强程序的可读性。

课程设计说明书：✧课程结束后，上交课程设计说明书和源程序。

课程设计说明书的内容参见提供的模板。

四、指导教师和学生签字指导教师：________ 学生签名：________五、成绩六、教师评语目录需求分析 (4)设计分析 (4)技术要点 (6)主要界面截图 (8)总结 (9)完整的源程序 ............... 错误！未定义书签。

参考文献 .. (13)需求分析模仿记事本,即模仿记事本对文本输入，更改，打开，保存，以及对所输入文字进行编辑的程序。

要求：1、界面简单易操作2、能实现文件的打开，保存、文本的编辑，对文字的字体（包括字形、大小、颜色）的设置设计分析（1）概述：在程序设计上主要使用了用户界面设计的技术，包括菜单编辑，弹出式菜单的设计，通用对话框的使用，以及文件的保存与读取（2）总体设计：（3）详细设计：技术要点1关于程序的加载，以及对文本框大小定义Private Sub Form_Load() Me.Height = 6000 Me.Width = 9000 End SubPrivate Sub Form_Resize() 利用resize事件调整文本框大小 On Error Resume Next ' text1.Move 0, 0, ScaleWidth, ScaleHeightEnd Sub2右键弹出式菜单Private Sub text1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)If Button = 2 Then PopupMenu edit, vbpopupmenucenteralifgnEnd Sub3利用通用对话框和文件读写实现文件的保存与打开Private Sub open_Click() 打开 OnErrorResumeNext CommonDialog1.Action=1text1.Text = ""Open CommonDialog1.FileName For Input As #1 Do While Not EOF(1)Line Input #1, inputdate text1.Text = text1.Text + inputdate + vbCrLfLoopClose #1 End SubPrivate Sub savedate_Click() 保存 On Error Resume NextCommonDialog1.FileName = "新建文本文件.Txt" CommonDialog1.DefaultExt = "文本文档（*.txt)"CommonDialog1.Action = 2 Open CommonDialog1.FileName For Output As #1 Print #1, text1.TextClose #1 End Sub4利用sendkeys语句完成撤销，粘贴，复制，剪切等功能Private Sub copy_Click() 以复制为例 If text1.SelLength > 0 Then SendKeys ("^c")End Sub5使用通用对话框队选中文字进行字体、大小等内容的编辑Private Sub font_Click() CommonDialog1.Flags = cdlCFBoth Or cdlCFEffects CommonDialog1.Action = 4 If text1.SelLength > 0 Thentext1.SelFontName = CommonDialog1.FontName text1.SelFontSize = CommonDialog1.FontSizetext1.SelBold = CommonDialog1.FontBoldtext1.SelItalic = CommonDialog1.FontItalictext1.SelStrikeThru = CommonDialog1.FontStrikethrutext1.SelUnderline = CommonDialog1.FontUnderlinetext1.SelColor = CommonDialog1.colorEnd IfEnd Sub6利用msgbox实现功能在新建文件时弹出对话框询问是否保存主要界面截图图1.主界面运行情况图2.msgbox运行情况图3.通用对话框运行总结这次为期一周的课程设计结束了，虽然很短但是却给我留下了很深刻的影响。

VB课程设计报告V B课程设计报告题目：图书馆管理系统指导老师：吴志强老师班级： 10410111学号：姓名：黄流华时间： 12月20日目录1、课程设计目的2、课程设计题目3、课程设计要求4、课程设计说明5、源代码6、运行结果7、课程设计体会1、课程设计目的课程设计为学生提供了一个既动手又动脑，独立实践的机会，将课本上的VB理论知识和实际有机的结合起来，锻炼学生的分析解决实际问题的能力，提高用VB编程实现具体问题的能力。

2、课程设计题目图书馆管理系统3、课程设计要求：用户登陆、图书的借阅和归回、图书信息的添加、修改、查询和删除操作。

4、课程设计说明根据对我院图书馆及图书信息进行的调查和分析,图书管理系统应该具有以下功能：系统管理（即登录）、图书管理、还书和借书操作。

各个功能模块如下：a、系统管理模块在这个模块，能够进行登录和退出等操作。

b、图书管理模块在这个模块，能够进行增加、删除、修改、查找、上一个和下一个。

C、还书和借书模块在这个模块，能够完成借书、还书操作。

d、报表模块5、图书管理信息系统的数据库设计系统数据库名为Data，数据库中包括（1）图书信息表；（2）借出图书信息表；（3）归还图书信息表1、图书信息表的数据结构2、借出图书信息表字段名类型大小空值描述输入借出图书编号nvarchar10 y 输入借出图书编号图书编号nvarchar10 y 图书编号价格real 4 y 价格类别nvarchar 10 类别书名nvarchar 30 y 书名出版社nvarchar 30 出版社今天日期smalldatetime 4 y 今天日期3、归还图书信息表字段名类型大小空值描述图书编号nvarchar 10 y 图书编号书名nvarchar30 y书名价格real 4 y价格出版社nvarchar30 y出版社借出日期smalldatetime 4 y借出日期类别nvarchar10 类别借出天数smalldatetime 2 y 借出天数限定天数Text 4 y 限定天数超出天数Text 4 y 超出天数罚款金额Text 5 y 罚款金额今天日期Text 5 y 今天日期输入要还的图书编号nvarchar 10 y 输入要还的图书编号。