MS-Access活動用戶名自動填充文本框

是否存在和Access相當於Excel代碼的Application.UserName自動填充文本框作爲默認值？MS-Access活動用戶名自動填充文本框

根據反饋HansUp我已經修改如下

Private Sub Form_Load() 
Me.LastChgUser = Excel.Application.UserName 
End Sub

至於我對形式的Load事件。我現在收到一個編譯錯誤：找不到方法或數據成員。 Txt框「LastChgUser」在子表單「Staffing」上作爲「Associate Lookup」的一部分形式

訪問'CurrentUser()函數返回Access安全帳戶名稱，除非您設置了用戶級安全性。

您可以使用Windows API獲取當前Windows用戶的名稱。試試Get Login name的fOSUserName()功能。

另一種方法是Environ()功能：

? Environ("USERNAME") 
hans

雖然這種做法是不安全的，它可能是足夠您的目的：加載，用戶將被允許更改默認值。但是，安全設置可能不允許您直接將其用作文本框的控制源。

2012-12-26 13:25:19 HansUp

Hans，我試圖使用= ExcelUser（），因爲這似乎是麻煩最小的選項。我是否應該將代碼作爲更新後事件引用？ –

我已經修改了OP的結果和新的eror。 –

它適用於我與Access 2007和只有不同的文本框名稱，所以我不明白什麼是錯的。我會使用'fOSUserName（）'函數，因爲我寧願添加一個自定義函數而不是引用。 – HansUp

回答