Vb.net 如何通过单击按钮计算richtext中的空格并将其插入文本字段？

我想计算文本字段中存在的每个空格的空格数

这是我的职责：

  Private Sub btncntspace_Click(ByVal sender As System.Object, ByVal e As  System.EventArgs) Handles btncntspace.Click

    txtcountspace.Text = txttyping.Text.Length(" ").ToString
End Sub

---

我想您需要计算给定字符串中空格字符的出现次数。据我所知，你可以用LINQ

value.Count(Function(c) c = " "c)

希望我能帮忙

 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim cnt As Int32 = 0
        If RichTextBox1.TextLength > 0 Then
            For i = 0 To RichTextBox1.TextLength - 1
                If String.IsNullOrWhiteSpace(RichTextBox1.Text(i).ToString()) Then
                    cnt = cnt + 1
                    MsgBox(cnt.ToString())
                End If
            Next
        End If
    End Sub

Dim spacescount as Integer = 0
For Each character as Char in RichTextBox1.Text
    If character = " " then
        spacescount +=1
    End If
Next