先看下面的文字：VB很简单，比C语言简单很多，文科生学习的都是VB。以下是我的想法： 1.理解并熟悉基本的ActiveX控件（包括属性、调用方法）； 2.理解并掌握变量、函数（方法）的定义与调用；以上两点都是很基本的要求，但是都要进行编程实验，从最简单的开始，一步步开始，一步步熟悉，不然即使有现成的代码完成了设计也很难有实质性进步。下面开始实质性要求了：1. 熟悉下图基本控件，熟悉其基本属性、基本方法，并掌握变量、函数（方法）的定义与调用；这部分可能会要求写十几个（以上的）程序，很是很难坚持的，但是请你一定注意，没有这部分的训练，VB对你来说就真的没什么价值了。这一个过程最好持续一周！最少三天！注意：保留你做的每一个程序，哪怕很简单，但这却是你进步的足迹。【要求】最终完成一定复杂度的计算器程序。如下图：如果太难，那你自己完成一个自己认为可以胜任的（代码100行）2. 现在开始进阶了，在这部分，结合本次课程设计，你重点了解数据库和串口方面的知识。放心，我现在已经在进行这样的工作，即把相关的资料整理在下面的网站上http:/hushi.sinaapp.com/?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语句中的字段一样，如果是这个表，那该怎样写呢？）Answer：Select test_name,test_age,test_number From test 或 Select * From test字段属性很好理解 自己看着就会！5. 选中右键保存6. 在选中右键数据表视图7. 填写数据。8 保存,数据表创建完毕。解决党委自身和基层党支部存在的的突出问题，发挥各村、社区、机关单位党支部在当前城市征迁、园区建设、招商引资、服务群众、维护稳定的作用，我镇党委高度重视，制定了切合临淮实际的活动实施方案，按照中央规定的活动步骤和要求扎实有效的开展了基层组织建设年活动。