我想要完成的是：為結束時間制作一個按鈕，一旦單擊它就會變灰。移動到新記錄或下一條記錄時，該按鈕未顯示為灰色，但單擊后將顯示為灰色。但是，當我移動到新記錄時，先前在以前的記錄中單擊的按鈕再次出現。下面是我的按鈕點擊功能代碼：
Private Sub Command28_Click()
txtEndTime = Time()
Command28.Enabled = False
End Sub
我還為 Form_Current 函式撰寫了這段代碼：
Private Sub Form_Current()
If Me.NewRecord Then
Me.Command28.Enabled = True
End If
End Sub
任何幫助將不勝感激。
uj5u.com熱心網友回復：
嘗試：
Private Sub Form_Current()
Me!Command28.Enabled = Me.NewRecord
End Sub
并將其重命名為有意義的名稱。
轉載請註明出處，本文鏈接：https://www.uj5u.com/gongcheng/479534.html
下一篇：如何在VBA中匹配條件的顏色線