vb程序设计实验心得
- 格式:doc
- 大小:23.59 KB
- 文档页数:16
VB网络通讯程序设计WinSock控件能够通过UDP协议(用户数据报协议)或TCP协议(数据传输协议)连接到远程的机器并进行数据交换。
这两种协议都能用来创建客户端和服务端应用程序。
就像定时器控件一样,WinSock控件运行时没有一个可视的界面。
下面就是分别用TCP和UDP协议来创建的网络聊天软件。
TCP协议网络聊天程序的运行过程及原理第一步:建立连接主要过程是:由客户端程序向服务端程序发出连接请求,服务端程序收到并接受连接请求,至此客户机与服务器创建了数据交流通道。
第二步:开始聊天主要过程是:在客户机的“发送的信息”文本框中输入文字时,服务器端的“收到的信息”文本框中就会实时地显示相同的文字,反之亦然。
服务器的界面设计1.创建一个“标准 EXE”工程,选中“工程”菜单的“部件”,在控件中找到Microsoft Winsock Control并将其选中。
2.将Form1的名称改为Form_Load(),并在其中添加两个命令按钮(Command1的Caption属性为“退出”,Command2的Caption属性为“发送”)。
3.在窗体是添加三个TextBox控件,其名称分别为txtServerIP,txtSend和txtReceive。
4.在窗体上添加一个Winsock控件,将其Protocol(协议)属性设置为0(即sckTCPProtocol)。
服务器端的源代码:Private Sub Form_Load()'设置侦听端口WinsockServer.LocalPort = 10001'读取服务器的IP地址txtServerIP.Text = WinsockServer.LocalIP'开始侦听WinsockServer.ListenEnd SubPrivate Sub Command1_Click()'点击“退出”按钮后关闭应用程序Unload MeEnd SubPrivate Sub Command2_Click()'只要txtSend文本框的内容写好以后就由WinsockServer控件发送WinsockServer.SendData txtSend.TextEnd SubPrivate Sub WinsockServer_ConnectionRequest(ByVal requestID AsLong)'当收到连接请求时,Winsock处于侦听状态'此时应该使用Close方法关闭Winsock,然后使用Accept方法接受连接请求WinsockServer.CloseWinsockServer.Accept requestIDEnd SubPrivate Sub WinsockServer_DataArrival(ByVal BytesTotal As Long) '当客户端有信息发送来时,利用WinsockServer控件的GatData 方法读取数据'并将其显示在txtReceive文本框中Dim MyStr As StringWinsockServer.GetData MyStrtxtReceive.Text = MyStrEnd Sub运行界面如下图:客户端的界面设计1.创建一个新的“标准EXE”工程,并添加Winsock 控件。
vb用户界面设计实验报告(共9篇) VB第7章用户界面设计一、选择题1、下列控件中,没有Caption属性的是( )。
A. 框架B. 列表框C. 复选框D. 单选按钮2、复选框的Value属性为1时,表示( )。
A. 复选框未被选中B. 复选框被选中C. 复选框内有灰色的勾D. 复选框操作有错误3、用来设置粗体字的属性是( )。
A. FontItalicB. FontNameC. FontBoldD. FontSizeE. FontUnderline4、假定定时器的Interval属性为1000,Enabled属性为Ture,调用下面的事件过程,程序运行结束后变量x的值为( )。
Dim x As IntegerSub Timer1_Timer( )For i = 1 To 10x = x + 1Next iEnd SubA. 1000B. 10000C. 10D. 以上都不对5、在下列说法中,正确的是( )。
A. 通过适当的设置,可以在程序运行期间让定时器显示在窗体上B. 在列表框中不能进行多项选择C. 在列表框中能够将项目按字母顺序从大到小排列D. 框架也有Click和DblClick事件6、在用菜单编辑器设计菜单时,必须输入的项有( )。
A. 快捷键B. 标题C. 索引D. 名称7、在下列关于菜单的说法中,错误的是( )。
A. 每个菜单项都是一个控件,与其他控件一样也有自己的属性和事件B. 除了Click事件之外,菜单项还能响应其他的,如DblClick等事件C. 菜单项的捷径键不能任意设置D. 在程序执行时,如果菜单项的Enabled属性为False,则该菜单项变成灰色,不能被用户选择8、在下列关于通用对话框的叙述中,错误的是( )。
A. CommandDialog1.ShowFont显示“字体”对话框B. 在“打开”或“另存为”对话框中,用户选择的文件名可以经FileTitle属性返回C. 在“打开”或“另存为”对话框中,用户选择的文件名及其路径可以经FileName属性返回D. 通用对话框可以用来制作和显示“帮助”对话框二、填空题1、复选框( )属性设置为2——Grayed时,变成灰色,禁止用户选择。
《VB程序设计》实训报告实训名称:教学信息管理系统实训专业:计算机应用技术班级:计算机10A1学号:*********姓名:陈健指导教师:***2011 年6月18 日实训成绩一、实训目的1. 学会综合运用VB有关的控件、函数和对象的知识,掌握VB的程序设计方法和技术。
2.通过一个教学信息管理系统的开发,掌握VB与ACCESS数据库的综合编程方法。
3. 掌握ACCESS数据库的设计;数据库的连接;绑定控件的属性设置、ADO数据控件的属性和方法;功能模块的编程和实现方法。
4.提高学生分析和解决实际问题的能力,调试和分析应用程序的能力,达到一定的应用程序设计水平。
二、实训报告内容2.1实训内容:教学信息管理系统采用C/S体系结构,采用Visual Basic 6.0作为开发工具,采用ACCESS数据库作为后台管理。
1.根据需求分析,创建ACCESS数据库和数据表2.主窗体和系统菜单设计3.用户管理,用户登录界面设计4.学生信息管理模块设计5.课程管理、班级管理、教师管理模块设计6.学生成绩管理模块设计根据实训项目各个模块任务要求,进行程序设计和调试。
实现信息的录入、编辑修改、删除、浏览功能,能实现信息的一般查询功能和条件查询功能,并进行系统总体整合和调试。
2.2 实训设备或软、硬件1. PC计算机,Windows XP操作系统2.Visual Basic 6.0集成开发环境3.ACCESS 2003数据库系统三、结论经过近两周的实训,我发现我对《VB程序设计》这门课有了更深的了解,以下是我对这次实训所做的总结:这次实训做的是“教学信息管理系统”,需要掌握VB与ACCESS数据库的综合编程方法,所以首先要熟练掌握ACCESS数据库的创建。
实训第一天,我首先了解了这次实训的目的及意义;然后便是完成当天的主要任务,即根据“教学信息管理系统”中的需求分析,创建ACCESS数据库及数据表。
结合实际,需要在数据库中创建学生信息表、课程信息表、学生成绩表、班级信息表、教师信息表、教学安排表、用户表、创建查询等八个数据表。
安徽机电职业技术学院《VB程序设计》课程实训实训报告系(部):经贸管理学系班级:电商姓名:指导教师:陈香2015 ~ 2016学年第一学期实训项目一vb集成开发环境........................................................... 错误!未定义书签。
实训1-1 ............................................................................ 错误!未定义书签。
实训1-2 ............................................................................ 错误!未定义书签。
实训项目二创建简单的应用程序 ................................................. 错误!未定义书签。
实训2-1 ............................................................................ 错误!未定义书签。
实训2-2 ............................................................................ 错误!未定义书签。
实训2-3 ............................................................................ 错误!未定义书签。
实训2-4 ............................................................................ 错误!未定义书签。
实训2-5 ............................................................................ 错误!未定义书签。
广西工学院鹿山学院《VB语言程序设计》实验报告系别:专业班级:姓名:学号:指导教师:二〇一三年六月六日一. 实验目的了解和掌握VB语言程序设计基本控件的应用;熟练应用VB常用界面设计的控件使用方法;掌握多窗体的方法应用;熟悉数组的输入输出及数组常用算法。
二. 实验内容请编写一个《VB语言程序设计》课程管理系统,要求:系统包含三个窗体,分别是登录窗体、个人信息录入窗体和成绩统计窗体。
其中各窗体功能包含如下:1.首页登录窗口:用户许通过密码验证正确以后跳转到个人信息登录窗口;2.个人信息录入窗口:在此用户可以添加和删除个人的基本信息,在此窗口点击成绩统计按钮可以跳转至成绩统计窗口;3.成绩统计窗口:实现某班10个同学的所有成绩,并统计出其平均分,最高分和最低分。
三. 程序设计界面1.首页登录窗口:2. 个人信息录入窗口3.成绩统计四. 程序实现代码1.首页登录窗口代码:Private Sub Command1_Click()If Text2.Text = 123456 Thencao2.ShowElseMsgBox "请重新输入密码"Text2.Text = " "Text2.SetFocusEnd IfEnd SubPrivate Sub Command2_Click()EndEnd Sub2.个人信息录入Private Sub Command1_Click()If Text1.Text = " " ThenExit SubEnd IfDim strAdd As StringstrAdd = Text1.Text & " " & Text2.Text & " " & Combo1.Text & " " & Combo2.Text & " "List1.AddItem strAddEnd SubPrivate Sub Command2_Click()If List1.ListIndex <> -1 ThenList1.RemoveItem List1.ListIndexEnd IfEnd SubPrivate Sub Command3_Click()cao1.ShowEnd SubPrivate Sub Command4_Click()cao3.ShowEnd SubPrivate Sub Form_Load()Combo1.AddItem "男"Combo1.AddItem "女"Combo2.AddItem "土建121"Combo2.AddItem "土建122"End Sub3.成绩统计Private Sub Command1_Click()Print "土建121班某10个同学的成绩如下" Dim x(1 To 10) As Integer, max%, min%, a% max = 0min = 200a = 0For i = 1 To 10x(i) = Int(Rnd * 91 + 1)Print x(i);a = a + x(i)If x(i) > max Then max = x(i)If x(i) < min Then min = x(i)Next ia = a / 10PrintPrint "最高分:"; maxPrint "最低分:"; minPrint "平均分:"; aEnd SubPrivate Sub Command2_Click()cao1.ShowEnd SubPrivate Sub Command3_Click()End五. 程序运行结果六. 实验总结这个程序用了两节课的时间制作出来,其间遇到的问题主要来自于相对复杂的程序语言在编写时没有足够的细心,导致语句出现错误。
课程设计心得体会6篇课程设计心得体会 (1) 学习vb程序已经一个学期了,但是感觉没有学到真正的知识。
但是最近几个课时的课程学习让我受益匪浅,学会了一些简单的程序语言设计,并且感觉这是一种乐趣,开始喜欢这门课程了。
然而,我深刻体会到这门课程并不是轻而易举就可也学好的,学习这门课程不仅需要细心严谨的态度,还需要充分发挥我们的想象力,让理论和实践充分的结合在一起,才能达到事半功倍的效果。
细节决定成败这句话在程序设计中最恰当不过了,因为一个小小的错误代码就可以使你的整个的程序无法进行,有时候绞尽脑汁也没能找出错误所在,只好老老实实的从新进行编写工作。
所以课程不仅理论性强,实际操作性更强,没有一个好的心态很难学好这门课程。
我们学习的不仅是科学的方法,还包括用什么样的态度去对待这门课程,并且让自理论性和实践性在自身得到充分的发挥,用细心严谨的态度去认识事物,且希望通过这次的实践操作可以让我更好地学习vb程序设计。
CAD/CAM课程设计心得体会四随着我国机械制造业的快速发展,我国正逐步变成“世界制造中心”。
为了增强竞争能力,我国制造业正在广泛的使用先进的数控技术。
21世纪机械制造业的竞争,很大程度上是数控技术的竞争。
为了适应社会的需求,进一步增强机械专业学生的竞争能力,我们进行了为期2周的CAD/CAM综合实训。
这对于我们来说无疑是一件好事。
通过两周的数控综合实训,使我们更深一步地认识和掌握CAD/CAM软件,并深刻体会到了自动编程软件(mastercam)在数控机床加工中的巨大作用,尤其是铣削部分。
通过学习使我们从理论学习转到了实际生产,同时我们对加工参数的设置有了感性的认识,如下刀位置、下刀方式、进退刀参数以及刀具切削间距的设定等等。
我们加工的零件虽然难度不大,但是十分的耗时间,因为要大量的使用线切割,这就需要我们有足够的耐心。
我们经历了穿丝、绘图、加工的整个过程,算是初步掌握了一项技能,确是受益匪浅。
华北科技学院计算机学院综合性实验
实验报告
课程名称程序设计语言(VB)
实验学期 2011 至 2012 学年第 2 学期学生所在系部
年级专业班级
学生姓名学号
任课教师李芙玲
实验成绩
计算机学院制
实验报告须知
1、学生上交实验报告时,必须为打印稿(A4纸)。
页面空间不够,可以顺延。
2、学生应该填写的内容包括:封面相关栏目、实验地点、时间、目的、设备环境、
内容、结果及分析等。
3、教师应该填写的内容包括:实验成绩、教师评价等。
4、教师根据本课程的《综合性实验指导单》中实验内容的要求,评定学生的综合
性实验成绩;要求在该课程期末考试前将实验报告交给任课教师。
综合性实验中,所涉及的程序,文档等在交实验报告前,拷贝给任课教师。
任课教师统一刻录成光盘,与该课程的期末考试成绩一同上交到系里存档。
5、未尽事宜,请参考该课程的实验大纲和教学大纲。
《程序设计语言(VB)》课程综合性实验报告。
程序设计心得体会最新10篇程序设计心得体会篇一虽然在上个学期中,我们已经学习了《C语言程序设计》这门课,但是我所学的知识最多也就是在做作业的时候才会用到,平时没有什么练习的机会,这次的课程设计是我第一次通过自己构思,和同学讨论并且不断查阅资料来设计一项程序。
这次设计,不仅巩固了我以前所学的知识,还让我对c语言有了更深一步的了解,掌握了更多的技巧和技能。
C语言是计算机程序设计的重要理论基础,在我们以后的学习和工作中都有着十分重要的地位。
要学好这种语言,仅仅学习课本上的知识是不够的,还要经常自己动手,有较强的实践能力。
只有多动手,经常编写程序,才能发现我们学习上的漏洞和自己的不足,并在实践中解决这些问题,不断提高自己转化知识的能力。
在我们小组有解决不了的问题时,我们会主动查阅相关的资料,或向其他同学询问,这不仅丰富了我们的知识,还增进了我们同学之间的友谊。
为了增大信息的安全性,需要用文件来存储信息,由于我们在上课时不注重对文件的运用,所以在这方面有较大的困难。
我先将书本认认真真地看了一遍,又做了一下课后习题来验证和增进自己的理解,终于,经过我们的不懈努力,我们小组的程序有了突破,成功地实现了用文件来保存并查看学生的信息。
这次设计中,我的收获还有就是学会了用流程图来表达自己的想法,并根据流程图来逐步实现程序的功能。
开始的时候,我画流程图很是困难,需要一个多小时才能清楚的根据自己的想法画出图来,后来画多了,就更加了解它的功能,十分得心应手,能够比较快而准确的画出来。
在这为期半个月的时间内,通过我们小组各成员之间的相互讨论和合作,我们完成了学生信息管理系统的程序设计,更值得高兴的是我们的程序得到了大家的喜爱,在每次的简报中都得到了较好的成绩。
在参考书上,我们不仅参考了曾经学过的高敬阳主编的《c语言程序设计》,还找到了由谭浩强主编的第三版《c语言》进行参考。
当然,我们的程序还有一些不完善的地方,比如说,当输入的数据不符合我们定义的数据的格式的时候,程序会出现一些错误,有时会出现主菜单的死循环;在一次程序运行中,只能行使一种权限,要想再行使另一种权限,就只能退出程序,然后再运行程序。
实验一:设计简单的VB 应用程序一、实验目的1.掌握Visual Basic 启动和退出的方法。
2.熟悉Visual Basic 的集成开发环境。
3.掌握Visual Basic 程序设计的基本步骤,了解VB 程序的编写、保存和编译的方法过程。
4.初步了解几个常用基本控件控件(标签、命令按钮和文本框)的使用方法。
二、实验类型综合三、实验时间:2012-3-9四、实验任务1、启动Visual Basic ,然后创建一个“标准 EXE ”工程(保存在D 盘以自己学号命名的文件夹中,文件名和窗体名均为SJT ),并了解Visual Basic 集成开发环境下各组成部分及其作用。
2、编一程序,计算任意输入的正整数的平方根。
3、编写一个应用程序,界面如图1-1所示。
窗体中文字“VB 应用程序!”为一标签控件,单击标题为“放大”的命令按钮,则“VB 应用程序!”的字号放大一号,单击“缩小”按钮则反之;同时,窗体中还有4个含某种指向图案的按钮,若单击某个按钮,则使“VB 应用程序!”向该按钮所指向的方向移动50Twip 。
(提示:四种指向的图案可以在Visual Basic 安装目录中的“…graphics\icon\Arrows ”子目录中找到,名称分别为arw07dn.ico 、arw07lt.ico 、arw07rt.ico 和arw07up.ico )五、实验要求 写出实验报告,内容是:1、第1小题的操作步骤2、第2、3题1).程序的界面设计。
2).程序主要代码。
3).运行结果(输入与输出)。
4).实验总结。
(写上你自己的总结。
可以从以下几个方面来总结:你在编程过程中花时多少?时间是怎么分配的?多少时间在思考问题?遇到了哪些难题?你是怎么克服的?你对你的程序的评价?你的收获有哪些?)图1-1 实验1-2程序运行实验二:数据的输入和输出一、实验目的1.掌握常量和变量、表达式的基本概念和正确书写格式。
2.掌握基本语句(Print语句、赋值语句、Dim语句等)的使用;3、掌握常用函数的正确使用方法;4、掌握数据的动态输入InputBox和信息提示MsgBox的基本使用方法。
259教法研究2020年第10期作为一名计算机科学与技术本科毕业的学生,对于程序设计的学习深有体会。
大学的程序设计教学,老师总是会一开始就给你讲枯燥乏味、长篇累牍的数据类型、运算符、表达式等,往往一下子就把部分学生的学习热情浇灭了,学习的兴趣没了,接下去更复杂的程序结构、数组、函数、数据结构……,更是越学越糟糕。
对于所有的学习,兴趣才是首要,也是最重要的。
新课程明确了计算思维是计算机科学技术的核心,本文结合自己在《VB程序设计》实例教学中的一些作法,和大家一起来交流探讨。
1 趣味实例,兴趣盎然VB作为一个可视化的编程工具,比C++和其他的一些纯代码界面的程序设计软件,我认为对于初学程序设计的学生来说,还是比较容易上手的。
但可视化如果不能启发兴趣,学生可能还是无法喜欢并学好。
因为可视化毕竟大部分程序的实现还是需要写代码。
启发学生的学习兴趣就显得尤其重要。
在第一节课,我就给学生展示了一个VB程序制作的简易计算器,并把这个“计算器”软件发给学生自己体检,学生都很好奇激动。
问学生想不想自己也能做出一个计算器呢?学生的回答都很肯定,也很有激情。
VB最大的特点也就是它友好的窗体界面,要学好VB,首先就是来认识窗体,认识窗体不能像讲word那样,介绍各窗体工具栏的名称。
我就通过实例让学生明白窗体的作用、工具栏的作用等。
比如用一个简单的窗体输出实例,一行的代码,简单易上手,让学生明白两个知识点,窗体的作用可以显示,窗体的输出命令是“print”。
2 控件知识,融会贯通VB的控件对于程序的实现有很大的作用,各控件的作用各不相同,如果纯理论讲解,命令按钮是实现鼠标点击(Click)事件,学生也是听得云里雾里。
给学生讲一个程序,按下命令按钮实现改变窗体的大小,让学生体会,原来命令按钮就像一个开关,按下这个开关,就能让程序实现我想要做的事情——改变窗体大小。
文本框的作用,我用了最经典的简单加法计算器来讲解,拖出五个文本框和一个命令按钮,其中两个个文本框用来输入加数,两个用来显示加号和等号,按下命令按钮后,在和的文本框中得到并显示结果。
物理工程系计算机实验报告课程名称VisualBasic程序设计班级姓名同组成员设备编号37 实验日期20120 实验目的循环实验题目对调数,守形数,完全数实验环境、条件VB6.0实验过程总结(产生的问题、解决方法)对调数Option ExplicitDim a, b, i, n, s, m As Integer,ch1, ch2 As StringPublic LoginSucceeded AsBooleanPrivate Sub Form_Click()a = InputBox("请输入一个两位正整数:")i = Len(a)If i = 2 Thench1 = StrReverse(a)b = Val(ch1)For m = 10 To 99ch2 = CStr(m)ch2 = StrReverse(ch2)n = Val(ch2)a = Val(a)If a + m = b + n ThenPrint mEnd IfNext mElseMsgBox "输入错误,请重新点击页面输入!"End IfEnd Sub守形数Option ExplicitDim a, i, n, s As Integer, ch AsString, ch1 As StringPublic LoginSucceeded AsBooleanPrivate Sub Form_Click()For a = 1 To 1000ch1 = CStr(a)i = Len(ch1)n = a ^ 2ch = CStr(n)ch = Right(ch, i)s = Val(ch)If s = a ThenPrint a & "为守形数!"End IfNext aEnd Sub完全数Option ExplicitDim a, i, n, s, m As IntegerPublic LoginSucceeded AsBooleanPrivate Sub Form_Click()Print "1和1000之间的完全数有:"m = 0For a = 1 To 1000s = 0For i = 1 To a - 1n = a Mod iIf n = 0 Thens = i + sEnd IfNext iIf s = a ThenPrint am = m + 1End IfNext aMsgBox "1和1000之间一共有" & m & "个完全数。
照盟丝'凰关于V B程序设计课的实践与探索陈炫燕(广东省佛山市顺德中专学校,广东佛山528300)哺要]本丈针对目前中职学校在vB程亭设计教学。
中普遍存在的一些现象,分析了V B课程教学过程中存在的问题,并结合教学实践,遵提出了相应的改进方法,经实践证嘱,有效地提高了教学质量。
岗蜘V t3瓣册;案例辩……,……,……,,…,.Z }。
-’r—H{}…{L…}■}4一,r一。
-j h;|一}}{r1一r,,,一。
}。
{}21“t{t1{r i。
0J,。
;{÷。
;’,-}r一}};{d.u j i};r}r一。
’V B程序设计课是各中职学校计算机专业课程建设中的核心专业课程。
早娜博机专业的学生学习这门课程,往往局限于基本理论知识的掌握和一些典型算法的实践。
但对于目前基础相对较差的中职生,往往对这一门课程持有恐惧感、厌学心理,老师上课时常常也感到吃力。
怎样才能调动职校生学习V B的激情和提高学生程序设计的能力?本交讨论了本人在VB程序幽十课程中的一些实践与探索。
一、V B程序设计课的学习和教学中存在的问题在程序设计教学过程中,许多时候是在用讲说明书的方式给学生上课,教师对学生灌输了—大堆生硬的命令和语法,学生只是被动地接受知识,往往会出现没有思路、无从下手、不会调试程序等各种情况。
最终导致学生对所教的内容感到枯燥,对课程内容望而生畏,既而产生厌倦,而这种情况在中职学校的计算机专业教学中十分突出,如何提高教学质量,如何培养学生学习程序设计的能力皮成为烈门教学的主旨,对这个问题的探讨有着十分重要的意义。
二、关于V B教学的几点实践与探索㈠明确教学目标对于V B程序溺慵教学来说,应该充分从学生接受能力和学习规律的角度出发,结合目前软件蓝领人才的培养标准,确定具体的教学目标。
我认为,V B程序设计教学应该使学生具备以下的基本能力:1)±吝养学生对程序设计类课程的学习兴趣。
2)培养学生分析问题和船决问题的能力。
目录第一部分实习目标和要求 (2)一实习目标 (2)二实习要求 (2)三、时间安排 (2)第二部分程序编写 (3)实习 1 (3)实习2……………………………………………………… ..3实习3 (4)实习4……………………………………………………… .5实习5……………………………………………………… .5实习6 (6)实习7 (7)实习8 (8)实习9………………………………………………………..9.实习10……………………………………………………….9.实习11 (10)实习12 (11)实习13 (12)实习14 (13)实习15............................................................ (14)实习16 (16)实习17 (20)第三部分总结 (22)一、实习心得 (22)第一部分实习目标和要求一、实习目标通过该课程设计的操作与实践,使学生在了解使用VB程序设计方法、掌握面向对象程序设计的相关理论知识和设计技巧的基础上,能够将理论教学中涉及到的知识点贯穿起来,通过对各个实习任务的练习,应用VB实现测量数据的程序处理;从而提高面向对象程序设计的综合设计能力、应用VB来解决测量中的数据处理等问题的实践能力二、实习要求1.认真努力作业。
巩固所学VB语言基本知识。
2.鼓励多种形式的学习活动。
如与同学展开讨论,请教老师,查阅图书资料,上网搜索信息等。
3.程序的功能要求。
按个人能力可做适当的增减。
有能力的,应实现更多的功能。
4.按时提交作业。
课程设计作业包括全部VB软件工程文件和课程设计报告。
5.珍惜上机机会。
上机期间不做与课程设计无关的事。
6.按照计划进行设计。
三、时间安排第二部分程序编写1、判断闰年:年号(intyear)能被4整除,但不能被100整除;或能被400整除程序代码:'函数"rn"的功能是判断年号intyear是否为闰年,rn—闰年Function rn(intyear As Integer)If intyear Mod 4 = 0 And intyear Mod 100 <> 0 Thenrn = "闰年"ElseIf intyear Mod 400 = 0 Thenrn = "闰年"Elsern = ""End IfEnd Function运行情况如图1:图1 函数rn()的运行界面2.一元二次议程ax2+bx+c=0存在实根的条件:a不等于0,且b2-4ac大于等于0。
vb程序设计实验心得 《VB程序设计》实验报告
一、 实验目的及要求(见实验书,要求手填):
1. 了解VB.NET系统对计算机软件、硬件的要求。 2. 掌握启动与退出VB.NET的方法。
3. 掌握建立、和运行VB.NET应用程序的全过程。
4. 掌握常用控件的使用,如文本框、标签、命令按钮、图片框。
二、 实验完成情况:
三、 界面设计与程序代码
要求:给出界面设计示意图,在属性窗口修改过的对象属性需列出,列出方式如下: 1、 创建一个程序
步骤:①在窗体上建立3个标签、一个命令按钮和一个文本框。
②在代码窗口中选择Button1对象Click事件,在Button1-Click事件模板内输入代码。 ③单击启动调试按钮运行程序。 ④单击工具栏的“全部保存”按钮。 ①界面设计
②程序代码
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Label3.Text = TextBox1.Text
End Sub ③运行结果
2、左右移动文字
步骤:①在窗体上建立1个标签、1个命令按钮、1个定时器。
②在代码窗口分别对3个控件编写代码,最后编写左右移动的单位。
③单击启动调试按钮运行程序。 ④单击工具栏的“全部保存”按钮。 ①界面设计
②程序代码
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Timer1.Enabled = True End Sub
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
Timer1.Enabled = FalseCall mymove() End Sub
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
Call mymove() End Sub Sub mymove()
Label1.Left = Label1.Left + 50
If Label1.Left > Me.Height Then Label1.Left = 0 End Sub End Class
③运行结
3、统计鼠标单击窗口的次数
步骤:①在窗体上建立一个标签、一个文本框。 ②在代码窗口分别对2个控件代码。③单击启动调试按钮运行程序。
④单击工具栏的“全部保存”按钮。 ①界面设计
②程序代码
Public Class Form1
Private Sub Form1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.ClickTextBox1.Text = Val(TextBox1.Text) + 1 End Sub
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
TextBox1.Text = 0 End Sub End Class
③运行结果
4、按钮、字号、内容、和格式的复制练习
步骤:①在窗体上建立一个标签、两个文本框、三个命令按钮。 ②在代码窗口分别对5个控件代码。
③单击启动调试按钮运行程序。
④单击工具栏的“全部保存”按钮。 ①界面设计
②程序代码
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
TextBox1.Font = New Font("隶书", 20) End Sub
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
TextBox2.Text = TextBox1.SelectedTextTextBox2.Font = TextBox1.Font End Sub
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
End Sub End Class
③运行结果
vb程序设计实验心得
vb程序设计实验心得一:数据库VB课程设计心得体会
数据库课程设计大赛的尘嚣渐渐远去,怀着对这次大赛的些许不舍,怀着对当初课程设计开始时候的豪情万丈的决心的留恋,怀着通过这次课程设计积累的信心与斗志,我开始写这篇文章,为自己的足迹留下哪怕是微不足道但是对自己弥足珍贵的痕迹并期望与大家共勉。
首先,让我的记忆追溯到大二暑假,在老大的指引下 ,我接触到Microsoft 公司的.NET产品。那个时候我已经学过vc和asp,因为windows程序设计实验的课的关系,接触过vb,但是没有专门去学他,因为习惯了c++里面的class,int,觉得vb的sub,var 看着就不是很顺心。我是一个好奇心很强的人,突然看到了一个号称“.网络是用于创建下一代应用程序的理想而又现实的开发工具”,而且主推c#语言,由于对c语言的一贯好感,我几乎是立刻对他产生了兴趣。我就开始了对c#的学习,任何语言都不是孤立存在的,所以数据交互是很重要的,暑假的时候我把我们这学期的课本数据库系统概论看了一遍。我记得以前用c语言编程的时候,数据是在内存中申请空间,譬如使用数组等等。很耗费内存空间。这个时候就是数据库站出来的时候啦,于是我又装上了sql serverXX,以前学asp的时候用的是aess,那个时候只是照着人家做,理论是什么也不是很清楚。
通过一个暑假的学习,基本搞清楚了理论方面的东西,具体怎么用也不是很清楚。但是这为这学期的课程设计打下了铺垫。
来到学校后,随着这学期的数据库课程大赛开始了,我有一个看法就是我自己应该具备的能力不是我会多少,而是我应该具备快速学会东西的能力。遇到什么就学什么。我们有时候很容易被一些专业名词说吓着,包括什么建模,软件工程,数据分析,数据挖掘等等。我身边就有很多同学被这些纸老虎所唬住,而没有勇气去接触他们,总是说这个太难了之类的退堂鼓的话,他们低估了自己的潜力同时也压抑住了他们自己的好奇心。其实都是纸老虎,又不是什么国家科研难题,只是去用一些工具,发明工具是很难,但是用一个工具就容易多了,just do it!我记得我做这个数据库之前,我们老师说要做好前期分析,我就在网上搜索用什么分析工具好。最后我选择了roseUML建模工具。在此之前,我脑袋里面没有软件建模的思想,什么UML建模对我而言就是一张空白的纸。但是真正接触后并没有想象的那么难,有什么不懂的上网去搜索,这是一个信息横流的世界,有google,baidu就没有不能解决的知识难题。以及后来的数据库分析的时候用到的powerdesigner也是一样。
开发的时候我想过用什么架构,c/s模式?模式有很多,怎么选择?我就上网搜索现在最流行的架构是什么。结果搜到了MVC架构,就是你啦。我决定用这个架构,不会,没关系,咱学。Just do it!前期工作准备好后,那么我就得把我暑假学的.网络加以实践。这个时候我更加深入的了解了利用ado.Net操纵数据库的知识。并且对数据库里面的存储过程有了比较深入的了解。经过大概2个多星期的奋斗,我完成了我的数据库课程设计--基于.网络数据集的图书馆管理系统。并最后非常荣幸的获得了大赛的一等奖以及以及新技术应用奖。
与其临渊羡鱼,不如退而结网。这次数据库课程设计给我的最大的印象就是如果自己有了兴趣,就动手去做,困难在你的勇气和毅力下是抬不了头的。从做这个数据库开始无论遇到什么困难,我都没有一丝的放弃的念头。出于对知识的渴望,出于对新技术的好奇,出于对一切的求知。我完成了这次数据库课程设计,不过这只是我学习路上的驿站,未来十年.NET的核心技术就是XML[至少微软是这么宣传的],我会继续学习它,包括jave公司的j2ee我也很想试试,语言本来就是相通的,just do it!语言并不重要毕竟它仅仅是工具,用好一个工具并不是一件值得为外人道的事情,主要是了解学习思想。古语说的好:学无止境啊!
我很庆幸我参加了这次数据库大赛,让我确实打开了眼界。
(最后,很感激学校给了我们这次动手实践的机会,让我们学生有了一个共同学习,增长见识,开拓视野的机会。也感谢老师们对我们无私忘我的指导,我会以这次课程设计大赛作为对自己的激励,继续学习。毕竟学习就是一个just do it的过程!)我直接从报告上面复制过来的.....所以这段也不删去了.............呵呵。