详细设计实验报告模板 门诊管理系统

实验（实习）报告实验（实习）名称详细设计日期12・10得分指导教师_系—专业_年级_班次姓名学号一、实验目的以概要设计为基础，通过对门诊管理系统系统的详细设计，掌握算法描述工具的使用，能够完成每个模块的算法设计和数据结构的设计。能够独立完成一个门诊管理系统信息系统的详细设计工作。二、实验要求应用软件工程课程中介绍的详细设计的方法和技术确定门诊管理系统系统中每个模块的算法，能够应用常用设计技术和方法完成相关设计工作。为后续编码阶段提供依据和指导。三、实验内容完成门诊管理系统系统的详细设计，确定系统中每个模块的算法。.四、实验步骤背景程序（模块）系统的组织结构各程序（模块）的设计说明模块相互关系表五、实验总结1I.开发人员：沈天威II.指导老师：李振宏程序（模块）系统的组织结构：5.户信息营理品类别管5.户信息营理品类别管理•.菊品信息堂理登录模块用于验证用户的登录。不同的用户成功登录后显示的窗体是不一样的。这是每个系统都应该具有的功能，在这里我要特别的介绍一下了。别小看了一个普通的登录模块，它包含的用户需求可以是有几十条的。比如：用户不能重复登录，输入三次密码错误后，应该锁定用户的账号，记住密码功能等等。'欢迎怯用日J门诊管理至统~'用户名(U)欢迎使用r—1BJ□诊管理系统业朋削，1耿消『］程序设计代码：PublicClassLoginForml'TODO:插入代码，以使用提供的用户名和密码执行自定义的身份验证'(请参见/fwlink/?LinkId=35339)。'随后自定义主体可附加到当前线程的主体，如下所示：'My.User.CurrentPrincipal=CustomPrincipal'其中CustomPrincipal是用于执行身份验证的IPrincipal实现。'随后，My.User将返回CustomPrincipal对象中封装的标识信息'如用户名、显示名等PrivateSubOK_Click(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesOK.ClickMe.Close()EndSubPrivateSubCancel_Click(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesCancel.ClickEndMe.Close()EndSubPrivateSubLoginForm1_Load(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesMyBase.LoadEndSubEndClass主键面模块设计：

