VB+数据库+串口图文教程Word下载.docx

VB+数据库+串口图文教程Word下载.docx

《VB+数据库+串口图文教程Word下载.docx》由会员分享，可在线阅读，更多相关《VB+数据库+串口图文教程Word下载.docx（20页珍藏版）》请在冰点文库上搜索。

保留你做的每一个程序，哪怕很简单，但这却是你进步的足迹。

【要求】最终完成一定复杂度的计算器程序。

如下图：

如果太难，那你自己完成一个自己认为可以胜任的（代码>

100行）

2.现在开始进阶了，在这部分，结合本次课程设计，你重点了解数据库和串口方面的知识。

放心，我现在已经在进行这样的工作，即把相关的资料整理在下面的网站上

（现在可能还没有更新，但是可能会很快的！

）

这样，你会节约大量的时间，进步很快!

给你一个模板：

下面开始一下具体的图文讲解了：

串口操作：

1.打开串口控件

工程——部件，然后选择：

确认后会发现有如下控件

2.设置参数

MSComm1.Settings="

9600,n,8,1"

MSComm1.RThreshold=1

MSComm1.CommPort=4

MSComm1.InputMode=comInputModeText'

二进制接收

打开

IfMSComm1.PortOpen=FalseThen

ask=MsgBox（"

打开串口失败,请连接好串口！

"

vbExclamation,"

警告"

EndIf

MSComm1.PortOpen=True

关闭

MSComm1.PortOpen=False

接收数据

DimintInputLenAsInteger

SelectCaseMSComm1.CommEvent

CasecomEvReceive‘时间触发

'

此处添加处理接收的代码

intInputLen=MSComm1.InBufferCount‘读取数据

发送数据

MSComm1.OutBufferCount=0‘缓冲区清零

MSComm1.Output=Outbyte‘发数据,Outbyte为想发的数据

数据库操作

1.添加Adodc和DataGrid控件

工程——部件选择如下图

确认后会有如下控件

2.添加ADO控件在窗体上加一个ADO控件

选中后右键选择ADODC属性打开属性页如下图

点击生成然后选择

下一步后选择数据库（在这之前你应该建好数据库，并写有数据）

关于数据库的创建，在本文档的最后会有介绍。

选择好数据库测试连接成功

确定后回到属性页点击记录源填写如下SQL语句（其中，命令文本中的time，tem，temcode，id应为你自己的数据库中的字段。

在窗体上再添加一个文本框

把其属性设置为：

运行你可以看到text中显示的就是数据库中的数据了。

再在窗体上添加一个DataGrid控件：

设置属性：

运行可以看到：

关于具体数据库具体操作（这里指代码级）还有很多内容，这个一时下面我作一些简单介绍（这些只能支持简单的数据库操作）：

浏览记录集：

1.AbsoloutPostion属性

AbsoloutPostion返回当前的记录集值，第n条记录的AbsoloutPostion属性值为n。

2.BOF和EOF的属性

BOF判定记录指针是否在首记录之前，若BOF为True，则当前位置位于记录集的第1条记录之前；

与此类似，EOF判定记录指针是否在末记录之后。

（这很重要，自己去体会！

3.RecordCount属性

略！

（自己看看）

4.Find方法

（不是不重要，知识内容有点多，打字很浪费时间，另本次任务基本可不用）

5.Move方法

使用Move方法可以使用代码控制指针的位置：

1.MoveFirst：

移动至第一条记录；

2.MoveLast：

移动至最后一条记录；

3.MoveNext：

移动至下一条记录；

4.MovePrevious：

移动至前一条记录；

5.Move[n]：

移动n条记录，当n大于零，则向前（记录集尾部）移动n条记录，当n小于零，则向后（记录集头部）移动n条记录。

Example：

（注意体会！

‘上一条

Adodc1.Recordset.MovePrevious

IfAdodc1.Recordset.BOFThenAdodc1.Recordset.MoveFirst

‘下一条

Adodc1.Recordset.MoveNext

IfAdodc1.Recordset.EOFThenAdodc1.Recordset.MoveLast

‘第一条

Adodc1.Recordset.MoveFirst

‘最后一条

Adodc1.Recordset.MoveLast

记录集的编辑：

1.数据编辑方法：

AddNew：

在记录中增加一个新行；

Delete：

删除记录集中当前的记录；

Updata：

确定所做的修改并保存到数据源中；

CancelUpdate：

取消未调用Updata操作之前对记录所做的所有操作；

2.增加记录的方法

1.调用AddNew方法，在记录集内增加一条空记录；

2.给新记录各个字段赋值。

可以通过绑定的控件直接输入，也可以使用程序代码给字段直接赋值；

3.调用Updata方法，确定所做的修改，将缓冲区中的数据写入数据库中。

3.删除记录

1.定位被删除的记录，使之成为当前的记录；

2.调用Delete方法；

3.移动记录指针。

4.修改记录

ADO数据控件有较高的智能，档改变当前的数据项的内容时，ADO自动进入编辑状态，在数据项编辑后，只要改变数据项的指针或调用Updata方法，即可确定所做的修改。

如果要放弃所做的修改，必须在Updata方法前使用CancelUpdata方法。

创建数据库

打开数据库软件，我用的是Access2007其他版本基本一样。

1.创建表

2.保存表选中——右键——保存

重命名test确定

3.在选中——右键——设计视图

3.添加字段设计属性。

这里我随便添加几个（做温度采集时要想正确连接必须和上位机中SQL语句中的字段一样，如果是这个表，那该怎样写呢？

Answer：

Selecttest_name,test_age,test_numberFromtest或Select*Fromtest

字段属性很好理解自己看着就会！

5.选中——右键——保存

6.在选中——右键——数据表视图

7.填写数据。

8保存,数据表创建完毕。