2015-10-13 105 views
1

我是一個帶有按鈕和以下文本框的創建客戶窗體:txtCustomerID,txtFirstName,txtLastName,txtPhone,txtEmail。當我點擊按鈕時,在文本框中鍵入的信息被插入到[Customer]表中,並根據txtCustomerID,txtFirstName和txtLastName的值創建一個文件夾。例如,如果..使用Access以特定格式顯示文件夾名稱

txtCustomerID:

txtFirstName:羅恩

txtLastName:史密斯

我想要的文件夾名稱以顯示「100 - 羅恩·史密斯「,但我找不到解決方案來做到這一點。

下面是我使用的代碼,它完美地工作,我只是無法達到我想要顯示文件夾名稱的方式。

Private Sub btnCreate_Click() 
    DoCmd.RunSQL "INSERT INTO [Customer] (CustomerID, FirstName, LastName, Phone, Email) VALUES ('" & Me.txtCustomerID & "', '" & Me.txtFirstName & "', '" & Me.txtLastName & "', '" & Me.txtPhone & "', '" & Me.txtEmail & "')" 

    MkDir ("C:\Users\Desktop\" & txtCustomerID.Value & txtFirstName.Value & txtLastName.Value) 
End Sub 

任何幫助或建議將是巨大的。謝謝

回答

1
MkDir ("C:\Users\Desktop\" & txtCustomerID.Value & " - " & txtFirstName.Value & " " & txtLastName.Value) 

會添加你想要的破折號和空格。

+0

真棒!謝謝 –

1

應投入的空間一樣簡單.....

Private Sub btnCreate_Click() 
DoCmd.RunSQL "INSERT INTO [Customer] (CustomerID, FirstName, LastName, Phone, Email) VALUES ('" & Me.txtCustomerID & "', '" & Me.txtFirstName & "', '" & Me.txtLastName & "', '" & Me.txtPhone & "', '" & Me.txtEmail & "')" 

MkDir ("C:\Users\Desktop\" & txtCustomerID.Value & " - " & txtFirstName.Value & " " & txtLastName.Value) 
End Sub 
+0

太棒了!謝謝 –

相關問題