您所在位置: 网站首页 / 第05章 数组与自定义类型.ppt / 文档详情
第05章 数组与自定义类型.ppt 立即下载
2024-12-04
约4.3千字
约76页
0
681KB
举报 版权申诉
预览加载中,请您耐心等待几秒...

第05章 数组与自定义类型.ppt

第05章数组与自定义类型.ppt

预览

免费试读已结束,剩余 71 页请下载文档后查看

10 金币

下载文档

如果您无法下载资料,请参考说明:

1、部分资料下载需要金币,请确保您的账户上有足够的金币

2、已购买过的文档,再次下载不重复扣费

3、资料包下载后请先用软件解压,在使用对应软件打开

5.1数组方法1:把10个学生的成绩均赋值给一个变量。分析表明:
程序中采用一个变量a,只能保存最后一个学生成绩,无法保存所有学生成绩,因此,在统计高于平均分人数时,不得不重复输入成绩,
这种方法存在着:
(1)重复录入数据:用户输入数据的工作量成倍增加;
(2)容易出错:若本次输入的成绩与上次不同,则统计的结果不正确。如果使用:A1,A2,A3,A4,A5,A6,A7,A8,A9,A10如果使用:A1,A2,A3,A4,A5,A6,A7,A8,A9,A10方法3:用数组实现5.1数组5.1数组5.1数组1.一维数组1、静态数组说明
①数组名的定义同变量,以字母开头,不能使用VB中的关键字,且尽可能有意义。例如:
	Dimx(10)AsSingle正确
	DimSub(20)AsLong		错误
	DimMath(1To8)AsSingle	正确
Dim5X(20)AsLong		错误说明:
②数组的维界定义必须为常量或符号常量,或是常量表达式,不能是变量或其表达式。例如:
	Constkasinteger=10
	Dimx(10)AsSingle正确
	Dima(k)aslong		正确
	DimB(5+3)asString	正确
而Dimx(n)AsSingle	错误	③维界的形式是:[下界To]上界
1、当[下界To]缺省时,下界默认值为02、下界≤上界3、数组元素的个数是:上界-下界+14、维界说明如果不是整数,将按四舍五入处理。④As<数据类型>用来说明数组元素的类型,缺省为变体型(Variant)。⑤数组必须先声明后使用。静态数组注意事项
(1)维说明中下界和上界只能取直接常量或直接常量表达式,符号常量和符号常量表达式,不能为变量或包含变量的表达式。
(2)下界维说明可以省略,默认从0开始
Dimx(6)AsString*6
(3)维说明中使用的常量可以为小数,系统自动四舍五入。
Dimx(1To4.3+2)AsInteger静态数组注意事项
(4)用“OptionBase1”可设定数组元素下界为1,将下界默认值从0改为1。
N只能取0,1两个值。该语句只能放在窗体或模块的通用声明段中。
(5)静态数组在同一过程中只能声明一次
(6)声明数组后,各数组元素的初值与声明普通变量相同。
(7)声明数组和声明变量一样,数组也有作用范围。
PravateSubForm_Click()
	……
	PrintA(2)
	……
EndSub7.2数组元素的引用例5-1用InputBox函数向数组a中输入10个整数,找出其中最大值、最小值以及他们对应的数组元素的下标Fori=2To10
Ifa(i)>maxThen
max=a(i):p=i
EndIf
Ifa(i)<minThen
min=a(i):k=i
EndIf
Nexti
Print"max=a("&p&")="&max
Print"min=a("&k&")="&min
EndSub例5-2用Rnd函数产生30个[50,100]区间的随机整数放入数组,计算平均值,输出大于平均值的所有的数及下标。PrivateSubForm_Click()
Dims(30,5)AsInteger,i%,j%
Fori=1To30
Forj=1To4
s(i,j)=Int(51*Rnd)+50
s(i,5)=s(i,5)+s(i,j)
Nextj
s(i,5)=s(i,5)/4
Nexti
Print"学号","数学","英语","物理","化学","总评"
Fori=1To30
Printi,
Forj=1To5
Prints(i,j),
Nextj
Print
Nexti
EndSub
5.1数组的概述7.1数组的概述7.1数组的概述5.1数组5.1数组的概述5.1数组的概述5.1数组的概述5.1数组的概述5.1数组的概述5.1数组的概述5.1数组的概述5.1数组的概述5.1数组的概述5.1.1数组的概述5.1.1数组的概述5.1.1数组的概述5.1数组的概述5.1数组的概述5.1.2数组元素的赋值方法5.1.2数组元素的赋值方法5.1.2数组元素的赋值方法PrivateSubForm_Click()
Dimx(),a%(1To3,1To3),i%,j%
x=Array(1,2,3,4,5,6,7,8,9)
Fori=LBound(x)ToUBound(x)
a(1+i\3,1+iMod3)=x(i)
Nexti
Fori=1To3
Forj=1To3
Printa(i,j);
Nextj
Print
Nexti
EndSub5.1.2数组元素的赋值方法5.1.2数组元素的赋值方法例5-7用文本框输入一组英文单词,统计单词个数,找出排在最前面和最后面的单词。5.1.3输出数组元素的方法例
查看更多
单篇购买
VIP会员(1亿+VIP文档免费下)

扫码即表示接受《下载须知》

第05章 数组与自定义类型

文档大小:681KB

限时特价:扫码查看

• 请登录后再进行扫码购买
• 使用微信/支付宝扫码注册及付费下载,详阅 用户协议 隐私政策
• 如已在其他页面进行付款,请刷新当前页面重试
• 付费购买成功后,此文档可永久免费下载
全场最划算
12个月
199.0
¥360.0
限时特惠
3个月
69.9
¥90.0
新人专享
1个月
19.9
¥30.0
24个月
398.0
¥720.0
6个月会员
139.9
¥180.0

6亿VIP文档任选,共次下载特权。

已优惠

微信/支付宝扫码完成支付,可开具发票

VIP尽享专属权益

VIP文档免费下载

赠送VIP文档免费下载次数

阅读免打扰

去除文档详情页间广告

专属身份标识

尊贵的VIP专属身份标识

高级客服

一对一高级客服服务

多端互通

电脑端/手机端权益通用