建立数据库并在VB中读取数据.doc

上传人:ng****60 文档编号:2194537 上传时间:2019-05-01 格式:DOC 页数:5 大小:222KB
下载 相关 举报
建立数据库并在VB中读取数据.doc_第1页
第1页 / 共5页
建立数据库并在VB中读取数据.doc_第2页
第2页 / 共5页
建立数据库并在VB中读取数据.doc_第3页
第3页 / 共5页
建立数据库并在VB中读取数据.doc_第4页
第4页 / 共5页
建立数据库并在VB中读取数据.doc_第5页
第5页 / 共5页
亲,该文档总共5页,全部预览完了,如果喜欢就下载吧!
资源描述

1、可以找一本 VB 的书,找到创建数据库的章节,根据步骤,建立一个数据库。建成的数据库是可以在 office access 中打开的如图。视化数据管理器是 VB 提供的一个非常实用的、可视化的数据库管理工具。使用它可以非常方便地完成创建数据库、建立数据表、数据库查询等工作。可视化的工作界面为用户带来了极大的方便。本设计中建立一个名为“记录数据.mdb”的数据库,并在其中创建了表“监测数据” ,在表中设计了五个字段的数据列,分别是转速、电机电流、直流母线电压、有功功率和无功功率。如图 3-17 所示。调用数据库的程序如下:Private Sub Timer1_Timer() 每隔一秒从数据库中读取

2、一行数据TimeCount = TimeCount + 1Dim m As StringAdodc1.ConnectionString=“Provider=Microsoft.Jet.OLEDB.4.0;DataSource=D:VBa 保存的文件 记录数据.mdb;Persist Security Info=False“ 打开数据库Adodc1.RecordSource = “select * from 监测数据 “ 选择数据库中的监测数据表格Adodc1.RefreshAdodc1.Recordset.MoveFirst 读首行数据N = Adodc1.Recordset.RecordCo

3、unt For i = 0 To N - 1m = Adodc1.Recordset.Fields(0) If m = TimeCount Then 读取 m 列的数据Text1.Text = Adodc1.Recordset.Fields(1) 转速读取Text2.Text = Adodc1.Recordset.Fields(2) 电流读取Text4.Text = Adodc1.Recordset.Fields(3) 电压读取Text5.Text = Adodc1.Recordset.Fields(4) 温度读取Text6.Text = Adodc1.Recordset.Fields(5) 无功功率读取Text14.Text = Adodc1.Recordset.Fields(6) 有功功率读取Exit SubElseAdodc1.Recordset.MoveNextEnd IfNext iEnd Sub电流的波形为近似的正弦波,如图3-12所示。图 3-12 电机电流实时波形图3-13 直流母线电压实时波形 图3-14 转速实时波形图 3-15 有功功率实时波形 图 3-16 无功功率实时波形

展开阅读全文
相关资源
相关搜索

当前位置:首页 > 教育教学资料库 > 精品笔记

Copyright © 2018-2021 Wenke99.com All rights reserved

工信部备案号浙ICP备20026746号-2  

公安局备案号:浙公网安备33038302330469号

本站为C2C交文档易平台,即用户上传的文档直接卖给下载用户,本站只是网络服务中间平台,所有原创文档下载所得归上传人所有,若您发现上传作品侵犯了您的权利,请立刻联系网站客服并提供证据,平台将在3个工作日内予以改正。