做一个查询软件vb vb查询软件 - 电脑 - 【南平电脑网】_南平电脑维修_南平笔记本电脑维修_监控安装_市区上门维修
公司动态

做一个查询软件vb vb查询软件

摘要:如何用vb做一个地铁查询系统需要用到数据库知识,建你先学学数据库知识再来做吧!一两句话说不清楚!用EXCEL的话就看看这个吧 这份教程我曾给过很多人了,大家都说好,您也看一下吧 VB是常用的应用软件开...

发布日期:2020-08-13

做一个查询软件vb

如何用vb做一个地铁查询系统

需要用到数据库知识,建你先学学数据库知识再来做吧!一两句话说不清楚!用EXCEL的话就看看这个吧 这份教程我曾给过很多人了,大家都说好,您也看一下吧 VB是常用的应用软件开发工具之一,由于VB的报表功能有限,而且一但报表格式发生变化,就得相应修改程序,给应用软件的维护工作带来极大的不便。

因此有很多程序员现在已经充分利用EXECL的强大报表功来实现报表功能。

但由于VB与EXCEL由于分别属于不同的应用系统,如何把它们有机地结合在一起,是一个值得我们研究的课题。

一、 VB读写EXCEL表: VB本身提自动化功能可以读写EXCEL表,其方法如下: 1、在工程中引用Microsoft Excel类型库: 从"工程"菜单中选择"引用"栏;选择Microsoft Excel 9.0 Object Library(EXCEL2000),然后选择"确定"。

表示在工程中要引用EXCEL类型库。

2、在通用对象的声明过程中定义EXCEL对象: Dim xlApp As Excel.Application Dim xlBook As Excel.WorkBook Dim xlSheet As Excel.Worksheet 3、在程序中操作EXCEL表常用命令: Set xlApp = CreateObject("Excel.Application") "创建EXCEL对象 Set xlBook = xlApp.Workbooks.Open("文件名") "打开已经存在的EXCEL工件簿文件 xlApp.Visible = True "设置EXCEL对象可见(或不可见) Set xlSheet = xlBook.Worksheets("表名") "设置活动工作表 xlSheet.Cells(row, col) =值 "给单元格(row,col)赋值 xlSheet.PrintOut "打印工作表 xlBook.Close (True) "关闭工作簿 xlApp.Quit "结束EXCEL对象 Set xlApp = Nothing "释放xlApp对象 xlBook.RunAutoMacros (xlAutoOpen) "运行EXCEL启动宏 xlBook.RunAutoMacros (xlAutoClose) "运行EXCEL关闭宏 4、在运用以上VB命令操作EXCEL表时,除非设置EXCEL对象不可见,否则VB程序可继续执行其它操作,也能够关闭EXCEL,同时也可对EXCEL进行操作。

但在EXCEL操作过程中关闭EXCEL对象时,VB程序无法知道,如果此时使用EXCEL对象,则VB程序会产生自动化错误。

形成VB程序无法完全控制EXCEL的状况,使得VB与EXCEL脱节。

二、 EXCEL的宏功能: EXCEL提供一个Visual Basic编辑器,打开Visual Basic编辑器,其中有一工程属性窗口,点击右键菜单的"插入模块",则增加一个"模块1",在此模块中可以运用Visual Basic语言编写函数和过程并称之为宏。

其中,EXCEL有两个自动宏:一个是启动宏(Sub Auto_Open()),另一个是关闭宏(Sub Auto_Close())。

它们的特性是:当用EXCEL打含有启动宏的工簿时,就会自动运行启动宏,同理,当关闭含有关闭宏的工作簿时就会自动运行关闭宏。

但是通过VB的自动化功能来调用EXCEL工作表时,启动宏和关闭宏不会自动运行,而需要在VB中通过命令xlBook.RunAutoMacros (xlAutoOpen)和xlBook.RunAutoMacros (xlAutoClose) 来运行启动宏和关闭宏。

三、 VB与EXCEL的相互勾通: 充分利用EXCEL的启动宏和关闭宏,可以实现VB与EXCEL的相互勾通,其方法如下: 在EXCEL的启动宏中加入一段程序,其功能是在磁盘中写入一个标志文件,同时在关闭宏中加入一段删除此标志文件的程序。

VB程序在执行时通过判断此标志文件存在与否来判断EXCEL是否打开,如果此标志文件存在,表明EXCEL对象正在运行,应该禁止其它程序的运行。

如果此标志文件不存在,表明EXCEL对象已被用户关闭,此时如果要使用EXCEL对象运行,必须重新创建EXCEL对象。

四、举例: 1、在VB中,建立一个FORM,在其上放置两个命令按钮,将Command1的Caption属性改为EXCEL,Command2的Caption属性改为End。

