| ■No85020 (夜叉丸 さん) に返信
VB.NETソースですが
RectangleF.ToString()の結果であれば
Dim rf As New RectangleF(CSng(TextBox1.Text), CSng(TextBox2.Text), CSng(TextBox3.Text), CSng(TextBox4.Text))
Dim re As New Regex("(?<Column>\w+)=(?<Val>[^,}]+)[,}]") <--- 最後は *?)[,}]でも大丈夫かも。
For Each m In re.Matches(rf.ToString).OfType(Of Match)
Console.WriteLine($"{m.Groups("Column")} = {m.Groups("Val")}")
Next
こんな感じでどうでしょう? |