我正在尝试在我的 richtextbox 多行中查找一个字符，我想对它们旁边的整数求和。 我正在寻找如下字符“M”：

我正在尝试在我的 richtextbox 多行中查找一个字符，我想对它们旁边的整数求和。 我正在寻找如下字符“M”：

68.9米 4.13米 5.05米

删除 M 并试图对它们求和，但它只是删除 M 而不显示任何总和

Visual Basic for Applications

Dim sum As Integer = 0

        RichTextBox1.Text = RichTextBox1.Text.Replace("M", "")

        For Each s As String In RichTextBox1.Lines

            Dim num As Integer = 0

            If Integer.TryParse(s, num) Then

                sum += num

                MsgBox(sum)

            End If

        Next

我该如何尝试修复它？