求助，关于数组的问题

bbip · 发表于 2009-6-13 12:41:14

本帖最后由 bbip 于 2009-6-14 09:56 编辑

我想以字符串的形式输出一组数组，数组如下

$string1=GUICtrlRead($edit1)
Dim $text[StringLen($string1)]
For $i = 1 To StringLen($string1)
$text[$i]=StringToBinary(StringMid($string1, $i, 1) & $Nul)

Next

我想把数组$text[$i]中所有的元素连接起来用一个字符串输出，请问该如何做？谢谢了

bbip · 发表于 2009-6-13 13:48:07

期待高手出现......

rchockxm · 发表于 2009-6-13 16:29:55

$temp = ""
For $i In $text
$temp = $temp & $i
Next

$temp 就是所有連接完的變量了

pcbar · 发表于 2009-6-13 16:59:53

_ArrayToString($text,"")

lynfr8 · 发表于 2009-6-13 17:10:06

针对楼上再给个例子加深理解在数组里面的‘FOR IN $aArray NEXT’循环语句的应用

Dim $aArray[4]
$aArray[0]="a"
$aArray[1]=0
$aArray[2]=1.3434
$aArray[3]="测试"

$string = ""
FOR $element IN $aArray
    $string = $string & $element 
NEXT

Msgbox(0,"For..IN 数组测试","结果: " & @CRLF & $string)

kn007 · 发表于 2009-6-13 17:10:37

学习下。。。

bbip · 发表于 2009-6-14 09:56:47

问题解决了，用的三楼的方法，其他方法我再测试一下，pcbar 的方法好简洁，喜欢....

wangxi0414 · 发表于 2009-8-18 10:27:24

学习了，谢谢

		自动登录	找回密码
密码			加入