系统_取所有磁盘盘符（） 函数未清空陈接数组

APPLEUFO

  

子程序名	返回值类型	公开	备 注
系统_取所有磁盘盘符	整数型		返回磁盘数量
参数名	类 型	参考	可空	数组	备 注
装载盘符的数组	文本型				装载盘符的数组

变量名	类 型	静态	数组	备 注
盘符	字节集
盘符名称	字节集		0
计次	整数型
长度	整数型
磁盘数量	整数型

盘符 ＝ 取空白字节集 (255)
长度 ＝ GetLogicalDriveStringsA (255, 盘符)
盘符 ＝ 取字节集左边 (盘符, 长度)
盘符名称 ＝ 分割字节集 (盘符, { 0 }, )
磁盘数量 ＝ 取数组成员数 (盘符名称)
计次循环首 (磁盘数量, 计次)
加入成员 (装载盘符的数组, 取文本左边 (到文本 (盘符名称 [计次]), 1))
计次循环尾 ()
返回 (磁盘数量)

.版本 2<br /> <br /> .子程序 系统_取所有磁盘盘符, 整数型, 公开, 返回磁盘数量<br /> .参数 装载盘符的数组, 文本型, 参考 可空 数组, 装载盘符的数组<br /> .局部变量 盘符, 字节集<br /> .局部变量 盘符名称, 字节集, , "0"<br /> .局部变量 计次, 整数型<br /> .局部变量 长度, 整数型<br /> .局部变量 磁盘数量, 整数型<br /> <br /> 盘符 ＝ 取空白字节集 (255)<br /> 长度 ＝ GetLogicalDriveStringsA (255, 盘符)<br /> 盘符 ＝ 取字节集左边 (盘符, 长度)<br /> 盘符名称 ＝ 分割字节集 (盘符, { 0 }, )<br /> 磁盘数量 ＝ 取数组成员数 (盘符名称)<br /> .计次循环首 (磁盘数量, 计次)<br />     加入成员 (装载盘符的数组, 取文本左边 (到文本 (盘符名称 [计次]), 1))<br /> .计次循环尾 ()<br /> 返回 (磁盘数量)

前面没清除数组，所以如果不是空变量被调用的话，结果就会  =原始变量+结果变量  了

1051496412

。。。这眼力好牛