VB6一行代码给数组所有成员除一个数字

Array_Divide

双精度数组所有成员除一个数字。

引用

Public Declare Sub Array_Divide Lib "VB6Plus.dll" (ByRef Data() As Double, ByVal divideValue As Double)

参数说明

Data：一维数组。支持 Data(x to y) 数组。

注意事项

如果divideValue是0，函数将不被执行。

示例

Array_Divide dblArrData, 1.2 '数组所有成员除1.2

一行代码给数组成员(一千万)除一个数字

Array_Divide dblArrData, 1.2

结果