删除空格的文本框中的单词

时间:2017-02-28 11:17:31

标签: vb.net ms-access

我正在尝试将单词分开,但FirstNameMiddleName中仍有空格。

查看截图: Sample image

这是我的代码:

Dim str As String = ListView1.Items(ListView1.SelectedIndices(0)).SubItems(2).Text
Dim splitStr As String() = str.Split(","c)
txtLastName.Text = splitStr(0).ToString()
txtFirstName.Text = splitStr(1).ToString()
txtMiddleInitial.Text = splitStr(2).ToString()

我的代码遗漏了什么吗?

1 个答案:

答案 0 :(得分:1)

要从String的开头和结尾删除空白字符,我会使用String.Trim

  

从当前String对象中删除所有前导和尾随空白字符。

要在代码中执行此操作,只需将.Trim()附加到String的末尾:

Dim str As String = ListView1.Items(ListView1.SelectedIndices(0)).SubItems(2).Text
Dim splitStr As String() = str.Split(","c)
txtLastName.Text = splitStr(0).ToString().Trim()
txtFirstName.Text = splitStr(1).ToString().Trim()
txtMiddleInitial.Text = splitStr(2).ToString().Trim()

作为旁注,因为splitStr(.)已经是String,您不需要使用ToString()

txtLastName.Text = splitStr(0).Trim()
txtFirstName.Text = splitStr(1).Trim()
txtMiddleInitial.Text = splitStr(2).Trim()

要测试,这是我的代码:

Dim str As String = "LOWELL, JOHN, F"
Dim splitStr As String() = str.Split(","c)

TextBox1.Text = splitStr(0)
TextBox2.Text = splitStr(1)
TextBox3.Text = splitStr(2)

TextBox4.Text = splitStr(0).Trim()
TextBox5.Text = splitStr(1).Trim()
TextBox6.Text = splitStr(2).Trim()

这是我的输出:

enter image description here

TextBox订单与代码相同。您可以使用.Trim()查看从底部集合中移除空白区域的位置。