#include <array.au3>
Dim $Str = "您的IP是:[113.137.155.549] 来自:陕西省榆林市 电信"
Dim $text = StringRegExp($Str, "\d{1,3}\.\d{1,3}\.\d{1,3}\.\d{1,3}|].*?:(\S*)", 3)
If IsArray($text) Then _ArrayDisplay($text)
#include <array.au3>
Dim $Str = "您的IP是:[113.137.155.549] 来自:陕西省榆林市 电信"
Dim $text = StringRegExp($Str, "\[(.+)].*?:(\S*)", 3)
If IsArray($text) Then _ArrayDisplay($text)