健身俱乐部人事查询系统

毕业设计（论文、作业）毕业设计（论文、作业）题目：健身俱乐部人事查询系统目录内容摘要和关键词………………………Ⅰ一、毕业设计报告说明……………………1毕业设计题目…………1程序设计语言…………1毕业设计目的与要求…………………1软件概述………………11、软件描述………………12、系统运行环境……………13、系统功能结构设计………………………1二、总体设计框图…………2(一)健身俱乐部人事会员管理系统总体设计框图………2(二)录入信息设计框图……………………3(三)查询和修改信息设计框图……………3(四)职工信息维护设计框图………………4(五)会员信息维护设计框图………………4(六)打印信息设计框图……………………5(七)退出系统设计框图……………………5三、数据字典………………6(一)数据库设计……………61、人事工资数据表的设计………………62、职工信息数据表的设计………………63、职工部门数据表的设计………………64、会员会费数据表的设计………………75、会员信息数据表的设计………………76、会员部门数据表的设计………………7(二)规范化设计……………71、关键点…………………72、编写main模块…………83、主菜单与子窗体的连接………………8(三)系统特点………………81、模块化…………………82、结构化查询SQL语言……………………83、安全性……………………84、课程设计体会……………8四、操作说明书……………8(一)打开程序………………8(二)进入系统………………81、打开系统………………82、登陆界面………………9(三)进入主菜单……………11(四)查询和修改信息菜单…………………111、进入系统打开“查询和修改会员信息”按钮………112、操作步骤………………11(五)会员信息维护菜单……………………121、添加会员信息…………122、修改会员信息…………143、删除会员信息…………16(六)打印信息菜单…………181、设置“统计打印所有会员办卡金额”的窗体界面和报表格…………182、编写“统计打印所有会员办卡金额”窗口的程序……19(七)退出本系统……………201、退出本管理系统………………………202、关于……………………20参考文献……………………20致谢………………………21内容摘要跨入21世纪，人们越来越深切地感觉到了计算机在生活和工作中的作用越来越重要，越来越多的职业需要具有计算机的应用技能。因对健身俱乐部的人事管理比较感兴趣，正逢这次毕业设计的需要，为此选择了《健身俱乐部人事管理系统》这个课题。本系统要求的功能是信息储存、查询、修改、删除、维护和打印，实现人事管理等。在此系统中主要包括了人事和会员两大信息，共有六大模块。在登陆界面中包括“超级用户”和“普通用户”，输入用户名和密码登陆“超级用户”进入主表单后能进行所有模块的操作，而登陆“普通用户”后对于“会员信息维护”模块不能进行相对应的操作，只能对其他五个模块进行操作。主要研究内容：我作的是健身俱乐部人事查询模块，其中包括了查询和修改会员信息模块、会员信息维护模块和统计打印所有会员办卡金额模块。主要对会员部门表、会员会费表、会员信息表三个数据表和编号、姓名、部门、卡种、会费等字段名进行操作。基本要求：通过在查询会员信息的过程中，能对会员信息进行添加、修改、删除、浏览和打印等一系列操作。关键词：SQL模块化数据库毕业设计报告毕业设计报告说明毕业设计题目健身俱乐部人事查询系统程序设计语言VisualBasic.NET毕业设计目的与要求了解使用VisualBasic.NET编写应用程序的基本步骤，熟悉Access操作环境，并且能够设计出符合要求的数据库和数据表，能够熟练使用数据库查询语言SQL对数据库进行操作。要求全面、系统地掌握VisualBasic.NET软件的相关内容，从人事会员管理入手，使用VisualBasic.NET的数据库技术，逐步实现该系统，主要的步骤是：需求分析、结构设计、数据库设计及界面的设计和代码的分析。软件概述1．软件描述此健身俱乐部人事会员管理系统分职工和会员两部分，主要通过超级用户和普通用户来实现掌握职工和会员的信息，并记录在数据库中。我们可以按不同的方式对不同的信息进行管理，可以对职工和会员的信息进行查询、添加、删除和修改。并可以针对不同的要求，提供相关的报表打印功能。2．系统运行环境(1)硬件要求PⅡ以上电脑，内存不小于126MB，硬盘不小于1G，配有输入、输入设备(2)软件要求VisualBasic.NET和Access2000平台3．系统功能结构设计(1)录入信息功能是让用户把职工和会员的信息通过键盘录入到数据表长期保存，分别由“录入职工基本信息”子菜单和“录入会员基本信息”子菜单来实现，即对职工和会员信息进行输入和添加。(2)查询和修改信息功能是对职工和会员的各类信息实现有效的管理，分别由：一种是按职工信息进行管理，即对每位职工的职位，职称和工资等信息进行查询和修改；一种是按会员信息进行管理，即对每位会员的个人信息和办卡的卡种和会费等信息进行查询和修改。(3)职工信息维护职工信息维护是通过“添加职工信息”子菜单、“修改职工信息”子菜单和“删除职工信息”子菜单三部分来进行对每位职工信息进行添加、查询、修改和删除，提供了一个电子化的管理平台，从而达到人事的管理需求。(4)会员信息维护会员信息维护是通过“添加会员信息”子菜单、“修改会员信息”子菜单和“删除会员信息”子菜单三部分来进行对每位会员的入会信息进行添加、查询、修改和删除，可以具体的了解会员的详细情况，帮助公司员工能进一步的做到优质的服务。(5)打印信息是让用户把职工和会员的信息直接输出到打印机上，不需要用户重新排版，从而减少了用户的工作量。分别由“打印某个月所有职工的工资”子菜单、“统计打印所有职工工资金额”子菜单和“统计打印所有会员办卡金额”子菜单来实现。(6)退出系统功能是退出管理系统，实际上就是关闭管理系统，释放管理系统所占资源，这个功能由“退出本管理系统”菜单实现；显示关于本管理系统的一些信息，这个功能是由“关于本系统”菜单实现。总体设计框图健身俱乐部人事会员管理系统总体设计框图健身俱乐部人事会员管理系统录入信息健身俱乐部人事会员管理系统录入信息查询和修改信息职工信息维护会员信息维护打印信息退出系统图2.1录入信息录入职工基本信息录入会员基本信息录入信息录入职工基本信息录入会员基本信息图2.2查询和修改信息设计框图查询和修改信息查询和修改职工本月工资信查询和修改信息查询和修改职工本月工资信息查询和修改会员信息图2.3职工信息维护设计框图职工信息维护职工信息维护添加职工信息删除职工信息修改职工信息图2.4会员信息维护设计框图会员信息维护会员信息维护添加会员信息删除会员信息修改会员信息图2.5打印信息设计框图打印信息打印信息打印某个月所有职工的工资统计打印所有会员办卡金额统计打印所有职工工资金额图2.6退出系统设计框图退出系统退出系统退出本管理系统关于本系统图2.7数据字典数据库设计1．人事工资数据表（renshigongzi）的设计表3.1人事工资表字段结构字段名字段说明类型字段大小bianhao编号文本5xingming姓名文本10bumen部门文本20zhicheng职称文本10yuefen月份文本2gongzi工资文本10idid号自动编号长整型2．职工信息数据表（zhigongxinxi）的设计表3.2职工信息表字段结构字段名字段说明类型字段大小bianhao编号文本5xingming姓名文本10xingbie性别文本2nianling年龄文本2shenfenzheng身份证文本20bumen部门文本20zhicheng职称文本10gongzi工资文本10dianhua电话文本20zhuzhi住址文本503．职工部门数据表（zhigongbumen）的设计表3.3职工部门表字段结构字段名字段说明类型字段大小bianhao编号文本5bumen部门文本204．会员会费数据表（huiyuanhuifei）的设计表3.4会员会费表字段结构字段名字段说明类型字段大小bianhao编号文本5xingming姓名文本10bumen部门文本20kazhong卡种文本20huifei会费文本20idid号自动编号长整型5．会员信息数据表(huiyuanxinxi)的设计表3.5会员信息表字段结构字段名字段说明类型字段大小bianhao编号文本5xingming姓名文本10xingbie性别文本2nianling年龄文本2shenfenzheng身份证文本20bumen部门文本20kazhong卡种文本20huifei会费文本20dianhua电话文本20zhuzhi住址文本506．会员部门数据表（huiyuanbumen）的设计表3.6会员部门表字段结构字段名字段说明类型字段大小bianhao编号文本5bumen部门文本20规范化设计1．关键点用Imports定义命名空间，由于我们使用的是数据访问对象ADO.NET来访问数据库，因而在使用ADO.NET对象之前，首先要利用Imports定义System.Data命名空间System.Data.OleDb命名空间。代码：ImportsSystem.DataImportsSystem.Data.OleDb2．编写main模块为了创建一个Submain，需要在当前项目中增加一个模块。模块是一个项目中共享过程和函数的容器。Main模块的构成:main模块→定义一些重要变量→整个程序的运行起点：主过程SubMain()→运行主菜单窗口MainMenu。代码：PublicconstrAsString=“Provider=Microsoft.Jet.OLEDB.4.0；DataSource=c:\健身俱乐部人事会员管理系统\renshihuiyuan.mdb”PublicmyconAsNewOleDb.OleDbConnection(constr)3．主菜单与子窗体的连接对于主菜单与子窗体连接的基本思路是：创建一个新的窗体，修改新窗体的StartPosition属性、Text属性、Font属性、IsMdiContainer属性等窗体属性，接着在主窗体Mainmenuform菜单控件的Click事件中添加关联代码。系统特点1．模块化依据系统结构化设计方法，把整个系统划分为若干个功能模块，某模块可划分为多个子模块，某子模块又可划分为多个二级子模块，经层层分解后，最小的子模块的功能便十分明确和简单了。这样做，不仅展现了一个应用软件系统的整体性和层次性，而且通过屏幕对每个应用模块有明显的提示，在这些提示下，用户可以方便地进入系统的每一层进行操作，可以非常方便的使用这一数据库应用系统。2．结构化查询语言SQL本系统在实现多库连接和查询部分，大量采用了国际上广为应用的SQL结构化查询语言，语言简洁，方便实用，且有利于数据共享。3．安全性可以让用户方便的进行职工和会员信息的查询、检索、添加，删除和修改有关内容，并能分别打印职工工资金额和会员会费金额的信息。4．课程设计体会通过本次毕业设计，使我全方位的了解VB.NET开发应用程序的步骤和方法，提高了应用数据库语言解决实际问题的能力，为以后使用数据库进行软件设计打下了坚实的基础。随着程序设计的进程，我掌握了一些基本的编程方法，能开始把自己所想到的思路附诸于实现，就开始感到了程序设计的乐趣，系统程序调试成功后感到非常的开心，而且也更加加深了对书本知识的理解。操作说明书打开MicrosoftVisualStudio.NET2003程序。进入系统1．打开系统在Windows系统，先开启VisualBasic.NET，执行c:\健身俱乐部人事会员管理系统\健身俱乐部人事会员管理系统.sln应用程序，运行程序封面表单。系统主表单是进入系统后用户所见到的第一个界面，它将会给用户留下较深的印象，所以应尽可能设计得简单、大方。本系统的主表单（如图4.1所示）就作到了这一点，其中它的动态字模，由计时器控制。它的移动速度，给人以明快的感觉。图4.1健身俱乐部人事查询系统的启动封面(1)显示封面窗口的程序代码应添加在Submain中，代码实现如下显示：PublicSubmain()DimsplashAsNewfrmSplashSplash.Show()Application.DoEvents()AppStartup()Splash.Hide()Application.Run(Newloginform)EndSub(2)设定封面窗口的显现时间，编写代码如下：PrivateSubAppStartup()System.Threading.Thread.Sleep(2000)EndSub2．登陆界面(1)包括“超级用户”和“普通用户”。输入用户名和密码登陆“超级用户”进入主表单后能进行所有模块的操作，而登陆“普通用户”后对于“会员信息维护”模块不能进行相对应的操作，只能对其他五个模块进行操作（如图4.2所示）。图4.2登陆界面(2)登陆loginform窗体的全部代码如下：IfMe.RadioButton1.Checked=TrueThenIfMe.TextBox1.Text="admin"AndMe.TextBox2.Text="admin"ThenDimf1AsNewmainmenuformf1.Show()Me.Hide()ElseMsgBox("超级用户名或密码出错！请重新输入！")EndIfEndIfIfMe.RadioButton2.Checked=TrueThenIfMe.TextBox1.Text="user"AndMe.TextBox2.Text="user"ThenDimf1AsNewmainmenuformf1.MenuItem3.Enabled=Falsef1.MenuItem6.Enabled=Falsef1.MenuItem11.Enabled=Falsef1.Show()Me.Hide()ElseMsgBox("普通用户名或密码出错！请重新输入！")EndIfEndIf进入主菜单，该表单布局合理，结构紧凑，设置快捷键更加方便用户操作使用。设计主菜单（如图4.3），设计完善的菜单系统是确保程序易于使用的关键，菜单系统设计的好坏，不但反映了程序中功能模块组织的水平，同时也反映了应用程序的拥护友善性。图4.3主菜单查询和修改信息菜单1．进入系统打开“查询和修改会员信息”按钮先选择“编号”，再选择“卡种”，然后点击“查询”按钮，我们可以查找自己想要查询的信息，点击“修改”按钮还可以进行修改内容，最后关闭窗口如图4.4所示。图4.4查询和修改会员信息窗体2．操作步骤：(1)将“编号”进行数据绑定，将“编号”组合框与数据表huiyuanxinxi.db中的bianhao字段的数据绑定，再在代码编辑器窗口中添加相应代码。在“解决方案资源管理器”中右击chaxunxiugai.vb，在弹出的快捷菜单中选择“查看代码”，打开代码编辑器窗口。在左边的下拉菜单中选择要操作的对象chaxunxiugaiEvents，在右边的下拉菜单中选择Load事件输入相应的代码：OleDbDataAdapter1.fill(DataSet11)(2)编写“查询”按钮下的全部代码：grdScore.CaptionText="会员编号："&ComboBox1.Text&"会员会费："DimstrAsStringstr="selecthuiyuanxinxi.xingmingas姓名,huiyuanxinxi.xingbieas性别,huiyuanxinxi.nianlingas年龄,huiyuanxinxi.bumenas部门,huiyuanxinxi.kazhongas卡种,huiyuanxinxi.huifeias会费,huiyuanxinxi.dianhuaas电话,huiyuanxinxi.zhuzhias住址fromhuiyuanxinxiwherehuiyuanxinxi.bianhao='"&ComboBox1.Text&"'andhuiyuanxinxi.kazhong='"&ComboBox2.Text&"'"DimmydcAsNewOleDbDataAdapter(str,constr)DimdbsetAsNewDataSetmydc.Fill(dbset,"huiyuanxinxi")grdScore.DataSource=dbset.Tables("huiyuanxinxi")(3)编写“修改”按钮的代码：DimstrAsString="updatehuiyuanxinxisetxingming=@xingming,xingbie=@xingbie,nianling=@nianling,bumen=@bumen,kazhong=@kazhong,huifei=@huifei,dianhua=@dianhua,zhuzhi=@zhuzhiwherebianhao='"&ComboBox1.Text&"'"DimcomAsOleDbCommand=NewOleDbCommand(str,mycon)DimrowAsIntegerrow=grdScore.CurrentCell.RowNumbercom.Parameters.Add("@xingming",OleDbType.VarChar).Value=grdScore.Item(row,0)com.Parameters.Add("@xingbie",OleDbType.VarChar).Value=grdScore.Item(row,1)com.Parameters.Add("@nianling",OleDbType.VarChar).Value=grdScore.Item(row,2)com.Parameters.Add("@bumen",OleDbType.VarChar).Value=grdScore.Item(row,3)com.Parameters.Add("@kazhong",OleDbType.VarChar).Value=grdScore.Item(row,4)com.Parameters.Add("@huifei",OleDbType.VarChar).Value=grdScore.Item(row,5)com.Parameters.Add("@dianhua",OleDbType.VarChar).Value=grdScore.Item(row,6)com.Parameters.Add("@xingming",OleDbType.VarChar).Value=grdScore.Item(row,7)mycon.Open()com.ExecuteNonQuery()mycon.Close()MessageBox.Show("会员会费信息已成功修改。","恭喜",MessageBoxButtons.OKCancel,MessageBoxIcon.Information)(4)编辑“关闭”代码：Close()会员信息维护菜单1．添加会员信息(1)首先在tianjiahuiyuan窗体上放置10个标签（Label），7个文本框（TextBox），3个组合框（ComboBox）和2个按钮（Button）控件并设置修改各个控件的属性，然后实现三个组合框的功能，这三个过程稍有不同之处。对于组合框ComboBox2来说，由于与会员部门有关，因而我们要做的是将huiyuanbumen表中的bumen字段与该控件实现数据绑定，具体步骤如下：(A)引入数据适配器OleDbDataAdapter1，按照系统的提示，建立与“renshihuiyuan”数据表中的表huiyuanbumen的连接。(B)生成数据集DataSet11，并将huiyuanbumen表添加到数据集中。(C)设定组合框ComboBox2的两个属性，DataSource值为DataSet11.huiyuanbumen,DisplayMember值为bumen，意思是在ComboBox2的列表中出现的是huiyuanbumen表中的bumen字段值。(D)在tianjiahuiyuan窗体的Load事件中添加代码：OleDbDataAdapter1.Fill(DataSet11)(2)其次实现性别这一栏的设计。实际上，对于性别选项来说内容比较固定：男和女。我们把比较固定的选项直接做到列表里面。在tianjiahuiyuan窗体单击鼠标选中组合框ComboBox1，在“属性”窗口中找到Items属性，单击右边一栏会出现一个带有三个点的小按钮，单击这个按钮，VB.NET会弹出“字符串集合编辑器”对话框，在此对话框里输入“男”和“女”。组合框ComboBox3的属性操作同组合框ComboBox1一样，在“字符串集合编辑器”对话框中输入相应的字名，操作结束如图4.5所示。(3)最后设计“添加”和“关闭”按钮的程序。“添加”按钮的完整代码如下：IfMsgBox("数据库中未找到与此记录重复的数据，可以存入！")ThenDimstrAsString="INSERTINTOhuiyuanxinxi(bianhao,xingming,xingbie,nianling,shenfenzheng,bumen,kazhong,huifei,dianhua,zhuzhi)Values(@bianhao,@xingming,@xingbie,@nianling,@shenfenzheng,@bumen,@kazhong,@huifei,@dianhua,@zhuzhi)"DimcomAsOleDbCommand=NewOleDbCommand(str,mycon)com.Parameters.Add("@bianhao",OleDbType.VarChar).Value=TextBox1.Textcom.Parameters.Add("@xingming",OleDbType.VarChar).Value=TextBox2.Textcom.Parameters.Add("@xingbie",OleDbType.VarChar).Value=ComboBox1.Textcom.Parameters.Add("@nianling",OleDbType.VarChar).Value=TextBox3.Textcom.Parameters.Add("@shenfenzheng",OleDbType.VarChar).Value=TextBox4.Textcom.Parameters.Add("@bumen",OleDbType.VarChar).Value=ComboBox2.Textcom.Parameters.Add("@kazhong",OleDbType.VarChar).Value=ComboBox3.Textcom.Parameters.Add("@huifei",OleDbType.VarChar).Value=TextBox5.Textcom.Parameters.Add("@dianhua",OleDbType.VarChar).Value=TextBox6.Textcom.Parameters.Add("@zhuzhi",OleDbType.VarChar).Value=TextBox7.Textmycon.Open()com.ExecuteNonQuery()mycon.Close()MessageBox.Show("信息已成功存入数据库。","恭喜",MessageBoxButtons.OKCancel,MessageBoxIcon.Information)ElseBeep()MsgBox("数据库中此记录已存在，请重新输入")EndIfTextBox1.Clear()TextBox2.Clear()TextBox3.Clear()TextBox4.Clear()TextBox5.Clear()TextBox6.Clear()TextBox7.Clear()ComboBox1.ResetText()ComboBox2.ResetText()ComboBox3.ResetText()图4.5添加会员信息窗体2．修改会员信息(1)先在xiugaihuiyuan窗体上放置10个标签（Label），10个文本框（TextBox），3个按钮（Button）控件并设置修改各个控件的属性,操作基本同上。(2)我们先单击“查看”按钮查看会员信息，设计编辑“查看”按钮，代码如下：dbset.Clear()DimstrAsStringstr="select*fromhuiyuanxinxiwherehuiyuanxinxi.bianhao='"&TextBox1.Text&"'"DimmydcAsNewOleDbDataAdapter(str,constr)mydc.Fill(dbset,"huiyuanxinxi")mytab=dbset.Tables("huiyuanxinxi")ForEachmyrowInmytab.RowsTextBox2.Text=TextBox2.Text&myrow(1)TextBox3.Text=TextBox3.Text&myrow(2)TextBox4.Text=TextBox4.Text&myrow(3)TextBox5.Text=TextBox5.Text&myrow(4)TextBox6.Text=TextBox6.Text&myrow(5)TextBox7.Text=TextBox7.Text&myrow(6)TextBox8.Text=TextBox8.Text&myrow(7)TextBox9.Text=TextBox9.Text&myrow(8)TextBox10.Text=TextBox10.Text&myrow(9)Next(3)会员信息查到后我们可以进行修改了，设计编辑“修改”按钮：DimstrAsString="updatehuiyuanxinxisetxingming=@xingming,xingbie=@xingbie,nianling=@nianling,shenfenzheng=@shenfenzheng,bumen=@bumen,kazhong=@kazhong,huifei=@huifei,dianhua=@dianhua,zhuzhi=@zhuzhiwherebianhao='"&TextBox1.Text&"'"DimcomAsOleDbCommand=NewOleDbCommand(str,mycon)com.Parameters.Add("@xingming",OleDbType.VarChar).Value=TextBox2.Textcom.Parameters.Add("@xingbie",OleDbType.VarChar).Value=TextBox3.Textcom.Parameters.Add("@nianling",OleDbType.VarChar).Value=TextBox4.Textcom.Parameters.Add("@shenfenzheng",OleDbType.VarChar).Value=TextBox5.Textcom.Parameters.Add("@bumen",OleDbType.VarChar).Value=TextBox6.Textcom.Parameters.Add("@kazhong",OleDbType.VarChar).Value=TextBox7.Textcom.Parameters.Add("@huifei",OleDbType.VarChar).Value=TextBox8.Textcom.Parameters.Add("@dianhua",OleDbType.VarChar).Value=TextBox9.Textcom.Parameters.Add("@zhuzhi",OleDbType.VarChar).Value=TextBox10.Textmycon.Open()com.ExecuteNonQuery()mycon.Close()MessageBox.Show("会员信息已成功修改。","恭喜",MessageBoxButtons.OKCancel,MessageBoxIcon.Information)TextBox1.Clear()TextBox2.Clear()TextBox3.Clear()TextBox4.Clear()TextBox5.Clear()TextBox6.Clear()TextBox7.Clear()TextBox8.Clear()TextBox9.Clear()TextBox10.Clear()单击“修改”按钮运行后如图4.6所示：图4.6修改会员信息窗体(4)编辑“关闭”按钮：Close()3．删除会员信息(1)在shanchuhuiyuan窗体上放置2个标签（Label），1个组合框（ComboBox），1个文本框（TextBox），3个按钮（Button），1个DataGrid控件，并且设置各个控件的属性。DataGrid控件是一个多列数据绑定网络，它可以在这个网络中对数据库的记录进行浏览、删除操作。当为DataGrid控件设置有效的数据源之后，该控件将被自动填充，同时根据数据的组织结构创建行和列。(2)实现加载shanchuhuiyuan窗体的时候把所有会员编号添加到ComboBox1列表。把所有会员编号添加到ComboBox1列表的过程也就是实现数据表huiyuanxinxi.db中的bianhao字段与ComboBox1控件的数据绑定过程。同窗体“添加会员信息”中的数据绑定步骤一样。(3)编写代码实现选中会员编号，在DataGrid控件中显示会员的相关信息，并在文本框TextBox中显示会员的姓名。此过程在查找按钮中实现，Button1按钮的SelectedIndexChanged事件的全部代码如下所示：grdScore.CaptionText="编号为"&ComboBox1.Text&"的会员相关信息为："DimstrAsStringLabel2.Text="姓名："str="selectxingmingas姓名,xingbieas性别,nianlingas年龄,shenfenzhengas身份证,bumenas部门,kazhongas卡种,huifeias会费,dianhuaas电话,zhuzhias住址fromhuiyuanxinxiwherebianhao='"&ComboBox1.Text&"'"DimmydcAsNewOleDbDataAdapter(str,constr)mydc.Fill(DataSet11,"会员会员卡信息")grdScore.DataSource=DataSet11.Tables("会员会员卡信息")TextBox1.Text=""(4)为“删除”按钮编写代码。当用户单击此按钮时，系统便会将选中的某条记录从数据库中删除，同时在DataGrid控件中的记录也会被删除。在DataGrid控件中删除记录的工作是在其数据源DataSet中进行的，方法是获取DataGrid控件中当前选定的行，这可以用DataGrid控件的当前行索引属性CurrentRowIndex来获得，CurrentRowIndex属性返回用户在DataGrid中选定的行号。在获取了DataGrid控件中当前选定的行后，使用数据集中指定表的行集合中的删除方法Delete删除选定行。实现代码为：DimrownoAsIntegerrowno=grdScore.CurrentRowIndexTextBox1.Text=grdScore.Item(rowno,0)Delete方法仅对要删除的记录做一个删除标记，要真正实现记录的删除，还必修调用相应数据适配器的Update方法。(5)最后，“删除”按钮的完整代码为：IfMsgBox("确实要删除此记录？",MsgBoxStyle.OKCancel)=MsgBoxResult.OKThenTryDimrownoAsIntegerrowno=grdScore.CurrentRowIndexTextBox1.Text=grdScore.Item(rowno,0)DataSet11.Tables("会员会员卡信息").Rows(rowno).Delete()OleDbDataAdapter1.Update(DataSet11.GetChanges)DataSet11.Tables("会员会员卡信息").AcceptChanges()DimstrAsStringstr="deletefromhuiyuanxinxiwherexingming='"&TextBox1.Text&"'"DimmycomAsOleDbCommand=NewOleDbCommand(str,mycon)mycon.Open()mycom.ExecuteNonQuery()mycon.Close()MessageBox.Show("信息已成功从数据库中删除!","恭喜",MessageBoxButtons.OKCancel,MessageBoxIcon.Information)Catchmycon.Close()MessageBox.Show(Err.Description,"警告",MessageBoxButtons.OKCancel,MessageBoxIcon.Warning)EndTryEndIfEndSub(6)关闭窗口，如图4.7所示：图4.7删除会员信息窗体打印各信息菜单本菜单主要任务就是使用CrystalReport报表专家来完成打印系统，CrystalReport报表专家提供了可视化报表设计功能，具有即时预览、定制预览、多线程、报表专家等功能，可以满足不同用户的需要。1．设置“统计打印所有会员办卡金额”的窗体界面和报表格式(1)启动VB.NET，打开工程“俱乐部人事会员管理系统.sln”，通过“解决方案资源管理器”找到“dayin3”(2)在dayin3窗体上放置2个标签（Label），1个组合框（ComboBox），1个按钮（Button）,然后设置各个控件的属性。其中Label2控件的

Text属性在后面通过编写代码来设置，将用户选择的结果呈现在这里，由于在窗口出现时，此标签上没有任何信息，为了醒目起见，将表示边界样式的属性BorderStyle设置为Fixed3D,这样窗口加载时，标签的外形具有立体的感觉，比较明显。(3)生成CrystalReport报表，即在创建新CrystalReport文档中选择“使用报表专家”，在“选择专家”中选择“标准”。在添加字段时，顺序可以根据需要任意组合，并不一定要按表中的字段顺序。默认的报表设计界面由报表页眉，页眉，详细资料，报表页脚和页脚5个部分组成，引入报表之后，可以调整Crystal