Access数据库、Excel表格与VB编程完美结合实现Excel表格透视功能-vb数据库( 四 )


Access数据库、Excel表格与VB编程完美结合实现Excel表格透视功能-vb数据库

文章插图
运行之后 。就是这样了:
Access数据库、Excel表格与VB编程完美结合实现Excel表格透视功能-vb数据库

文章插图
点一下下面新增加的这种按钮 。就是刚刚我们编编辑代码的控件 。程序就开始运行:
Access数据库、Excel表格与VB编程完美结合实现Excel表格透视功能-vb数据库

文章插图
可以观看到的 。我们刚刚编编辑的程序立马运行完成 。点一下确认 。来观望我们的资料库里面有什么变化吧:
Access数据库、Excel表格与VB编程完美结合实现Excel表格透视功能-vb数据库

文章插图
总分算出去了 。并且还在我们的资料库里面增加了一个字段 。就是我们在程序里面已经添加的 。其实 。这是最简单的 。只有更杂乱的事情才会动用我们去编程序 。所以先把简单的学会 。杂乱的大自然而然长久以来就学会 。
Access数据库、Excel表格与VB编程完美结合实现Excel表格透视功能-vb数据库

文章插图
Access资料库对字段进行分类查询有时 。我们想要对资料库中的某类资料进行分类整理 。使得结果清晰可见 。下面这种学生成绩表的总分 。我们已经算出去了 。我们想要很直观的表示哪个学生三门的平均成绩及格啦 。哪些没有及格:
Access数据库、Excel表格与VB编程完美结合实现Excel表格透视功能-vb数据库

文章插图
那么有什么途径可以实现呢?下面我们来观望这两种途径:
一是使用update语句对字段进行更新改写
第一步 。进入设计视图 。新建一个字段 。字段名是成绩分类
Access数据库、Excel表格与VB编程完美结合实现Excel表格透视功能-vb数据库

文章插图
回到资料表视图吧 。
第二步 。创建一个查询 。编辑查询语句:
update xscj set 成绩分类='及格' where 总分数>=180
Access数据库、Excel表格与VB编程完美结合实现Excel表格透视功能-vb数据库

文章插图
运行结果:
Access数据库、Excel表格与VB编程完美结合实现Excel表格透视功能-vb数据库

文章插图
第三步 。再创建一个查询 。查询语句为:
update xscj set 成绩分类='及格' where 总分数<180
Access数据库、Excel表格与VB编程完美结合实现Excel表格透视功能-vb数据库

文章插图
运行结果:
Access数据库、Excel表格与VB编程完美结合实现Excel表格透视功能-vb数据库

文章插图
再来观望第二种途径
二是使用iif函数直接对表进行查询
创建一个查询 。查询语句为:
select 姓名,iif(总分数<180,'不及格','及格') as 平均成绩 from xscj
Access数据库、Excel表格与VB编程完美结合实现Excel表格透视功能-vb数据库

文章插图
运行结果:
Access数据库、Excel表格与VB编程完美结合实现Excel表格透视功能-vb数据库

文章插图
第一种途径曾经碰触过 。就是对已一些学生成绩表进行更新查询 。也就是对原表进行了增加字段的改变 。这里面我们使用的是update语句 。这种语句有特定的语法格式:
update 表名 set 字段名 where 条件第二种途径中的iif函数 。我们并不总是碰触到 。但是这种函数对我们平时是非常有用的 。它能够在不改写表的状态下 。查询出我们想要的结果 。它事实并没有对原来存在的学生成绩表进行改变 。
所以 。两种途径 。当需要改变时 。我们用第一种途径 。当不需要对原表进行改变时 。我们选择第二种途径 。你记住这种iff函数的语法格式:
【iif(条件,结果1,结果2)】 。当条件满足时 。即为真时 。那么就返回结果1 。不然返回结果2 。上面的查询表示当总分数满足小于180分的时候 。我们就返回“不及格”的结果 。不然返回“及格”的结果 。

推荐阅读