程序设计代码：PublicClassFormlDimxmlAsSystem.Xml.XmlDocumentDimnodesetAsSystem.Xml.XmlNodeDimnodegetAsSystem.Xml.XmlNodeDimelmAsSystem.Xml.XmlElementPrivateStructureinfoDiminfo1AsStringDiminfo2AsStringDiminfo3AsStringDiminfo4AsStringDiminfo5AsStringDiminfo6AsStringDiminfo7AsStringDiminfo8AsStringEndStructurePrivateSubButton5_Click(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesButton5.ClickEndEndSubPrivateSubButton3_Click(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesButton3.ClickDimghinfoA1=TextBox1.T2=TextBox2.T3=TextBox3.T4=TextBox4.T5=TextBox5.T6=TextBox6.T7=TextBox7.T8=TextBox8.Textsetinfo(ghinfo,〃gh〃)EndSubPrivateSubForm1_Load(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesMyBase.LoadLoginForm1.ShowDialog()DimxmldecAsSystem.Xml.XmlDeclarationDimelm1AsSystem.Xml.XmlElementDimelm2AsSystem.Xml.XmlElementDimxml1AsSystem.Xml.XmlDocumentDimxml2AsSystem.Xml.XmlDocumentxml1=NewSystem.Xml.XmlDocumentxml2=NewSystem.Xml.XmlDocumentIf(NotSystem.IO.File.Exists(〃gh.xml〃))Thenxmldec=xml1.CreateXmlDeclaration("1.0","gb2312",vbNullString)xml1.AppendChild(xmldec)elm1=xml1.CreateElement("","gh","")xml1.AppendChild(elm1)xml1.Save("gh.xml")EndIfIf(NotSystem.IO.File.Exists("ky.xml"))Thenxmldec=xml2.CreateXmlDeclaration("1.0","gb2312",vbNullString)xml2.AppendChild(xmldec)elm1=xml2.CreateElement("","ky","")xml2.AppendChild(elm1)xml2.Save("ky.xml")EndIfEndSubPrivateFunctionsetinfo(ByValdataAsinfo,ByValcodeAsString)DimrootAsSystem.Xml.XmlNodeDimnodeAsSystem.Xml.XmlElementxml=NewSystem.Xml.XmlDocumentxml.Load(code+".xml")root=xml.SelectSingleNode(code)node=xml.CreateElement(〃node〃)node.SetAttribute(〃info1〃，l)node.SetAttribute(〃info2〃，2)node.SetAttribute(〃info3〃，3)node.SetAttribute(〃info4〃，4)node.SetAttribute(〃info5〃，5)node.SetAttribute(〃info6〃，6)node.SetAttribute(〃info7〃，7)node.SetAttribute(〃info8〃，8)root.AppendChild(node)xml.Save(code+".xml")MsgBox("信息添加成功！",MsgBoxStyle.OkOnly,"提示")EndFunctionPrivateSubButton2_Click(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesButton2.ClickDimkyinfoA1=TextBox9.T2=TextBox10.T3=TextBox11.T4=TextBox12.T5=TextBox13.T6=TextBox14.T7=TextBox15.T8=TextBox16.Textsetinfo(kyinfo,"ky")EndSubPrivateFunctiongetinfo(ByValstrAsString,ByValcodeAsString,ByRefretAsinfo)DimrootAsSystem.Xml.XmlNodeDimnodelistAsSystem.Xml.XmlNodeListDimnodeAsSystem.Xml.XmlElement'DimretAsinfoxml=NewSystem.Xml.XmlDocumentxml.Load(code+".xml")root=xml.SelectSingleNode(code)nodelist=xml.SelectSingleNode(code).ChildNodesIf(str<>"")ThenForEachnodeInnodelistIf(node.GetAttribute("info1”)=strOrnode.GetAttribute("info8”)=str)Tl=node.GetAttribute("info1〃)2=node.GetAttribute("info2〃)3=node.GetAttribute("info3〃)4=node.GetAttribute("info4〃)5=node.GetAttribute("info5〃)6=node.GetAttribute("info6〃)7=node.GetAttribute("info7〃)8=node.GetAttribute("info8〃)EndIfNextEndIfEndFunctionPrivateSubButton4_Click(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesButton4.ClickDimstrAsStringDimghinfoAsinfostr=TextBox1.Textgetinfo(str,〃gh〃，ghinfo)TextBox1.Text=1TextBox2.Text=2TextBox3.Text=3TextBox4.Text=4TextBox5.Text=5TextBox6.Text=6TextBox7.Text=7TextBox8.Text=8EndSubPrivateSubButton1_Click(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesButton1.ClickDimstrAsStringDimghinfoAsinfostr=TextBox16.Textgetinfo(str,〃ky〃，ghinfo)TextBox9.Text=1TextBox10.Text=2TextBox11.Text=3TextBox12.Text=4TextBox13.Text=5TextBox14.Text=6TextBox15.Text=7TextBox16.Text=8EndSubEndClass门诊管理vbproj<?xmlversion=〃1.0〃encoding=〃utf-8〃？><ProjectDefaultTargets=〃Build〃xmlns=〃/developer/msbuild/2003〃><PropertyGroup>〈ConfigurationCondition=''$(Configuration)'==''">Debug</Configuration><PlatformCondition=’’$(Platform)'==''">AnyCPU</Platform><ProductVersion>8.0.50727</ProductVersion><SchemaVersion>2.0</SchemaVersion><ProjectGuid>{29BC2906-E18B-4CEB-9ED5-0EB6B808726D}</ProjectGuid><OutputType>WinExe</OutputType><StartupObject>门诊管理.My.MyApplication</StartupObject><RootNamespace>门诊管理</RootNamespace><AssemblyName>门诊管理</AssemblyName><MyType>WindowsForms</MyType></PropertyGroup><PropertyGroupCondition="'$(Configuration)|$(Platform)'=='Debug|AnyCPU'〃〉<DebugSymbols>true</DebugSymbols><DebugType>full</DebugType><DefineDebug>true</DefineDebug><DefineTrace>true</DefineTrace><OutputPath>bin\Debug\</OutputPath><DocumentationFile>门诊管理.xml</DocumentationFile><NoWarn>42016,41999,42017,42018,42019,42032,42036,42020,42021,42022〈/NoWarn></PropertyGroup><PropertyGroupCondition="'$(Configuration)|$(Platform)'=='Release|AnyCPU'"><DebugType>pdbonly</DebugType><DefineDebug>false</DefineDebug><DefineTrace>true</DefineTrace><Optimize>true</Optimize><OutputPath>bin\Release\</OutputPath><DocumentationFile>门诊管理.xml</DocumentationFile><NoWarn>42016,41999,42017,42018,42019,42032,42036,42020,42021,42022〈/NoWarn></PropertyGroup><ItemGroup><ReferenceInclude=〃System〃/><ReferenceInclude=〃System.Data〃/><ReferenceInclude=〃System.Deployment〃/><ReferenceInclude=〃System.Drawing〃/><ReferenceInclude=〃System.Windows.Forms〃/><ReferenceInclude=〃System.Xml〃/></ItemGroup><ItemGroup><ImportInclude=〃Microsoft.VisualBasic〃/><ImportInclude=〃System〃/><ImportInclude=〃System.Collections〃/><ImportInclude=〃System.Collections.Generic〃/><ImportInclude=〃System.Data〃/><ImportInclude=〃System.Drawing〃/><ImportInclude=〃System.Diagnostics〃/><ImportInclude=〃System.Windows.Forms〃/></ItemGroup><ItemGroup><CompileInclude=〃Form1.Designer.vb〃><DependentUpon>Form1.vb</DependentUpon></Compile><CompileInclude=〃Form1.vb〃><SubType>Form</SubType></Compile><CompileInclude=〃LoginForm1.Designer.vb〃><DependentUpon>LoginForm1.vb</DependentUpon></Compile><CompileInclude=〃LoginForm1.vb〃><SubType>Form</SubType></Compile><CompileInclude="MyProject\AssemblyInfo.vb"/><CompileInclude="MyProject\Application.Designer.vb〃><AutoGen>True</AutoGen><DependentUpon>Application.myapp</DependentUpon></Compile><CompileInclude="MyProject\Resources.Designer.vb〃><AutoGen>True</AutoGen><DesignTime>True</DesignTime><DependentUpon>Resources.resx</DependentUpon></Compile><CompileInclude="MyProject\Settings.Designer.vb〃><AutoGen>True</AutoGen><DependentUpon>Settings.settings</DependentUpon><DesignTimeSharedInput>True</DesignTimeSharedInput></Compile></ItemGroup><ItemGroup><EmbeddedResourceInclude=〃Form1.resx〃><DependentUpon>Form1.vb</DependentUpon><SubType>Designer</SubType></EmbeddedResource><EmbeddedResourceInclude=〃LoginForm1.resx〃><SubType>Designer</SubType><DependentUpon>LoginForm1.vb</DependentUpon></EmbeddedResource><EmbeddedResourceInclude="MyProject\Resources.resx"><Generator>VbMyResourcesResXFileCodeGenerator</Generator><LastGenOutput>Resources.Designer.vb</LastGenOutput><CustomToolNamespace>My.Resources</CustomToolNamespace><SubType>Designer</SubType></EmbeddedResource></ItemGroup><ItemGroup><NoneInclude="MyProject\Application.myapp"><Generator>MyApplicationCodeGenerator</Generator><LastGenOutput>Application.Designer