已解决数据重复提取问题

wuni2000 · 发表于 2012-4-20 16:54:55

本帖最后由 wuni2000 于 2012-4-20 21:56 编辑

室号:C-401 建筑面积:1622.74m2 参考价格:7000元/m2
我要提取C-401 1622.74 7000 这三个数据分别存放在变量a1,a2,a3里。怎么实现？

apoorman1986 · 发表于 2012-4-20 18:10:12

本帖最后由 apoorman1986 于 2012-4-20 18:13 编辑


Local $str="室号:C-401   建筑面积:1622.74m2   参考价格:7000元/m2"
Local $arrary
Local $a1,$a2,$a3
$arrary=StringRegExp($str,"\w\-\d+",3)
$a1=$arrary[0]
$arrary=StringRegExp($str,"(\d+\.\d*)m2",3)
$a2=$arrary[0]
$arrary=StringRegExp($str,"(\d+)\S/m2",3)
$a3=$arrary[0]
MsgBox(0,"",$a1&" "&$a2&" "&$a3)

试一下，行不？

lixiaolong · 发表于 2012-4-20 19:19:23

Local $a1, $a2, $a3
Local $Str = '室号:C-401   建筑面积:1622.74m2   参考价格:7000元/m2'

$Test = StringRegExp($Str, '(?<=:)[^\sm元]+', 3)

If Not @error Then
        For $i = 0 To UBound($Test) - 1
                Assign('a' & $i + 1, $Test[$i])
        Next
EndIf

MsgBox(0, "", "$a1=" & $a1 & @CRLF & "$a2=" & $a2 & @CRLF & "$a3=" & $a3)

xms77 · 发表于 2012-4-20 21:47:46

回复 3# lixiaolong
学习了 Assign函数功能，谢谢！

wuni2000 · 发表于 2012-4-20 21:49:29

感谢大家的回复！

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

[AU3基础] 已解决数据重复提取问题

评分

相关帖子

评分

评分