模块与VBA程序设计实验报告

实验11 模块与VBA程序设计

一、实验目的

1、掌握建立标准模块及窗体模块的方法 2、熟悉VBA开发环境及数据类型

3、掌握常量、变量、函数及其表达式的用法

4、掌握程序设计的顺序结构、分支结构、循环结构 5、了解VBA的过程及参数传递

6、掌握变量的定义方法和不同的作用域和生存期 7、了解数据库的访问技术 二、实验内容

实验11-1创建标准模块和窗体模块 1、 实验要求

在 “罗斯文.accdb” 数据库中创建一个标准模块“M1”，并添加过程“P1”和“P2”。 2、 实验步骤

（1） 打开“罗斯文.accdb”数据库，选择“创建”选项卡→“宏与代码”组→单击“模

块”按钮，打开VBE窗口。选择“插入”→过程，弹出过程对话框，如图11-1所示。

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

（2） 在过程对话框中“名称”文本框输入“P1”,“类型”栏选择“子程序”，“范围”栏

选择“公共的”，单击“确定”，如图11-2所示。

图 11-2 添加过程

（3） 在代码窗口中输入 “P1”的子过程代码，如图11-3所示。

图 11-3 P1子过程代码

（4） 单击“视图”→“立即窗口”菜单命令，打开立即窗口，并在立即窗口中输入“Call

