首页
学习
活动
专区
工具
TVP
发布
精选内容/技术社群/优惠产品,尽在小程序
立即前往

ACCESS 数据库-VBA程序设计(1)

1.创建标准模块与窗体模块

2.常量、变量、函数及表达式的使用

3.数据类型、输入、输出函数及程序的顺序结构

4.选择结构if语句及SelectCase 语句的使用

5.Do While循环、For循环语句的使用

6.VBA过程、过程的参数传递、变量的作用域和生存期

7.VBA数据库的访问

创建标准模块和窗体模块

1.在 “教学管理.accdb” 数据库中创建一个标准模块“M1”,并添加过程“P1”

操作步骤:

(1)打开“教学管理.accdb”数据库,选择“创建”选项卡——“宏与代码”组——单击“模块”按钮,打开VBE窗口。选择“插入”——过程,弹出过程对话框

图6-1VBE菜单栏及插入菜单的下拉菜单

图6-2添加过程对话框

图6-3过程的建立及调用

(2)在代码窗口中输入一个名称为“P1”的子过程,如图6-3所示。单击“视图”→“立即窗口”菜单命令,打开立即窗口,并在立即窗口中输入“Call P1( )”,并按回车键,或单击工具栏中的“运行子过程/用户窗体”按钮,查看运行结果。

(3)单击工具栏中的“保存”按钮,输入模块名称为“M1”,保存模块。单击工具栏中的“视图Microsoft office Access”按钮,返回Access。

2.为模块“M1”添加一个子过程“P2”

操作步骤:

(1)在数据库窗口中,选择“模块”对象,再双击“M1”,打开VBE窗口。

(2)输入以下代码:

SubP2()

Dim nameAs String

name =InputBox("请输入姓名", "输入")

MsgBox"欢迎您" & name

End Sub

(3)单击工具栏中的“运行子过程/用户窗体”按钮,运行P2,输入自己的姓名,查看运行结果。

(4)单击工具栏中的“保存”按钮,保存模块。

3.创建窗体模块和事件响应过程

操作步骤:

(1)在数据库窗口中,选“窗体”对象,单击“新建”按钮,选择“设计视图”,打开窗体的设计视图,再单击工具栏中的“代码”按钮,打开VBE窗口,输入以下代码:

PrivateSub Form_Click()

Dim StrAs String, k As Integer

Str ="ab"

For k =Len(Str) To 1 Step -1

Str = Str& Chr(Asc(Mid(Str, k, 1)) + k)

Next k

MsgBoxStr

End Sub

(2)单击保存按钮,将窗体保存为“Form7_1”,单击工具栏中的“视图Microsoftoffice Access”按钮,返回到窗体的设计视图中。

(3)选择“视图”→“窗体视图”菜单命令,单击窗体,消息框里显示的结果是__________________。

  • 发表于:
  • 原文链接https://kuaibao.qq.com/s/20180818G0OT4G00?refer=cp_1026
  • 腾讯「腾讯云开发者社区」是腾讯内容开放平台帐号(企鹅号)传播渠道之一,根据《腾讯内容开放平台服务协议》转载发布内容。
  • 如有侵权,请联系 cloudcommunity@tencent.com 删除。

扫码

添加站长 进交流群

领取专属 10元无门槛券

私享最新 技术干货

扫码加入开发者社群
领券