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
$arrary=StringRegExp($str,"(\d+\.\d*)m2",3)
$a2=$arrary
$arrary=StringRegExp($str,"(\d+)\S/m2",3)
$a3=$arrary
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

感谢大家的回复！
页: [1]
查看完整版本: 已解决数据重复提取问题