A personal repository of random information in compensation for a fatigued biological computer
Breaded IT » MS Access / SQL Server reminders » Access: Custom StatusBar message
Sub StatusBar(message As String)
Dim RetVal As Variant
RetVal = SysCmd(4, message)
End Sub
Sub StatusBarReset()
Dim RetVal As Variant
RetVal = SysCmd(5)
End Sub