从文本框中的单词的末尾删除逗号

Question

我试图从使用VBA的文本框中的名称末尾删除逗号。有了这个问题，我首先必须通过点击一个命令按钮来将一个名称分类到两个文本框中。问题是用户可能输入名称为FirstName, LastName或FirstName (single space) LastName。现在我被卡住，试图删除逗号。删除特定的数字或字母已取得成功，但删除逗号将无效。我得到的消息是语法错误。我的代码：

Private Sub CommandButton1_Click() 
Dim LNFN As String 
Dim LastName As String 
Dim FirstName As String 
LNFN = TextBox4.Text 
FirstName = Split(LNFN)(1) 
LastName = Split(LNFN)(0) 
TextBox2.Text = FirstName 
TextBox3.Text = LastName 
TextBox2 = TextBox2.Value 
If Right(TestBox2, 1) = “,” Then 
    TempString = Left(TextBox2, Len(TextBox2) - 1) 
End If 
TextBox2.Text = TempString 
End Sub 

Answer 1

试试这个：

LNFN = Replace(TextBox4.Text, ",", "") 

然后，你将不再需要任何正在处理逗号其他代码。