如何对一个不确定长度的数组求最大值、最小值
编号：QA004725
建立日期: 2003年10月13日 最后修改日期：2003年10月13日
所属类别：
Ｑ
hejianzh:
操作系统: windows2000
编程工具: VB6.0
问题: 如何对一个不确定长度的数组求最大值、最小值？
水平: 中级
Ａ回答:
可通过Lbound和Ubound函数确定实参数组的下、上界。UBound() - LBound() + 1就是数组元素的个数。
Lbound和Ubound函数的形式如下：
{L|U}bound(数组名[，维数])
其中：维数指明要测试的是第几维的下标值，缺省是一维数组。
假设myarray是一个数组，下面的程序就是从该数组中找到最大和最小数。
Dim min As Integer, max As Integer
For i = LBound(myarray) + 1 To UBound(myarray)
If myarray(i) < myarray(min) Then min = i Else _
If myarray(i) > myarray(max) Then max = i
Next
相关问题：
QA004676 "在VB中存不存在返回动态数组的元素个数的函数"
此问题由李海回答。
附加关键字：编程, 源程序, programming, source code, Visual Basic, VB, 其他方面, 。
| |
|
|
| |
|
|
