VB.net 2010 视频教程 VB.net 2010 视频教程 python基础视频教程
SQL Server 2008 视频教程 c#入门经典教程 Visual Basic从门到精通视频教程
当前位置:
首页 > 数据库 > Access数据库 >
  • VB操作Access数据库小记 ———————————————— 版权声明:本文为

 
因工作需要,同时为了避免大量繁琐工作,特研究了一下VB操作Access数据库,代码编写好后一劳永逸,极大提高了效率。本人是VB小白,在网上查阅了一些资料后动手操作,记录以备查阅。
 
工作环境:Windows操作系统,Microsoft Access2010(需安装完整版)
 
         数据库部分字段和内容如下图:
 
数据库部分字段图
 
 
 
数据库数据图
 
 
 
         有了米,开始下锅,大致步骤是:新建窗体——放置按钮——为按钮编写事件代码。
 
         打开上图文件名为users的Access数据库(库中包含一个users表,表内有上千条数据),然后按如下步骤操作。
 
1、创建窗体
 
 
 
2、在窗体上放置按钮
 
 
 
将窗体模式改为设计视图
 
 
 
3、设置按钮属性并编写事件代码
 
为按钮设置一个标题
 
 
 
 为按钮注册事件
 
 
 
进入到VB编辑模式:
 
 
 
编写VB代码,在Private Sub Command0_Click()和End Sub之间编写代码,如下图:
 
 
 
          语句str1、str2的完整代码如下:
 
str1 = "UPDATE users SET carWeight=carWeight-overWeight-int(rnd(billNum)*800),overWeightPercent='0' WHERE overWeight>1000 AND limiteWeight<>0 AND date BETWEEN '" + startDate + "' AND '" + endDate + "'"
str2 = "UPDATE users SET carWeight=int(carWeight/10)*10,overWeight=0 WHERE overWeight>1000 AND limiteWeight<>0 AND date BETWEEN '" + startDate + "' AND '" + endDate + "'"
 
         特别需要注意的是:Access数据库中SQL语句中日期值要用单引号引起来,在VB语言中,一个单引号开头表示注释。SQL语句是字符串,字符串用双引号引起来,里面的日期值再使用单引号引起来。另外由于在声明变量时startDate和endDate是字符串值,在SQL语句拼接变量时,语句中的单引号不能漏掉,否则报错。
 
4、保存窗体,并为窗体取名字
 
 
 
 
 
5、运行
 
进入“窗体视图”,点击窗体上的按钮,就可以执行自己编写的VB代码了,运行结果如下图:
 
 
 
         VB语法和函数的使用均查阅网络和MSDN手册,经过不断尝试,出错调试终得成功!
 
 
————————————————
版权声明:本文为CSDN博主「Love_Chubby」的原创文章,遵循CC 4.0 BY-SA版权协议,转载请附上原文出处链接及本声明。
原文链接:https://blog.csdn.net/sbftxgq/article/details/81975437
相关教程