VB+数据库+串口图文教程.doc

先看下面的文字：VB很简单，比C语言简单很多，文科生学习的都是VB。以下是我的想法： 1.理解并熟悉基本的ActiveX控件（包括属性、调用方法）； 2.理解并掌握变量、函数（方法）的定义与调用；以上两点都是很基本的要求，但是都要进行编程实验，从最简单的开始，一步步开始，一步步熟悉，不然即使有现成的代码完成了设计也很难有实质性进步。下面开始实质性要求了：1. 熟悉下图基本控件，熟悉其基本属性、基本方法，并掌握变量、函数（方法）的定义与调用；这部分可能会要求写十几个（以上的）程序，很是很难坚持的，但是请你一定注意，没有这部分的训练，VB对你来说就真的没什么价值了。这一个过程最好持续一周！最少三天！注意：保留你做的每一个程序，哪怕很简单，但这却是你进步的足迹。【要求】最终完成一定复杂度的计算器程序。如下图：如果太难，那你自己完成一个自己认为可以胜任的（代码100行）2. 现在开始进阶了，在这部分，结合本次课程设计，你重点了解数据库和串口方面的知识。放心，我现在已经在进行这样的工作，即把相关的资料整理在下面的网站上/?p=482 （现在可能还没有更新，但是可能会很快的！）这样，你会节约大量的时间，进步很快!给你一个模板：下面开始一下具体的图文讲解了：串口操作：1. 打开串口控件工程部件，然后选择：确认后会发现有如下控件2. 设置参数MSComm1.Settings = 9600,n,8,1MSComm1.RThreshold = 1MSComm1.CommPort = 4MSComm1.InputMode = comInputModeText 二进制接收打开If MSComm1.PortOpen = False Thenask = MsgBox(打开串口失败,请连接好串口！, vbExclamation, 警告)End IfMSComm1.PortOpen = True关闭MSComm1.PortOpen = False接收数据Dim intInputLen As IntegerSelect Case MSComm1.CommEventCase comEvReceive 时间触发此处添加处理接收的代码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. Moven：移动n条记录，当n大于零，则向前（记录集尾部）移动n条记录，当n小于零，则向后（记录集头部）移动n条记录。Example：（注意体会！）上一条Adodc1.Recordset.MovePreviousIf Adodc1.Recordset.BOF Then Adodc1.Recordset.MoveFirst下一条Adodc1.Recordset.MoveNextIf Adodc1.Recordset.EOF Then Adodc1.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语句中的字段一样，如果是这个表，那该怎