1、商业楼盘销售管理系统房屋信息管理管理北方民族大学学士学位论文论文题目: 商业楼盘销售管理系统-房屋信息管理 北方民族大学教务处制毕业设计(论文)原创性声明和使用授权说明原创性声明本人郑重承诺:所呈交的毕业设计(论文),是我个人在指导教师的指导下进行的研究工作及取得的成果。尽我所知,除文中特别加以标注和致谢的地方外,不包含其他人或组织已经发表或公布过的研究成果,也不包含我为获得 及其它教育机构的学位或学历而使用过的材料。对本研究提供过帮助和做出过贡献的个人或集体,均已在文中作了明确的说明并表示了谢意。作 者 签 名: 日 期: 指导教师签名: 日期: 使用授权说明本人完全了解 大学关于收集、保存
2、、使用毕业设计(论文)的规定,即:按照学校要求提交毕业设计(论文)的印刷本和电子版本;学校有权保存毕业设计(论文)的印刷本和电子版,并提供目录检索与阅览服务;学校可以采用影印、缩印、数字化或其它复制手段保存论文;在不以赢利为目的前提下,学校可以公布论文的部分或全部内容。作者签名: 日 期: 学位论文原创性声明本人郑重声明:所呈交的论文是本人在导师的指导下独立进行研究所取得的研究成果。除了文中特别加以标注引用的内容外,本论文不包含任何其他个人或集体已经发表或撰写的成果作品。对本文的研究做出重要贡献的个人和集体,均已在文中以明确方式标明。本人完全意识到本声明的法律后果由本人承担。作者签名: 日期:
3、 年 月 日学位论文版权使用授权书本学位论文作者完全了解学校有关保留、使用学位论文的规定,同意学校保留并向国家有关部门或机构送交论文的复印件和电子版,允许论文被查阅和借阅。本人授权 大学可以将本学位论文的全部或部分内容编入有关数据库进行检索,可以采用影印、缩印或扫描等复制手段保存和汇编本学位论文。涉密论文按学校规定处理。作者签名:日期: 年 月 日导师签名: 日期: 年 月 日商业楼盘销售管理系统-房屋信息管理摘 要如今,互联网发展迅速,使人们的工作和生活都提供了极大的便利,信息化,电子化已经成为节约运营成本,提高工作效率的首选。楼盘销售管理系统是典型的信息管理系统,主要包括后台数据库的建立和
4、维护以及前端应用程序的开发两个方面。后台数据库采用SQL server 2005;前端应用程序使用Visual Basic 2005,利用其提供的各种面向对象的开发工具,建立系统应用原型,对初始原型系统进行需求迭代,形成用户满意的可行系统。通信技术和电子信息的快速发展使人类已经逐渐地进入信息化社会。信息和材料成为一种社会的基本生产资料,在人类的社会生产活动中发挥着重要的作用,开发相关的信息管理系统已经成为各行各业的必要和必需了,管理信息系统作为一门边缘学科,集管理科学、信息科学、系统科学、现代通信技术和电子计算机技术于一体,可以解决企业或组织所面临的问题,既可以提高工作效率,又可以获得竞争优势
5、。开发管理信息系统,促进国民经济管理的结构优化,也可以提高管理的现代化程序,加强管理的信息化手段,提高工作效率,增加企业效益。使用 Microsoft公司的 Visual Basic2005为开发工具,以Microsoft SQL Server 2005作为数据库, 通过ADO对象的数据环境控件连接SQL Server数据库。系统主要实现房屋信息管理,其中包括房屋基本信息和楼盘基本信息。【关键字】 商业楼盘销售管理系统,房屋信息管理,Visual Basic 2005,SQL Server 2005,Staff Management SystemSalary ManagementABSTRAC
6、TIn contemporary society, the rapid development of the Internet, to peoples work and life has brought great convenience and high efficiency. The informational and electronical way has become the first choice to save operating costs and improve the work efficiency. The current large number of enterpr
7、ise staff management work is still in the hand Stage of industry, not only inefficient but also often because of careless management of slip. So some companies requirements, designing enterprise staff information management system is necessary in order to help enterprises to personnel management off
8、ice automation, saving management costs and improving enterprise work efficiency . Staff management system is a scientific, comprehensive and efficient personnel management system. Details include the institution established and maintained, personnel information inputted and outputted, salary adjust
9、ed and dispensed as well as all kinds of report forms drawn and so on.Humans have gradually entered the information society because of communication technology and electronic information developing rapidly. Information and materials become a social basic production data and play an important role in
10、 human social production activities. To develop relevant information management system has become a necessary and required from all walks of life. Management information system as a marginal discipline can solve the problems faced by enterprises or organizations, management science, including inform
11、ation science, system science, modern communication technology and computer technology. It not only can improve the work efficiency, but also gain a competitive advantage. Developing management information system can promote the national economic management structure optimization, also improve the m
12、anagement of modernization program, strengthen the management of information means, improve the work efficiency and increase enterprise benefit.We use Microsoft corporation Visual Basic 2005 for development tools and base Microsoft SQL Server 2005 as the database, through the ADO object of environme
13、ntal data link Access database. In salary management section of the staff management system, we can achieve salary standard, wage calculation and wage checked.【Key words】Staff management system,Visual Basic6.0,SQL Server 2005, Wage management目 录1 绪 论11.1前言11.2项目开发背景及意义12 系统开发环境及运行简介22.1 Visual Basic
14、 2005简介22.2Visual Basic 语言的特色及编程优势22.2.1可视化的程序设计22.2.2 面向对象的程序设计思想22.2.3事件驱动的编程机制22.2.4高度的可扩充性32.2.5支持大型数据库的连接与存取操作42.3系统运行环境42.3.1硬件环境42.3.2软件环境43 系统总体设计结构及功能模块划分53.1系统功能分析53.2系统需求分析53.3系统总体结构83.4 系统的整体流程93.5系统的技术难点11第3章 数据库结构设计123.1数据库需求分析123.2数据库的概念结构设计123.3数据库的逻辑结构设计12第4章 系统的窗体设计154.1主窗体154.3工资设
15、置窗体204.4工资结算窗体244.5工资查看窗体28总 结335.1 系统总体评价335.2 系统不足与改进方案或建议335.3 结论33致 谢34参考文献35VII商业楼盘销售管理系统房屋信息管理管理1 绪 论1.1前言现如今在科技高速发展的境况下,计算机的发展速度尤其突出并且占了主导地位,所有的科学研究都离不开计算机,计算机也与我们的生活息息相关,其功能之强大已为人们深刻认识,并且已经进入了人类生活的各个领域,在企业信息管理等方面也尤其重要。使用计算机管理企业的各类信息不仅比传统的人工管理更方便快捷,而且更宜于长久保存,使用计算机管理的方法还有着更多的优点。例如:可靠性高,存储量大,保密
16、性好,查询便捷,使用寿命长等。商业楼盘销售管理已经是房地产企业不可或缺的部分,其中的房屋信息管理部分,它的内容对于单位的管理者来说都至关重要,所以,房屋信息管理可以为房地产企业提供更全面的信息和更便捷的查询方式。可是人们习惯了传统的人工方式管理文件信息,该管理方式存在着许多缺点,时间一长,将产生大量的文件和数据,这对于查找、更新和维护都带来不少的困难。房地产企业在我国迅速发展的今天,由于大量的楼盘和房产信息在人工管理上面显得更加繁琐困难,数据量也比较大,而且如今网络已经普及到家庭里,网上楼盘的销售也变得流行及广泛,因此构建商业楼盘销售管理系统是极其重要,也是非常迫切的。1.2项目开发背景及意义
17、 房地产企业在我国迅速发展的今天,由于大量的楼盘和房产信息在人工管理上面显得更加繁琐困难,数据量也比较大,而且如今网络已经普及到家庭里,网上楼盘的销售也变得流行及广泛,因此构建商业楼盘销售管理系统是极其重要,也是非常迫切的。2 系统开发环境及运行简介2.1 Visual Basic 2005简介Microsoft公司在,2005年11月,正式推出了Visual Studio 2005 应用程序开发平台。Visual Studio 2005 是在Visual Studio .NET 2003开发平台上做了进一步的改进,并在这新一代的开发平台中提出了许多新的概念,实现了许多新技术的 2.2Visu
18、al Basic 语言的特色及编程优势2.2.1可视化的程序设计Visual Basic率先采用可视化(Visual)的程序设计方法。利用系统提供的大量可视化控件,可以方便地以可视化直接绘制用户图形界面,并可直观动态地调整界面的风格和样式直到满意为止,从而克服了以前必须用大量代码去描述界面的外观和位置的传统方式。用VB开发程序,就像搭积木盖房子一样,系统提供的可视化控件如同盖房子要用的钢筋、砖瓦原料,通过不同控件的搭配组合可方便地构造出所需的应用程序。2.2.2 面向对象的程序设计思想面向对象的程序设计是伴随Windows图形界面的诞生而产生的一种新的程序设计思想,与传统的程序设计有着较大区别
19、。VB使用了面向对象的程序设计思想。所谓对象可比作是现实生活中的一个人,每个可见的实体。同样对象在程序中所赋给它的功能是不同的,比如在图形界面上有两个命令按钮,一个用来实现数据的统计计算,另一个用来数据打印,这两个按钮就可视为两个不同的对象,为实现这两个对象各自不同的功能,接下来就应该分别针对这两个对象编写程序代码,这种编程的思想和方法,即所谓的“面向对象的程序设计”。2.2.3事件驱动的编程机制VB采用了事件驱动的编程机制。在VB中,对象与程序代码通过事件及事件过程来联系,对象活跃性则通过它对事件的敏感性来体现。一个对象(控件)往往可以感知和接收多个不同类型的事件,每个事件均能驱动一段程序(
20、事件过程)完成对象响应的工作,从而实现一个预编程的功能,比如命令按钮是编程常用的一个对象若用鼠标在它上面单击一下,便会在该对象上产生一个鼠标单击事件(Click),与此同时,VB系统就会自动调用执行命令按钮对象的Click事件过程,从而实现事件驱动的功能。VB编程没有明显的主程序概念,程序员所需要做的就是面向不同的对象分别编写它们的事件过程。若希望其对象在事件发生后能做出预测,则只需在该对象的该事件过程中编写代码即可,整个VB应用程序就是由这些彼此相互独立的事件过程构成,事件过程的执行与否以及执行的顺序取决于操作时用户所引发的事件来决定。若用户未触发任何事件则系统处于等等状态。2.2.4高度的
21、可扩充性VB是一种高度可扩充的语言,除自身强大的功能外,还为其用户扩充其功能提供了各种途径,主要体现在以下三方面:(1)支持第三方软件商为其开发的可视化控件对象。VB除自身带许多功能强大、实用的可视化控件以外,还支持第三方软件商为扩充其功能而开发的可视化控件,从而大大增加了VB的编程实力。(2)支持访问动态链接库(Dynamic link Library, 简称DLL)。VB在对硬件的控制和低级操作方面显得力不从心,为此,VB 提供了访问动态数据库的功能。(3)支持访问应用程序接口(API)。应用程序接口(Application program interface 简称API)是Windows
22、环境中可供任何Windows应用程序访问和调用的一组函数集合。在微软Windows操作系统中,包含了1000多个功能强大,经过严格测试的API函数。可大大增强VB的编程能力,并可实现一些VB本身不能实现的功能。2.2.5支持大型数据库的连接与存取操作VB提供了强大的数据库管理和存取操作能力,尤其是企业版的Visual Basic,利用它可轻松开发出各种大型的客户/服务器应用程序。另外,VB还支持动态数据交换,对象的链接与嵌入等新型的编程技术。2.3系统运行环境2.3.1硬件环境需要有奔腾166MHZ以上的CPU才能运行该系统;还需要640kb的常规内存,16MB扩展内存,有32MB以上内存更好
23、;硬盘空间必须达到2G以上,房屋销售管理系统安装之后至少还剩余500M左右。2.3.2软件环境 Windows95以上的操作系统平台,并且中文版本 。3需求分析3.1可行性分析3.1.1技术可行性分析该系统功能比较简单,各个子系统也比较直观,而且采用Visual Studio 2005实现,SQL Server 2005作为这个系统的数据库。这2个软件都比较简单,自己也比较熟练,再加上网上也有许多类似的系统做参考,对于实现该系统起了很大的帮助,只要花点时间去学习并了解其各个功能的作用,所以在技术方面是比较可行的。3.1.2经济可行性分析(1)房屋基本信息房屋基本信息包括了所有的房屋信息,并且可
24、对这些信息通过房间编号进行查询。对房屋基本信息进行修改或者删除,也可以添加新的房屋信息,并保存到数据库中。(2)楼盘基本信息楼盘基本信息包括了所有的楼盘信息,并且可对这些信息通过楼盘名称进行查询。对楼盘基本信息进行修改或者删除,也可以添加新的楼盘信息,并保存到数据库中。3.2系统需求分析根据系统分析,该管理系统要求如下:1. 用户要求:该企业的员工或者管理者,且用户名和密码只能通过管理员获得,不能自行注册 。2. 系统性能要求:a.用户操作便捷,直观,简单。b.快速稳定的执行任务。c.系统安全;d.便于维护;e.有一定的容错性。3. 系统用例图及用例说明a.用户登录用例图如图3.1所示;图3.
25、1用户登录用例说明用例名称登录参与者 用户目标 登录使用系统前置条件 系统登录窗口已经打开基本事件流 1. 用户打开商业楼盘销售管理系统;2. 用户输入用户名和密码并点击登录按钮;b.商业楼盘销售管理系统用例图如图3.2所示;图3.2房屋信息管理用例说明用例名称房屋信息管理参与者 用户目标 对数据库中的房屋信息进行管理前置条件 成功登录商业楼盘销售管理系统基本事件流 1. 用户登录系统后点击房屋信息管理按钮2. 读取磁盘引导扇区及分区表等信息到指定文件c.房屋信息管理子系统用例图如图3.3所示图3.3房屋基本信息用例说明用例名称房屋基本信息参与者 用户目标 对所有的房屋基本信息进行管理前置条件
26、 成功登录商业楼盘销售管理系统,并点击了房屋信息管理按钮基本事件流 1. 用户点击房屋基本信息按钮;2. 输入想要查询的房屋编号,点击查询按钮;3. 对查寻出来的房屋信息进行查看、编辑、删除;4. 如果查询不出房屋信息,用户可以填写该房屋的编号和房屋的基本 信息,然后点击添加按钮,该信息就会被存入数据库中;5. 用户使用完毕,点击退出按钮;楼盘基本信息用例说明用例名称楼盘基本信息参与者 用户目标 对所有的房屋基本信息进行管理前置条件 成功登录商业楼盘销售管理系统,并点击了房屋信息管理按钮基本事件流 1. 用户点击楼盘基本信息按钮;2. 输入想要查询的楼盘名称,点击查询按钮;3. 对查寻出来的楼
27、盘信息进行查看、编辑、删除;4. 如果查询不出楼盘的信息,用户可以填写该楼盘的名称和楼盘的基本 信息,然后点击添加按钮,该信息就会被存入数据库中;5. 用户使用完毕,点击退出按钮;d.房屋基本信息用例图如图3.4所示图3.4查询用例说明用例名称查询(房屋基本信息)参与者 用户目标 对储存在数据库中的房屋基本信息通过房屋编号进行查询前置条件 成功登录商业楼盘销售管理系统,并使用房屋基本信息查询功能基本事件流 1. 用户在查询框内输入房屋编号,点击查询按钮2. 系统从数据库中调出对应的数据供用户查看添加用例说明用例名称添加(房屋基本信息)参与者 用户目标 添加新的房屋基本信息存储到数据库中前置条件
28、 成功登录商业楼盘销售管理系统,并使用房屋基本信息添加功能基本事件流 1. 用户在房屋基本信息文本框内填写要添加的房屋基本信息2. 点击添加按钮3. 系统把新数据存储到数据库中修改用例说明用例名称修改(房屋基本信息)参与者 用户目标 对存储在数据库中的房屋基本信息进行修改前置条件 成功登录商业楼盘销售管理系统,并使用房屋基本信息修改功能基本事件流 1. 用户在查询框内输入房屋编号,点击查询按钮2. 系统从数据库中调出对应的数据供用户查看3. 用户在文本框内填写要修改的信息并点击修改按钮4. 系统更新数据库删除用例说明用例名称删除(房屋基本信息)参与者 用户目标 对存储在数据库中的房屋基本信息进
29、行删除前置条件 成功登录商业楼盘销售管理系统,并使用房屋基本信息删除功能基本事件流 1. 用户在查询框内输入房屋编号,点击查询按钮2. 系统从数据库中调出对应的数据供用户查看3. 用户选择该条信息并点击删除按钮4. 系统更新数据库e.楼盘基本信息用例图如图3.5所示图3.5查询用例说明用例名称查询(楼盘基本信息)参与者 用户目标 对储存在数据库中的楼盘基本信息通过楼盘名称进行查询前置条件 成功登录商业楼盘销售管理系统,并使用楼盘基本信息查询功能基本事件流 1. 用户在查询框内输入房屋名称,点击查询按钮2. 系统从数据库中调出对应的数据供用户查看添加用例说明用例名称添加(楼盘基本信息)参与者 用
30、户目标 添加新的楼盘基本信息存储到数据库中前置条件 成功登录商业楼盘销售管理系统,并使用楼盘基本信息添加功能基本事件流 1. 用户在楼盘基本信息文本框内填写要添加的楼盘基本信息2. 点击添加按钮3. 系统把新数据存储到数据库中修改用例说明用例名称修改(楼盘基本信息)参与者 用户目标 对存储在数据库中的楼盘基本信息进行修改前置条件 成功登录商业楼盘销售管理系统,并使用楼盘基本信息修改功能基本事件流 1. 用户在查询框内输入楼盘名称,点击查询按钮2. 系统从数据库中调出对应的数据供用户查看3. 用户在文本框内填写要修改的信息并点击修改按钮4. 系统更新数据库删除用例说明用例名称删除(楼盘基本信息)
31、参与者 用户目标 对存储在数据库中的楼盘基本信息进行删除前置条件 成功登录商业楼盘销售管理系统,并使用楼盘基本信息删除功能基本事件流 1. 用户在查询框内输入楼盘名称,点击查询按钮2. 系统从数据库中调出对应的数据供用户查看3. 用户选择该条信息并点击删除按钮4. 系统更新数据库3.3系统总体结构根据上述功能和模块可划分系统结构如图3.1所示。图3.1系统结构图该系统主要实现的是房屋信息管理模块,其中包括房屋基本信息和楼盘基本信息的添加、修改、删除、查询。3.4 系统的整体流程根据一般工资管理流程,结合上述各模块和功能,本系统基本流程如图24所示。图24 系统的整体流程3.5系统的技术难点1、
32、建立合理的表结构,避免数据冗余通过特定字段实现不同表的数据连接,避免数据冗余,需要设计简洁高效的表结构。 2、建立相当的系统安全性登录用户身份的验证机制的设计、操作页面的权限保护。 3、建立严密的数据表操作机制同一表有可能在多个模块中被修改,所以严密的数据表操作机制的建立十分比较困难的,但也是必须的。除了设计时必须有相当程度的考虑,在编制时更应加强程序逻辑的可靠性和程序调试的全面性。第3章 数据库结构设计3.1数据库需求分析在仔细分析调查有关工资信息需要的基础上,得到如下所示的数据项和数据结构:1. 用户表(User):包括的数据项有:员工编号、员工姓名、性别、登录密码、职位、职位判断标志2.
33、 员工月表现表(MonthDisplay):包括数据项有:顺序号、员工编号、日期、奖金、保险、加班次数、旷工次数3. 职位-工资表(Pos-Sal):包括数据项有: 职位、月基本工资、旷工一次扣钱、加班一天加钱4. 保存表(Save):包括数据项有:顺序号、员工编号、职位、日期、员工姓名、性别、月基本工资、奖金、保险、加班次数、旷工次数、月总工资3.2数据库的概念结构设计本实例根据上面的设计规划出的实体有:普通员工实体、管理员实体、工资实体。实体与实体之间的系E-R如图3-2所示 图3-2 实体之间的关系E-R图3.3数据库的逻辑结构设计我们需要将上面的数据库概念结构转化为Visual Bas
34、ic数据库系统所支持的实际数据模型,也就是数据库的逻辑结构。在上面的实体以及实体之间关系的基础上,形成数据库中的表格以及各个表格之间的关系。职工管理系统-工资管理数据库中的各个表的设计结果如下面的几个表格所示。每个表格表示在数据库中的一个表。本系统将使用SQL Server 2005作为数据库管理系统(Database Management DBMS)。在SQL Server中,新建一个数据库,将其命名为职工管理系统.mdf,将新建的数据库放置在应用程序的目录中,以备使用。在数据库中共建立四张表,当系统运行时可通过数据环境的初始化来完成连接对象的属性设置。具体创建表的方法可参考文献数据库系统概
35、论中具体介绍。以下为系统所需的四张表:User表表31 表User的结构字段名字段说明类型类型或宽度备注id员工编号文本10关键字name员工姓名文本20不能为空sex性别文本10不能为空pwd登录密码文本10不能为空position职位文本10不能为空flag职位判断标志文本10不能为空MonthDisplay表表32 表MonthDisplay的结构字段名字段说明类型类型或宽度备注no顺序号数字整型关键字id员工编号文本10不能为空yearmonth时间文本10不能为空bouns奖金数字整型可以为空insurance保险数字整型可以为空Pos-Sal表表33 表Pos-Sal的结构字段名字
36、段说明类型类型或宽度备注position职位文本10关键字basicsalary月基本工资数字整型不能为空absentcut旷工一次扣钱数字10可以为空overadd加班一天加钱数字10可以为空Save表表34 表Save的结构字段名字段说明类型类型或宽度备注no顺序号数字整型关键字id员工编号文本10不能为空position职位文本10不能为空yearmonth时间文本10不能为空name员工姓名文本20不能为空sex性别文本10不能为空basicsalary月基本工资数字整型不能为空bouns奖金数字整型可以为空insurance保险数字整型可以为空overtimes加班次数数字整型可以为
37、空absenttimes旷工次数数字整型可以为空第4章 系统的窗体设计4.1主窗体 运行本系统,首先出现Splash窗体,如图4-1-1所示。在Splash窗体中,显示了系统的名称、版本信息、开发平台、数据环境等信息。用户在窗体上单击鼠标,Splash窗体消失,进入登录窗体。如果在一段时间内用户无响应,Splash窗体也会自动消失,系统自动进入登录窗体。图4-1-1 系统Splash窗体Splash窗体代码:Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Ti
38、mer1.Tick Static s As Single s = s + 1 Splash.Opacity = (100 - s) / 100 If Splash.Opacity = 0 Then Timer1.Stop() Splash.Close() End If End Sub Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load Splash.ShowDialog()End SubSplash窗体运行结束后,会出现登录窗体,如图4-1-
39、2所示。本系统的用户分为两种类型:普通用户类型和管理员用户类型。所有的用户都使用同一个登陆窗体进行登录,根据使用者身份的不同,用户可以在单选框按钮中选择所要登录的用户的类型,并输入相应的用户名和密码。图4-1-2 系统登录界面登录窗体代码:Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click conn.ConnectionString = Data Source=PC-201203271107SQLEXPRESS;Initial Ca
40、talog=职工管理系统; User ID=sa;Password=123456 If RadioButton1.Checked = True Then userid = TextBox1.Text flagsta = 2 Dim sql As String = SELECT * FROM 职工管理系统.dbo.User where id= & TextBox1.Text & and pwd = & TextBox2.Text & and flag = 2 Dim com As New SqlCommand(sql, conn) conn.Open() Dim reader As SqlDat
41、aReader = com.ExecuteReader() If reader.Read() = True Then Select Case reader(0).ToString().Trim() Case Is = 工资管理 管理员登录.工资查看ToolStripMenuItem.Visible = False 管理员登录.工资结算ToolStripMenuItem.Visible = False 管理员登录.工资设置ToolStripMenuItem.Visible = False End Select Me.Hide() 管理员登录.Show() Else Dim msg As Inte
42、ger msg = MsgBox(输入错误,请重新输入!, 0 + 48 + 0, 提示) If msg = 1 Then TextBox2.Clear() TextBox1.Clear() TextBox1.Focus() End If End If conn.Close() ElseIf RadioButton2.Checked = True Then userid = TextBox1.Text flagsta = 1 Dim sql1 As String = SELECT * FROM 职工管理系统.dbo.User where id= & TextBox1.Text & and pwd = & TextBox2.Text & and flag = 1 Dim com1 As New SqlCommand(sql1, conn) conn.Open() Dim reader1 As SqlDataReader = com1.ExecuteReader() If reader1.Read() = True And RadioButton2.Checked = True Then Select Ca