主题：想实现前列中内容能自动计算，汇总到后一列中

参考代码

Dim str As String = "1+2+3+4+5【连续相加】+2+4+6+8【偶数相加】"
str = System.Text.RegularExpressions.Regex.Replace(str, "[^0-9+\-*/\.]", "")
msgbox(str)