论坛 › 已解决问题区 › [已解决]如何将分组的实数值转换到二维数组？谢谢！！！

131738 发表于 2011-3-10 22:30:47

[已解决]如何将分组的实数值转换到二维数组？谢谢！！！

本帖最后由 131738 于 2011-3-11 00:50 编辑

刚才发的提问帖，问题没有解决！重新说明，求答案

下面的实数值，以 " | " 为界,转换到二维数组, 因如何处理呢?谢谢！！！

62，27|106，92|51,63

下面的方法有点笨了。。。看了 23 楼的回帖，好像异曲同工。。。呵呵。。。#include <Array.au3>
$A = "62,27|106,92|51,63"
$AA = StringSplit ( $A, "|")
For $i = 1 To $AA
        _ArrayDisplay($AA,'Debug~~~')
        $AAA = StringSplit ( $AA[$i], ",")
        _ArrayDisplay($AAA,'Debug~~~')
        MsgBox(0,"X",$AAA)       
        MsgBox(0,"y",$AAA)
Next

happytc 发表于 2011-3-10 23:07:07

你的逗号倒底是中文的，还是英文的逗号，是打错了，还是真的需要：一会中文逗号，一会英文逗号
我先算你打错了吧，下面是“全是英文逗号下的解决方法：

#include <Array.au3>
Local $str, $Split, $Temp
$str = "62, 27|106, 92|51,63"

$Split = StringSplit($str, "|")
If IsArray($Split) Then
        Local $Count
        $Count = $Split
        Local $Array[$Count + 1]
        For $i = 1 To $Count
                $Temp = StringSplit($Split[$i], ",")
                $Array[$i] = Number($Temp)
                $Array[$i] = Number($Temp)
        Next
EndIf

_ArrayDisplay($Array)

yhxhappy 发表于 2011-3-10 23:51:54

我想楼主想搞清楚的是什么往现有的二维数组后添加行吧？ 借用一下楼上的代码#include <Array.au3>
Local $str, $Split, $Temp
Dim $Array
$str = "62, 27|106, 92|51,63"

$Split = StringSplit($str, "|")
If IsArray($Split) Then
        For $i = 1 To $Split
                $Temp = StringSplit($Split[$i], ",")
                ReDim $Array
                $Array = Number($Temp)
                $Array = Number($Temp)
        Next
EndIf
$Array = UBound($Array)-1
_ArrayDisplay($Array)

131738 发表于 2011-3-10 23:53:00

你的逗号倒底是中文的，还是英文的逗号，是打错了，还是真的需要：一会中文逗号，一会英文逗号
我先算你打 ...
happytc 发表于 2011-3-10 23:07 http://autoitx.com/images/common/back.gif

谢谢！！！逗号错了，抱歉。。。再次谢谢您的代码！！！

131738 发表于 2011-3-11 00:48:40

回复 3# yhxhappy

谢谢！！！！！

查看完整版本: [已解决]如何将分组的实数值转换到二维数组？谢谢！！！