P1(

第9章 模块与VBA程序设计_习题

一、选择题

1．模块是存储代码的容器，其中窗体就是一种（ ）。A

A．类模块 B．标准模块 C．子过程 D．函数过程 2．使用Dim声明变量，若省略“As类型”，则所创建的变量默认为（ ）。C A．Integer B．String C．Variant D．不合法变量 3．函数Len(\数据库\的值是（ ）。A

A．9 B．12 C．15 D．18

4．函数Right(Left(Mid(\Access_DataBase\,10,3),2),1)的值是（ ）。A A．a B．B C．t D．空格 5．在下列逻辑表达式中，能正确表示条件“m和n至少有一个为偶数”的是（ ）。C

A．m Mod 2 = 1 Or n Mod 2 = 1 B．m Mod 2 = 1 And n Mod 2 = 1 C．m Mod 2 = 0 Or n M

第8章 模和块BAV序程设计1

gxz1729110h1x1@6.3com1

第8 模块章和 章模 和VBA程序块设计 程序计设本章要求: 本要章求：1、了V解B编A环境程 、;了 编解环程境 编；程环境 、2握掌BV编A程础基：常，变量量，达表式 、;掌握编 基础：程 程编础 基常量变量，,表达式； 3、握掌序顺制控选，控制，择环控循 制、握顺掌控制，选择序控制，4、 解了BA模V 、了解 块块模

本章点：要 章本要：点掌顺握控制序选择，控，制 掌顺序握控制选择，制控循，环制控学时排安：学时 安排:6时(学理论+)6时(学实践) 学(理时论+6)时(学践)实学 时2zg1972x0111xh163@.cmo

第8 章块和模 模块和章VA程B序计 程序设计● 设模的概念 块●V A程B序计设础 基● 常标准函数用● VBA的程序构 ● V结BA的据数库程编 ●过调用和参数程递

3

zgx传1720111hx91@36c.om

第章8模块 章和 模和VBA程块序计设 序程计在A设cecss统中系把宏、,窗和报表等对象结体 合起来，不编用程写序码代就可建立以能较功善 完数的库据管系理统但宏。的能功有局是性限的它， 只处理能些简单一操的，如作要果实功现强

第8章 模和块BAV序程设计1

gxz1729110h1x1@6.3com1

第8 模块章和 章模 和VBA程序块设计 程序计设本章要求: 本要章求：1、了V解B编A环境程 、;了 编解环程境 编；程环境 、2握掌BV编A程础基：常，变量量，达表式 、;掌握编 基础：程 程编础 基常量变量，,表达式； 3、握掌序顺制控选，控制，择环控循 制、握顺掌控制，选择序控制，4、 解了BA模V 、了解 块块模

本章点：要 章本要：点掌顺握控制序选择，控，制 掌顺序握控制选择，制控循，环制控学时排安：学时 安排:6时(学理论+)6时(学实践) 学(理时论+6)时(学践)实学 时2zg1972x0111xh163@.cmo

第8 章块和模 模块和章VA程B序计 程序设计● 设模的概念 块●V A程B序计设础 基● 常标准函数用● VBA的程序构 ● V结BA的据数库程编 ●过调用和参数程递

3

zgx传1720111hx91@36c.om

第章8模块 章和 模和VBA程块序计设 序程计在A设cecss统中系把宏、,窗和报表等对象结体 合起来，不编用程写序码代就可建立以能较功善 完数的库据管系理统但宏。的能功有局是性限的它， 只处理能些简单一操的，如作要果实功现强

实验二分支程序设计实验实验报告

实验名称：分支程序设计实验

指导教师罗志祥

专业班级光信1006 姓名张博学号U9 联系方式

1

2 一、任务要求：

熟练掌握KeilC 环境下汇编语言程序的调试方法，加深对汇编语言指令、机器码、寻址方式等基本内容的理解，掌握分支程序和简单程序的设计与调试方法，了解并行IO 口的使用。

1. 设有8bits 符号数X 存于外部RAM 单元，按以下方式计算后的结果Y 也存于外部RAM 单元，请按要求编写程序。

240/2204020X X Y X X X

X ?≥?=<

2. 利用51系列单片机设计一个24小时制电子时钟，电子时钟的时、分、秒数值分别通过P0、P1、P2端口输出（以压缩BCD 码的形式）。为低电平时开始计时，为高电平时停止计时。

提高部分（选做）：

a. 实现4位十进制加、减1计数，千位、百位由P1口输出；十位、个位由P2口输出。利用状态选择加、减计数方式。

b. 利用P3口低四位状态控制开始和停止计数，控制方式自定。

二、设计思路：

1.分支函数程序设计：首先将X 赋给累加器A ，与40比较大小，将大于或等于40的执行乘方操作；小于40的再与20做比较，大于20的执行取除法操作，小于或等于20的执行取反操

Java程序设计实验报告

学号： 姓名： 座位号： 实验日期： 【实验名称】： JDK配置与开发工具的使用 【实验目的】：

1． 熟悉JDK开发环境。

2． 熟悉EditPlus编辑器或Eclipse等开发环境的使用。

3． 掌握Java Application的程序结构和开发过程。 【实验内容及要求】：

1． JDK安装。

2． 设置环境变量。

3． 分别运用EditPlus和Eclipse编写并运行一个简单的“Hello World！”应用程序。

【程序输出结果与结果分析】： Helloworld

【自评分及理由，自己的体会和收获】：

主要是熟悉jdk的开发环境，环境变量的设置。 Editplus需要设置环境变量，eclipse不用

Path的环境变量设置C:\\EditPlus\\jdk1.6.0\\bin

Classpath的环境变量的设置.;C:\\EditPlus\\jdk1.6.0\\bin

【程序代码】： Editplus： class Helloworld {

public static void main(String[

(此文档为word格式，下载后您可任意编辑修改！)

台州学院

《VB程序设计》实验报告

实验1.1 设计一个程序，程序运行的初始界面如图1-1所示。当单击“显示”按钮时，在文本框中显示“欢迎使用VB！”（图1-1）；当单击“清除”按钮时，清除文本框内的文本；当单击“退出”按钮时，结束程序运行。 Private Sub Command1_Click() Text1.Text = \欢迎使用VB！\End Sub

Private Sub Command2_Click() Text1.Text = \End Sub

Private Sub Command3_Click() End End Sub

实验1.2 设计一个程序，程序运行的初始界面如图1-3所示，其中“显示”按钮为不可用。同时要求：

（1）当单击“改变文字”按钮时，在左边标签文字内容改为“你好，张三！”，同时“改变文字”按钮变为不

1 可用（图1-4）；

（2）当单击“隐藏”按钮时，将左边标签设为不可见，同时“隐藏”按钮变为不可用，“显示”按钮变为可用（图1-5）；

（3）当单击“显示”按钮时，重新显示左边标签，同时“隐藏”按钮变为可用，“显示”

Privat

学号：0740303104

姓名：雷凤 循环程序设计实验报告

一、实验目的：

1、了解和掌握比较循环程序的组成部分，重复控制指令的功能、作用和方法。

2、学会循环程序设计的方法。 3、学习汇编语言输出输入语句的设计。 二、实验要求：

1、具体了解和掌握循环程序的组成部分，重复控制指令的使用和在使用时应注意的问题

2、学习循环序设计的一般方法。 三、实验内容 1、实验任务

设有N个学生的某科成绩（百分制），已按学号的次序存放在以STUD为首址的字单元数组中，现要求按成绩的高低记入名次，并把名次填入成绩所在的字单元的高字节中。 字单元的格式为

名次 成绩

2、实验的原理

这个实验要用循环的嵌套，内外循环都循环6次，刚开始时将所有的

名次都置1，外循环从第一个成绩开始依次与每一个学生（包括自己）的成绩比较大小，要是小于，相应的名次就加1，再将第二个成绩与所有的分数依次比较大小，一直循环6次，就能得出名次排序了，将相应的名次分别保存在dl低字节中，也便于输出名次。 3、程序设计流程图

开始 BX<-STUD存区首址 CX<-外循环次数 DL<-1 AL<-[BX] CX<-内循环次数 SI<-STUD存区首址 AL<[SI] DL<-DL+1 SI<-SI+2 SI<-SI+2 CX<-CX-1 [BX+1]<-DL BX<-BX+2 CX<-CX-1 结束 四、实验步骤

1、编辑源程序，建立一个以后缀为 ．ASM的文件.

DATAS SEGMENT

;此处输入数据段代码 STUD

Windows程序设计平时作业报告

平时作业（2）报告

题目1 会员管理软件

Windows程序设计平时作业

目录

一、

简介.................................................................................................................. 2 需求分析.......................................................................................................... 2 分析设计.......................................................................................................... 3

二、

三、

第 1 页 共 7 页

Windows程序设计平时作业

程序设计基础

1

实验一

（3）<2> 读入三个整数a、b、c，交换它们中的数，使a存放b的值，b存放c的值，c存放a的值。

#include void main() { int a,b,c,temp; cout<<\ cin>>a>>b>>c; temp=a; a=b; b=c; c=temp; cout<

（3）<3> 对任意输入的四位整数，分别求出其各位数字，并按从后到前的顺序依次输出。例如，输入为1234时，输出结果为4，3，2，1。 #include void main() { int a,b,c,d,n;

2

}

cout<<\cin>>n;

if(n>999&&n<10000){ a=n/1000; b=(n00)/100; c=(n0)/10; d=n; cout<

实验二

（2）<1> 求解下面函数的值。

e x<0,y<0 z= ln(x+y) 1≤x+y〈10 log10 其它情况 #include #include void main() { float x,y,z; cout

3

|x+y|+1x+y

}

cin>>x>>y; if(x<0&&y<0){ z=exp(x+y); }

if(x+y>=1&&x+y<10){ z=log(x+y);

}else z=log10(fabs(x+y)+1); cout<

<2> 编程求解下列各计算式: 1) Ｓ＝

?i＝１＋２＋３＋…＋１００