第 6 页
模块的名称。如果你更改类模块名称 Array1D190505 为 Array1D 那么这个程序中所有的
Array1D190505 都要替换成 Array1D。替换菜单快捷键为 Ctrl+F。
（2）Dim obj As New Array1D190505 的位置可以在 Form1 窗体代码的最上层，也就是声
明窗体级别函数变量的位置。这样该 Form1 窗体下所有子程序调用该类模块 Array1D190505
就不需要再次定义和初始化类模块 Array1D190505 了。
把先前的代码改成如下的代码：
Option Explicit
Dim obj As New Array1D190505’定义和初始化
Private Sub Command1_Click()
Dim Data(1 To 3) As Double
Dim Sum As Double
Data(1) = 1.1
Data(2) = 1.2
Data(3) = 1.3
Sum = obj.Array1DSum(Data)
Debug.Print Sum
End Sub
Private Sub Command2_Click()
Dim Data(1 To 3) As Double
Dim RData() As Long
Dim i As Long
Data(1) = 1
Data(2) = 2
Data(3) = 3
obj.Array1DCDataTypeDtoL Data, RData
For i = 1 To 3
Debug.Print RData(i)
Next i
End Sub
Private Sub Command3_Click()
Dim Data(1 To 6) As Double
Dim Max As Double
Data(1) = 1.1
Data(2) = -2
Data(3) = 3.342
Data(4) = 0
Data(5) = 4.1
Data(6) = -3.145
Max = obj.Array1DMax(Data)
Debug.Print Max
End Sub
然后发现和前面修改前的代码效果是一样的。区别是 Dim obj As New Array1D190505 的
生命周期变成了 Form1 窗体的生命周期，也就是 Form1 存在的话就可以在 Form1 内可以直
剩余924页未读，继续阅读
weixin_42429467
- 粉丝: 19
- 资源: 18
我的内容管理
展开
最新资源
- zlib-1.2.12压缩包解析与技术要点
- 微信小程序滑动选项卡源码模版发布
- Unity虚拟人物唇同步插件Oculus Lipsync介绍
- Nginx 1.18.0版本WinSW自动安装与管理指南
- Java Swing和JDBC实现的ATM系统源码解析
- 掌握Spark Streaming与Maven集成的分布式大数据处理
- 深入学习推荐系统：教程、案例与项目实践
- Web开发者必备的取色工具软件介绍
- C语言实现李春葆数据结构实验程序
- 超市管理系统开发：asp+SQL Server 2005实战
- Redis伪集群搭建教程与实践
- 掌握网络活动细节：Wireshark v3.6.3网络嗅探工具详解
- 全面掌握美赛：建模、分析与编程实现教程
- Java图书馆系统完整项目源码及SQL文件解析
- PCtoLCD2002软件：高效图片和字符取模转换
- Java开发的体育赛事在线购票系统源码分析
资源上传下载、课程学习等过程中有任何疑问或建议，欢迎提出宝贵意见哦~我们会及时处理！
点击此处反馈