然后在其中输入如下程序: Dim xlApp As Excel.Application "定义EXCEL类 Dim xlBook As Excel.Workbook "定义工件簿类 Dim xlsheet As Excel.Worksheet "定义工作表类 Private Sub Command1_Click() "打开EXCEL过程 If Dir("D:\temp\excel.bz") = "" Then "判断EXCEL是否打开 Set xlApp = CreateObject("Excel.Application") "创建EXCEL应用类 xlApp.Visible = True "设置EXCEL可见 Set xlBook = xlApp.Workbooks.Open("D:\temp\bb.xls") "打开EXCEL工作簿 Set xlsheet = xlBook.Worksheets(1) "打开EXCEL工作表 xlsheet.Activate "激活工作表 xlsheet.Cells(1, 1) = "abc" "给单元格1行驶列赋值 xlBook.RunAutoMacros (xlAutoOpen) 运行EXCEL中的启动宏 Else MsgBox ("EXCEL已打开") End If End Sub Private Sub Command2_Click() If Dir("D:\temp\excel.bz") "" Then "由VB关闭EXCEL xlBook.RunAutoMacros (xlAutoClose) "执行EXCEL关闭宏 xlBook.Close (True) "关闭EXCEL工作簿 xlApp.Quit "关闭EXCEL End If Set xlApp = Nothing "释放EXCEL对象 End End Sub 2、在D盘根目录上建立一个名为Temp的子目录,在Temp目录下建立一个名为"bb.xls"的EXCEL文件。

3、在"bb.xls"中打开Visual Basic编辑器,在工程窗口中点鼠标键选择插入模块,在模块中输入入下程序存盘: Sub auto_open() Open "d:\temp\excel.bz" For Output As #1 "写标志文件 Close #1 End Sub ...

如何用vb制作出一个查询excel表格的软件

这个很简单 请看代码Private Sub Command1_Click()Dim i As IntegerFor i = 0 To List1.ListCount - 1If List1.List(i) = Text1.Text ThenList1.Selected(i) = TrueExit ForElseList1.Selected(i) = FalseEnd IfNextIf i = List1.ListCount ThenMsgBox "", vbOK, "没有找到"End IfEnd SubPrivate Sub Form_Load()List1.AddItem "百度"List1.AddItem "谷歌"List1.AddItem "新浪"List1.AddItem "网易"List1.AddItem "腾讯"List1.AddItem "新浪"Text1.Text = ""End Sub

如何做一个VB的离线查询小程序,比如1000个同事的姓名和电话,要...

你说的是像QQ那样的聊天软件?那恐怕不是一个人能够做出来的,那需要一个团队。

如果是简单的随机连接软件,用VB的WinSock控件可以做出来。

其中还要分UDP和TCP链接。

其中UDP的实现较为简单,但是效果不好,TCP的内容丰富,但做起来有点麻烦。

建议你在做这些之前先熟悉一下Winsock控件的常用属性和方法,另外在去了解网际端口,和即使通信的基础知识。

用VB做一个流动红旗管理软件

按照楼主的想法 当然是用VB好了 因为VB的控件比较不错 像楼住说的功能很容易就会实现 按个键对应的就计算出平均分 或者最高 排顺序等等 按钮和窗口VB在中都是被定义好的 可以直接在窗体(窗口)上画出一个按钮 然后设置按钮属性 比如外型 大小 按钮颜色 标题等等 假如标题为 “平均分” 编写按钮对应的单击事件过程代码如下: sub 按钮控件名_click() 计算平均分过程 end sub 只要写出相应的计算过程 就可以了 当按下按钮的时候 就会激发这个过程来计算平均分 由此可见使用VB编写程序是很简单的 很容易的 VB连接数据库也比较简单(肯定算不上复杂) 就是需要掌握一些想关的知识 比如:一些数据库概念和相关术语 ACCESS 初步会使用 掌握一些基础的SQL语言 等等 掌握上面这些基本就够了 有比较经典VB数据库工程如: 学生信息管理系统 超市系统 等等很容易就会学会的 介绍VB的书中都有访问数据库功能的介绍 做个流动红旗管理系统是很简单的 比学生信息管理和 超市经营简单的多 考虑的实际问题很少 赞同2楼的看法如果仅仅是简单的对少量数据进行处理即输入少量数据 完全可以考虑不连接数据库 使用别的方法采集数据 比如文本控件等 或者可以直接的读取文件 而用VC++做数据库工程的工作量就不说了 谁做谁知道啊!!!! 有人可能会说了 用DELPHI 之类 但是就敷衍了事的原则而言 还是VB好 因为PASCAL语言的语法比较繁琐 而且比较严谨 规则很多 而VB虽然是BASIC语言进化来的 BASIC语言进化的过程中不可避免的牺牲了自己的一些东西 加进一些新东西 语言上有点大杂烩的味道 但是语义还是很严的 不会使人产生歧义的 这点请放心 如果对付事的话还是用VB好 使用VB的人很多 在网上搜索程序例子 源码也很好找到 如果就只做数据库工程而言 VB和DELPHI差之间不多 但他们和PB是没有可比性可言的 因为PB基于SQL语言的 也就是说基于数据库编程的语言 当然使用VFP来写流动红旗管理软件也是个相当不错的选择了学习编程语言不在多而在于精 编程的精髓永远是算法 语言是都次要的 正因为平均数 概率 数学中涉及到的比较多了 这个程序的一些算法对大家不会有任何难度的 所以使用VB DELPHI VFP之类的语言来做 都很容易 不相上下的 当然具体选择什么语言只能看楼主的习惯和爱好了楼主对哪个比较熟悉 或者对哪个感兴趣 有哪门语言的基础 就可以选择相应的语言做为软环境了!