Vba 从文本框打开CSV文件

我正在开发一个用户表单，如下所示

浏览按钮中的代码是

Private Sub Browse_Click()

    Dim fName As String
        fName = Application.GetOpenFilename("CSV File (*.csv), *.csv", , "Import .CSV File", , False)

    If Not fName = "False" Then
        TextBox1.Value = fName
    End If

End Sub

下一步是选择这些选项中的一些选项，后面的代码是

Private Sub Start_Click()

    Dim Actsheet As String
    Dim wkbCrntWorkBook As Workbook
    Dim wkbSourceBook As Workbook
    Dim rngSourceRange As Range
    Dim rngDestination As Range
    Set wkbCrntWorkBook = ActiveWorkbook
    Set rngDestination = wkbCrntWorkBook.ActiveSheet.Range("A1:A1")


    If myBeforeImprovements = True Then
        Actsheet = "Before "
    ElseIf AfterImprovements = True Then
        Actsheet = "After "
    Else
        MsgBox ("Select Type of Analysis")
        Exit Sub
    End If


    If Westbound = True Then
        Actsheet = Actsheet & "WB"
    ElseIf Northbound = True Then
        Actsheet = Actsheet & "NB"
    ElseIf Eastbound = True Then
        Actsheet = Actsheet & "EB"
    ElseIf Southbound = True Then
        Actsheet = Actsheet & "SB"
    Else
        MsgBox ("Select Traffic Bound")
        Exit Sub
    End If

我的问题是我不能将CSV文件带到它的书写表，因为它是 电子商务之前 WB之前 NB之前 在某人面前 EB之后 WB之后 NB之后 追求某人

也许下面的代码将引用所选的CSV文件，但它给了我一个错误

Workbooks.OpenText Filename:=TextBox1.Text + "," + ComboBox1.Value + ".txt", _
DataType:=xlDelimited, Tab:=True

---

将+替换为&希望它能更好地工作。串联运算符是&in VBA

Sam，感谢您的回复。我试过了，但没有成功