.net程序设计报告1
.net课程设计实验报告
实验目的通过软件开发的实践训练，进一步了解软件工程的方法和技术，提高软件开发的实际能力，培养工程设计能力和综合分析、解决问题的能力。
具体如下：1.学习和实践面向对象的系统分析与设计，编码和测试方面的知识；2.熟悉自动化的软件开发工具SQLServer2008，Visual Studio2012,并将其运用于软件开发的全过程；3.进一步加强和提高软件工程文档的编写能力。
实验内容:概述1.课题题目：招生收费系统2.功能：专业管理、收费管理。
3.软件开发工具：SQLServer2008、Visual Studio 2012。
4.操作系统：Win7。
系统需求分析本软件访问、修改、删除数据库中的数据。
对专业信息的查询增删改，对学生专业的确认以及修改，对学生进行收费管理。
功能描述主要功能在客户端浏览器体现。
客户端完成数据查询、输入、修改、删除等简单功能，大部分工作要有服务器承担，包括对数据的保存。
1.专业管理：通过对招生季节和招生年度查询专业信息，且还可以对其进行添加、删除、修改。
2.收费管理：通过招生季节、招生年度及准考证号查询学生信息和学费信息；选择专业可以查看报该专业的学费信息。
系统功能模块图:设计(一)数据库设计专业信息表：收费信息表：学生信息表：(二)实验界面1）专业信息管理界面2）招生专业管理界面3）招生收费管理界面（三）实验主要代码1）专业信息管理代码：int k;///<summary>///运用了实体框架，声明上下文///</summary>WebEntities _context = new WebEntities();protected void Page_Load(object sender, EventArgs e){btnDelete.Attributes.Add("onclick", "return confirm('确实要删除吗？');"); gvTable.DataSource = _context.majors.ToList();gvTable.DataBind();}///删除按钮///</summary>///<param name="sender"></param>///<param name="e"></param>protected void btnDelete_Click(object sender, EventArgs e){for (int i = 0; i < this.gvTable.Rows.Count; i++){k = 0;string id = this.gvTable.Rows[i].Cells[4].Text;CheckBox cb = this.gvTable.Rows[i].FindControl("CheckBox1") as CheckBox;if (cb.Checked){Delete(id);k++;}}if (k == 0){Response.Write("<script type='text/javascript'>alert('请选择要删除的记录！')</script>");}elseResponse.Write("<script type='text/javascript'>alert('删除成功！')</script>");}///<summary>///刷新///</summary>///<param name="sender"></param>///<param name="e"></param>protected void btnRefresh_Click(object sender, EventArgs e){Response.Write("<script type='text/javascript'>alert('刷新成功！')</script>");Response.Redirect("WebForm1.aspx");}///删除函数///</summary>///<param name="id"></param>public void Delete(string id){string ConString = "Data Source=ACER-PC\\SQLEXPRESS;InitialCatalog=Web;Integrated Security=True";SqlConnection conn = new SqlConnection(ConString);conn.Open();SqlCommand cmd = new SqlCommand("delete from 专业信息 where 专业代码=" + id, conn);cmd.ExecuteNonQuery();conn.Close();}///<summary>///添加按钮///</summary>///<param name="sender"></param>///<param name="e"></param>protected void btnAdd_Click(object sender, EventArgs e){Response.Redirect("WebForm2.aspx");Response.Write("<script type='text/javascript'>alert('添加成功！')</script>");}}新增专业信息代码段：///<summary>///运用了实体框架，声明上下文///</summary>WebEntities _context = new WebEntities();protected void Page_Load(object sender, EventArgs e){}///添加按钮///</summary>///<param name="sender"></param>///<param name="e"></param>protected void btnAdd_Click(object sender, EventArgs e){string专业代码 = TextBox15.Text.Trim().ToString();string招生年度 = TextBox1.Text.Trim().ToString();string招生季节 = TextBox2.Text.Trim().ToString();string Id = TextBox14.Text.Trim().ToString();string专业名 = TextBox3.Text.Trim().ToString();string学制 = TextBox4.Text.Trim().ToString();string学院 = TextBox16.Text.Trim().ToString();string国际专业代码 = TextBox17.Text.Trim().ToString();string学费 = TextBox18.Text.Trim().ToString();string住宿费 = TextBox19.Text.Trim().ToString();string书本费 = TextBox20.Text.Trim().ToString();string代收费 = TextBox21.Text.Trim().ToString();major Major = new major(){MajorCode = 专业代码,EnrolYear = 招生年度,EnrolSeason = 招生季节,MajorID = Id,MajorName = 专业名,EduLength = 学制,SchoolName = 学院,NationalMajorNo = 国际专业代码,Tuition = 学费,RoomMoney = 住宿费,TextBookMoney = 书本费,AgencyMoney = 代收费,};_context.majors.Add(Major);_context.SaveChanges();Response.Write("<script type='text/javascript'>alert('添加成功！')</script>");Response.Redirect("WebForm1.aspx");}///<summary>///重置按钮///</summary>///<param name="sender"></param>///<param name="e"></param>protected void btnRe_Click(object sender, EventArgs e){TextBox15.Text = "";TextBox1.Text = "";TextBox2.Text = "";TextBox14.Text = "";TextBox3.Text = "";TextBox4.Text = "";TextBox16.Text = "";TextBox17.Text = "";TextBox18.Text = "";TextBox19.Text = "";TextBox20.Text = "";TextBox21.Text = "";Response.Write("<script type='text/javascript'>alert('重置成功！')</script>");}}2）招生专业管理代码：///<summary>///采用实体框架，声明上下文///</summary>WebEntities _context = new WebEntities();protected void Page_Load(object sender, EventArgs e){if (!IsPostBack){ddlSchoolName.DataSource =_context.major.Select(m=>m.SchoolName).Distinct().ToList();ddlSchoolName.DataBind();}}protected void ddlSchoolName_SelectedIndexChanged(object sender, EventArgs e) {string SchoolName = ddlSchoolName.SelectedValue.ToString();ddlMajorName.DataSource =_context.major.Where(m=>m.SchoolName==SchoolName).ToList();ddlMajorName.DataBind();}///<summary>///考生查询///</summary>///<param name="sender"></param>///<param name="e"></param>protected void btnQuery_Click(object sender, EventArgs e){try{string ID = txtID.Text.ToString();txtName.Text = _context.message.Where(m => m.ID ==ID).Single().Name.ToString();txtSex.Text = _context.message.Where(m => m.ID ==ID).Single().Sex.ToString();txtWantMajor.Text = _context.message.Where(m => m.ID ==ID).Single().WantMajor.ToString();txtMajor.Text = "";}catch(Exception ex){Response.Write("<script type='text/javascript'>alert('不存在该考生！')</script>");}}protected void ddlMajorName_SelectedIndexChanged(object sender, EventArgs e) {string majorId = ddlMajorName.SelectedValue.ToString();txtMajorCode.Text = _context.major.Where(m =>m.MajorID==majorId).Single().MajorCode.ToString();txtEdulength.Text = _context.major.Where(m =>m.MajorID==majorId).Single().EduLength.ToString();}protected void DDLSchoolName_DataBound(object sender, EventArgs e){string SchoolName = ddlSchoolName.SelectedValue.ToString();ddlMajorName.DataSource = _context.major.Where(m => m.SchoolName == SchoolName).ToList();ddlMajorName.DataBind();}protected void ddlMajorName_DataBound(object sender, EventArgs e){string majorId = ddlMajorName.SelectedValue.ToString();txtMajorCode.Text = _context.major.Where(m => m.MajorID ==majorId).Single().MajorCode.ToString();txtEdulength.Text = _context.major.Where(m => m.MajorID ==majorId).Single().EduLength.ToString();}///<summary>///确认专业///</summary>///<param name="sender"></param>///<param name="e"></param>protected void btnSure_Click(object sender, EventArgs e){string majorId = ddlMajorName.SelectedValue.ToString();txtMajor.Text = _context.major.Where(m => m.MajorID ==majorId).Single().MajorName.ToString();message student = new message(){ID = txtID.Text.ToString(),Name = txtName.Text.ToString(),Sex = txtSex.Text.ToString(),WantMajor = txtWantMajor.Text.ToString(),MajorName = txtMajor.Text.ToString()};_context.message.Attach(student);_context.Entry<message>(student).State = System.Data.EntityState.Modified; _context.SaveChanges();Response.Write("<script type='text/javascript'>alert('确认专业成功！')</script>");}///<summary>///收费管理///</summary>///<param name="sender"></param>///<param name="e"></param>protected void btnCharge_Click(object sender, EventArgs e){string ID = txtID.Text.ToString();message student = new message();student = _context.message.FirstOrDefault(m => m.ID ==ID);if (student.MajorName == null){Response.Write("<script type='text/javascript'>alert('未确定专业')</script>");}else{Response.Write("<scripttype='text/javascript'>window.open('WebForm2.aspx')</script>");}Session["message"] = student;}}3）招生收费管理代码：///<summary>///采用实体框架，声明上下文///</summary>WebEntities _context = new WebEntities();protected void Page_Load(object sender, EventArgs e){if (!IsPostBack){message student = (message)Session["message"];txtID.Text= student.ID;txtName.Text = .ToString();txtSex.Text = student.Sex.ToString();txtMajorName.Text = student.MajorName.ToString();major Major = new major();txtxf.Text = _context.major.Where(m => m.MajorName ==student.MajorName).Single().Tuition.ToString() ;txtzsf.Text=_context.major.Where(m => m.MajorName ==student.MajorName).Single().RoomMoney.ToString();txtjcf.Text=_context.major.Where(m => m.MajorName ==student.MajorName).Single().TextBookMoney.ToString();txtdsf.Text = _context.major.Where(m => m.MajorName ==student.MajorName).Single().AgencyMoney.ToString();txtcost.Text = (Convert.ToInt32(txtxf.Text) + Convert.ToInt32(txtzsf.Text) + Convert.ToInt32(txtjcf.Text) + Convert.ToInt32(txtdsf.Text)).ToString();}}//转换成大写#region转换成大写public static string ConvertToCn(decimal num){string str1 = "零壹贰叁肆伍陆柒捌玖"; //0-9所对应的汉字string str2 = "万仟佰拾亿仟佰拾万仟佰拾元角分"; //数字位所对应的汉字string str3 = ""; //从原num值中取出的值string str4 = ""; //数字的字符串形式string str5 = ""; //人民币大写金额形式int i; //循环变量int j; //num的值乘以100的字符串长度string ch1 = ""; //数字的汉语读法string ch2 = ""; //数字位的汉字读法int nzero = 0; //用来计算连续的零值是几个int temp; //从原num值中取出的值num = Math.Round(Math.Abs(num), 2); //将num取绝对值并四舍五入取2位小数str4 = ((long)(num * 100)).ToString(); //将num乘100并转换成字符串形式 j = str4.Length; //找出最高位if (j > 15) { return"溢出"; }str2 = str2.Substring(15 - j); //取出对应位数的str2的值。
C#.NET程序设计实验一实验报告
C#.NET程序设计实验⼀实验报告实验⼀语⾔基础⼀、实验⽬的1. 熟悉Visual 实验环境；2. 掌握控制台程序的编写⽅法；3. 掌握C#程序设计语⾔的语法基础；4. 掌握控制语句和数组的使⽤。
⼆、实验要求根据题⽬要求，编写 C#程序，并将程序代码和运⾏结果写⼊实验报告。
三、实验内容1. 编写⼀个控制台应⽤程序，输⼊三⾓形或者长⽅形边长，计算其周长和⾯积并输出。
源码:主函数部分static void Main1_1(string[] aa){//定义三⾓形边长，矩形长和宽，以及周长和⾯积int i;double tri1, tri2, tri3;double rec1, rec2;double cir, area;//系统编写Console.WriteLine("--------------------⼏何图形周长、⾯积计算-----------------");while (true){Console.WriteLine("请选择图形样式：");Console.WriteLine(" 1.三⾓形 2.矩形 3.退出 ");Console.WriteLine("请输⼊对应序号:");//这⾥不知道什么原因。
需要回车两次才能继续。
i = int.Parse(Console.ReadLine());switch (i){//三⾓形算法case 1:Console.WriteLine("请输⼊所求三⾓形的第⼀条边的长度：");tri1 = float.Parse(Console.ReadLine());Console.WriteLine("请输⼊所求三⾓形的第三条边的长度：");tri3 = float.Parse(Console.ReadLine());cir = tri1 + tri2 + tri3;//周长area = Math.Sqrt(cir / 2 * (cir / 2 - tri1) * (cir / 2 - tri2) * (cir / 2 - tri3));//⽆法将double隐式转换为float,之前⽤的float类型的边长等,sqrt函数返回为double Console.WriteLine("该三⾓形的周长为：{0}", cir);Console.WriteLine("该三⾓形的⾯积为：{0}", area);break;case 2:Console.WriteLine("请输⼊所求矩形的⼀条边的长度：");//⽤户依次输⼊三个边长 rec1 = float.Parse(Console.ReadLine());Console.WriteLine("请输⼊所求矩形的另⼀条边的长度：");rec2 = float.Parse(Console.ReadLine());cir = 2 * (rec1 + rec2); //长⽅形周长及⾯积area = rec1 * rec2;Console.WriteLine("该矩形的周长为：{0}", cir);Console.WriteLine("该矩形的⾯积为：{0}", area);break;case 3:Console.WriteLine("正在退出.....");Console.WriteLine("退出成功！");break;default:Console.WriteLine("输⼊有误，请输⼊1或2或3");break;}//判断是否退出系统if (i == 3)break;}}2. 编写⼀个控制台应⽤程序，可根据输⼊的⽉份判断所在季节。
.NET程序设计期末大作业实验报告
.NET程序设计实验报告班级：物联1302学号：姓名：高华成绩：_________一、实验名称：多功能文件助手（包含文件分割、合并、压缩、解压等功能）二、实验目的：1、设计并实现一个多功能文件助手的软件。
该软件拥有文件分割、文件合并、文件压缩、文件解压缩的功能。
2、文件分割与文件合并功能可以根据用户指定的文件大小将大文件分割为若干个容量相同的小文件并可将这些小文件合并为原始文件。
3、文件压缩和文件解压缩功能可以使用文件的GZip压缩的方法进行文件的压缩和解压操作。
4、代码易读，软件界面友好，使用合适的控件，操作简便。
三、实验过程和算法描述程序功能简述1、用户界面设计界面使用选项卡控件即TabControl控件分为分割、合并、GZip压缩、Gzip 解压四部分（截图如下）（1）主界面窗体属性如下表：（2）选项卡控件即TabControl控件的Name属性设置为tabSel。
Appearance属性设置为Normal。
然后设置TabPages属性，单击该属性弹出“TabPage集合编辑器”对话框，设置连个选项卡。
Name属性分别为pageSplit和pageMerge；Text属性分别为“文件分割”和“文件合并”。
（注：另外三个选项卡的主要控件及其主要属性设置与本页遵循相同的规则，此处不再加以罗列。
）2、算法设计1)文件分割上流程图中编写代码处理文件分割为核心代码区，程序确定徐分割的原文件及分割的单位后，计算得出该原文件分割后应得到的文件数目，并以源文件的名链接小文件序号作为小文件的名称。
然后，通过创建BinaryReader 实例从源文件以小文件的大小读取数据，并通过创建BinaryWriter实例想创建的小文件中写入数据，循环此操作，最终实现把源文件分割成多个小文件。
2)文件合并文件合并操作中，用户需选择分割文件中编号为“0001”的小文件，通过Directory类的GetFiles找到源文件所在目录中文件名汁编号不同的所有文件，计算得出该类型文件的数目，通过循环按此目录文件名称的顺序读取文件形成数据流，并使用BinaryWriter不断追加，循环结束即合并文件完成。
.net实验报告
.net实验报告.net实验报告引言：在计算机科学领域，.NET是一种广泛使用的开发框架，它提供了一系列工具和技术，用于构建各种类型的应用程序。
本实验报告旨在介绍我对.NET框架的实验研究和应用。
一、实验目的通过本次实验，我旨在探索和理解.NET框架的基本概念和功能，以及其在应用程序开发中的应用。
具体目标包括：1. 理解.NET框架的架构和组成部分；2. 学习使用.NET框架开发应用程序的基本步骤；3. 实践编写一个简单的.NET应用程序；4. 探索.NET框架在不同领域的应用案例。
二、实验过程1. 理解.NET框架的架构和组成部分在开始实验之前，我首先学习了.NET框架的基本架构和组成部分。
我了解到.NET框架由两个主要组成部分构成：公共语言运行时（CLR）和框架类库。
CLR是.NET框架的核心，它负责管理和执行应用程序的代码。
框架类库则提供了大量的可重用代码和功能，方便开发人员进行应用程序的开发。
2. 学习使用.NET框架开发应用程序的基本步骤接下来，我学习了使用.NET框架开发应用程序的基本步骤。
首先，我需要选择一种.NET编程语言，如C#或。
然后，我需要创建一个新的项目，并选择适当的应用程序类型，如控制台应用程序或Windows窗体应用程序。
接着，我可以开始编写代码，利用框架类库提供的功能实现应用程序的需求。
最后，我需要编译和运行应用程序，以验证其功能和正确性。
3. 编写一个简单的.NET应用程序为了实践所学，我决定编写一个简单的.NET应用程序。
我选择了C#作为编程语言，并创建了一个控制台应用程序。
在这个应用程序中，我实现了一个简单的计算器，可以进行基本的加减乘除运算。
通过编写代码并调用.NET框架提供的数学函数，我成功地实现了这个功能。
在编写和调试过程中，我深刻体会到了.NET框架的强大和便捷之处。
4. 探索.NET框架在不同领域的应用案例为了更深入地了解.NET框架的应用范围，我进行了一些研究并发现了一些有趣的应用案例。
合工大.net程序设计与系统开发实验报告
《.NET程序设计与系统开发》课程实验报告姓名(学号)分工成绩实验时间2016实验地点专业电子商务13-01班所在学院管理学院指导老师一、实验目的实验一：C#语法基础实验配合课程教学，通过实际上机练习，熟练掌握和运用C#基本语法，能运用它进行控制台应用程序设计；熟悉VISUAL 开发平台；熟悉控制台应用程序的调试经验和技巧。
实验二：C#语法高级实验进一步熟悉和掌握C#语言，增强程序调试经验和技巧；锻炼综合运用所学知识能力，能设计和解决适当问题。
二、实验要求实验一：C#语法基础实验实现实验内容提要中规定的各项需求；独立（或合作或在别人协助下或老师指导下）创造性地完成实验，严禁抄袭；实验结束，提交实验报告。
基于VISUAL 平台开展实验，学会如何建立控制台应用的项目工程。
掌握以下语法知识：（1）数据类型；（2）运算符、表达式、语句；（3）数组、字符串、迭代器；（4）异常处理与预处理指令；（5）类与接口；（6）事件与委托。
实验二：C#语法高级实验实现实验内容提要中规定的各项需求；独立（或合作或在别人协助下或老师指导下）创造性地完成实验，严禁抄袭；实验结束，提交实验报告。
所建工程类型可以为：控制台应用、windows窗体应用、 web应用。
三、实验内容实验一：C#语法基础实验任务1 判断每个输入的数是否可被3，5和7整除，并将整除状态输出。
要求：（1） 掌握VISUAL C#.NET 的基本调试技巧。
演示调试情况，会跟踪变量的值，会设置和取消断点，会跟踪如何进入函数内部（2） 对每个输入数，分别输出对3，5和7的整除状态； （3） 能实现多次输入输出，最好能有一些输入提示； （4） 亦可同时输入和处理多个数，并输出多个数的整除状态。
（5） 考虑使用switch 或if 。
任务2 练习使用for 、while 、do while 、foreach in 等循环语句。
要求：（1） 上述循环语句至少使用1次； （2） 至少有1题采用了string 类实现； （3） 至少有1题采用了集合类实现； 任务3 绘图输出y=a*sin(c*x + b)输出字符三角形A AAA AAAAA AAAAAAA AAAAAAAAAB BBB BBBBB 输出字符菱形A AAA AAAAA AAAAAAA AAAAAAAAA AAAAAAA AAAAA AAA AB BBB BBBBB BBB B输出背靠背字符三角形W W WW WW WWW WWW WWWW WWWW B B BB BB BBB BBB输出交替字符倒三角形STSTS STS SSTSTSTSTSTSTSTSTSTS STSTSTSTSTSTSTSTS STSTSTSTSTSTSTS STSTSTSTSTSTS STSTSTSTSTS STSTSTSTS STSTSTS STSTS STS S要求：（1）系数a, b和c是可以变化的，可考虑是从键盘输入的，或通过Main方法参数传递的；（2）x的取值范围在0~4π之间，x,y值采用四舍五入;提示：根据输入参数，先生成一组数据(x, y)，可考虑循环生成，四舍五入；在相应位置输出*或#。
.net程序设计总结报告
.net程序设计总结报告
.NET程序设计是一种基于微软的软件开发框架，它提供了一系列工具和资源，用于构建和部署各种类型的应用程序。
在进行.NET 程序设计时，开发人员通常会使用C#、等编程语言，利用.NET框架中的类库和组件来实现各种功能。
总结报告中可以包括以下内容：
1. 简要介绍.NET框架的特点和优势，如跨平台性、安全性、可扩展性等。
2. 说明在项目中选择.NET框架的原因，比如易用性、丰富的类库、强大的工具支持等。
3. 描述项目中所使用的.NET框架的具体组件和功能，如用于Web开发、WinForms用于Windows应用程序开发等。
4. 分析在.NET程序设计过程中遇到的挑战和解决方案，比如性能优化、安全性考虑等。
5. 总结.NET程序设计的经验和教训，包括开发过程中的技术选型、团队协作、代码管理等方面的体会。
6. 展望未来，探讨.NET程序设计在新技术趋势下的发展方向和应用场景。
总之，总结报告应该全面、客观地反映项目中.NET程序设计的全貌，包括技术、经验、教训以及对未来的展望。
NET实验报告
燕山大学.net程序设计实验报告
燕山大学.Net程序设计实验报告学院 : 信息科学与工程学院年级专业 : 11级**** : ***学生学号 : **************** : ***提交日期 : 2014年5月24日实验一制作一张课程表一．实验要求：熟悉HTML的基本语法，了解其中各组件的使用。
二、目的原理：在html中运用表格的方法建立一张课程表。
三、实验内容及代码为：<table width="622" height="277" border="1"><tr><td width="97"> </td><td width="97">星期一</td><td width="97">星期二</td><td width="97">星期三</td><td width="97">星期四</td><td width="97">星期五</td></tr><tr><td height="53">1.2</td><td>汇编</td><td>专英</td><td>汇编</td><td>嵌入式</td><td>网络</td></tr><tr><td>3.4</td><td>专英</td><td>嵌入式</td><td>嵌入式</td><td>软件</td><td> </td></tr><tr><td>5.6</td><td>网络</td><td> </td><td>信息管理</td><td> </td><td>专英</td></tr><tr><td>7.8</td><td> </td><td>信息管理</td><td> </td><td> </td><td> </td></tr></table>3.实验截图如下：实验二统计在线人数一．实验要求：掌握控件加事件的开发方法及一般步骤；会使用Form、label、TextBox、CheckBox、Button的基本控件掌握Request、Response的使用。
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
《.Net程序设计》实验报告
电子商务专业班姓名：实验时间：13年05月16日
一、实验目的：
简单程序程序设计，了解程序的基本过程
二、实验内容：
参考第二、三章实例编写简单的程序，要求具备一定的功能和界面。
三、操作步骤：
1.新建项目——“windows应用程序”。
2.选择form1在其属性中设置“BackGroundImage”，导入图片“发射场.jpg”；“Text”
设置为“火箭发射”。
3.在所有windows窗体中选择“Timer1”，添加到form1上，在其属性中设置：“Interval”
为“200”，“Enabled”为“False”。
4.在所有windows窗体中选择“PictureBox”添加，在属性中“Image”，导入图片“火
箭.jpg”.
5.在所有windows窗体中选择“Label1”添加，属性“Text”设置为“6”，“BorderStyle”
设置为“Fixed3D”。
6.在所有windows窗体中选择“Button1”添加，属性“Text”设置为“准备”。
实现需要相应代码：Public Class Form1
Private Sub PictureBox3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles PictureBox3.Click
End Sub
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
x = 400
i1 = Val(TextBox1.Text)
i2 = Val(TextBox2.Text)
i3 = Val(TextBox3.Text)
i0 = i1 + i2 + i3 + i2
Timer1.Interval = 100
End Sub
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
Static i As Integer, dx%
Dim k%
i = i + 1
If i <= i1 * 10 Then
PictureBox4.Image = PictureBox1.Image
k = 1
ElseIf i <= (i1 + i2) * 10 Then
PictureBox4.Image = PictureBox2.Image
k = 2
ElseIf i <= (i1 + i2 + i3) * 10 Then
PictureBox4.Image = PictureBox3.Image
k = 3
ElseIf i <= i0 * 10 Then
PictureBox4.Image = PictureBox2.Image
k = 2
If i = i0 * 10 Then i = 0
End If
If k = 3 Then
If dx < 4 Then dx = dx + 1
Else
If x > 130 Or x < 100 Then
dx = 4
ElseIf x > 120 Then
dx = 3
ElseIf x > 110 Then
dx = 2
ElseIf x > 100 Then
dx = 1
Else
dx = 0
End If
End If
x = x - dx
If x <= -100 Then x = 400
PictureBox5.Left = x
End Sub
End Class
7.运行结果：
8.
四、实验收获和建议：
基本上实现了选课系统的主要内容，并较深入体会了.net的编程过程，尤其是对vb2008中各个控件的使用和操作。
在整个设计阶段感受最为深刻的是掌握学习的方式和解决问题的方法。