I was wondering if there is a way to disable a command button after it has been clicked for a small period of time. (lets say 1 second) stopping the user from any happy clicking. (fast repetitive clicks)
This is to do with viewing embedded images, i can explain more if required.
does anyone have any idea on how to disable a button after the event has been run? I want to give the user a few options on a form. When one is depressed i would like that option not to be available any more.
I tried forms![frmmbiinfo]![command10].enabled = false
but i guess i need to refreash the page somehow. All i keep getting is an error saying "Object doesnt support this proerty or method"
I am using a timer function to hopefully calulate have long a call has lasted, I have setup a rolling clock called "ElapsedTime" and i have the start time running off the P.C. Time this is called "txt_Start", this works fine no issues.
Now comes the fun bit i have a button called "cmd_Finish", i wish the time to be calulated and the total time to be placed in a text box called "txt_Finish" sound easy but nope this would apear not to be.
The Following Setup is used:- ElapsedTime = "00:00:00" txt_Start = Time(), formated to LongTime txt_Finish = Formated to Long Time
Example of what i would like to happen txt_Start = 10:40:02 ElapsedTime = 00:00:11 txt_Finish = 10:40:13
I have tried the following Code: ********************************************* Private Sub Command5_Click() Me.txt_Finish = ([ElapsedTime] + [txt_Start]) End Sub *********************************************
Can anybody help me on this please.
Alastair :eek:
UPDATE *****************************RESOLVED THANKS TO ALASTAIR69 (ME) & Allan57********************
Hi, bit of a noob here. I've searched for a while but I can't find anything related.
I have a data entry form that auto recalls the last entry that was made in it. I did this in an effort to speed up data entry. Anyways, here is the code I use.
Private Sub Investigator_AfterUpdate() Investigator.DefaultValue = "'" & Investigator.Value & "'" End Sub
Now the problem is that I want to be able to enable and disable this event proceedure with a check box. Is there a way to do this?
If (Me.cboStatus.Value = "Approved" Or Me.cboStatus.Value = "Approved as Noted" Or IsNull(Me.cboStatus) Or Me.RecordsetClone.RecordCount > Me.CurrentRecord) Then Me.cmdNew.Enabled = False Else Me.cmdNew.Enabled = True End If
End Sub
The navigation buttons work flawlessly but the cmdNew button still is enabled when it shouldn't be. THe idea is that is will be disabled if:
-current record is not the last record -cbostatus is blank(null) -cbostatus is "approved" -cbostatus is "approved as noted"
The only code that seems to work is the "me.recordsetclone.recordcount > Me.currentrecord" .
Am I going about this the wrong way? How can I check what is in the cbostatus box and have the cmdnew button enabled/disabled based on its value.
This has to be simple, but the solution eludes me.
I have a database that works really weel, but I need to do some tweaking to the toolbars to "grey out" the "sort ascending" and "sort descending" icons so that hte users do not mess with those and change how the recoerds display.
There has to be an easy way to disable those two buttons or an alternate way to ensure that the form basically ignores them.
I have a command button which will work on a specified date of every year. After the user clicks it once (which will carry out calculations), I want this button to be disabled so that it is not available for second click. Is it possible?
is there a way to disable the new record option (>*) at the bottom of the form...i want my users to be able to search all records through the form sometimes, but not add any new ones accidentally (or intentionally) while doing so. :confused:
Hello, I would be very greatful if someone could help me. I have a Combo box called "COM01" which i want it to control the enable function of 3 Text Boxes TXT01,TXT02 and TXT03. When COM01 dropdown menu is used and field No is selected i want the 3 Text Boxes above to be set to Enable (False). The reverse when option Yes is selected is required for the same Text Boxes Enable (True) I will be adding the code to the Change() of the COM01 properties I have tried to use Case statments without success. Any help is greatly needed
I want to disable in VBA (.enabled = false) a lot of controlls, depending of some conditions. Is it possible to group (and having an unique name)these controlls to disable them all together at the same time.
I have a database that uses a switchboard with a close button that runs several instructions before it exits. The problem is that some users have access to the database window and I need to prevent them from closing the database by hitting the X in the upper right.
I have a form. and it has three buttons. Such as Submit, Reject, Under Observation.
I want : 1) If i click SUBMIT button it will be disable and other two buttons REJECT and UNDER OBSERVATION will be enable 2) If i click REJECT button it will be disable and other two buttons SUBMIT and UNDER OBSERVATION will be enable 3) If i click UNDER OBSERVATION button it will be disable and other two buttons SUBMIT and REJECT will be enable
Objective: After each field in my form is completed, I want my NewSave button to be enabled.
Problem: Created an if/then code that disables the button but never re enables it after conditions are met
Code:
Private Sub Form_Current() Dim promptmsg As Long If IsNull(Me.ContractValue) = False And IsNull(Me.ContractNumber) = False And IsNull(Me.InvoiceDate) = False Then Me!NewSave_Button.Enable = True
I'm in the process of creating a database in Access 2010 that has two front ends, basically. What I want to be able to do is lock out one of those front ends for a specific period of time every day.
I am going round in circles here; I have a form which has certain text fields that need to be populated before a user can click a command button named 'Record Movement' that opens up another form. What I want to do is disable the 'Record Movement' button until these fields are populated. I am using Access 2010.
I'm trying to have a button in a form that, when clicked, will time stamp a text box already formatted for time. But once the text box is filled with a time, the button then disables itself for that record.
If I switch to another record where the text box is empty, the button will enable itself without closing the form, but obviously re-disable itself if I go to a record the text box is filled.
I'm sure I could use conditional formatting for it, but I don't think I'm going about it the right way. I already got a basic button built to timestamp.
I have a database with several reports that get constantly printed, however I am having an issue with their display properties that sometimes cause errors.I need the report to come up on top of everything, maximized and with the menu bar available to allow for it to be printed or close it. The report window cannot have "minimize" or "restore" available to make sure nobody access any form behind it.
To achieve this in a form I generally use the modal property, however if I do this in a report I cannot get to the menu bar to print or close the print preview.Thinking that modal was out of the question, I went ahead and maximized the report on load and set its properties to the image attached. The db is then compiled (accde) and then distributed.
On my computer (it is being developed on my machine) the report loads fine (maximized) with no min, max or restore buttons and the print preview menu bar is shown with the print and close buttons available. See "My PC" image attached.On any other computer, the report opens up maximized but the report's restore and close buttons are enabled, however the print and close buttons on the print preview menu bar are greyed out. See "Other PC" image attached.Why the inconsistent behaviour when using the same front end?
On a form, I want to disable the save button, 'cmdSave' whilst the form's mandatory fields have been left blank.
I've put in a smart tag, called, 'Req' against each required field and have used the following code on the forms current event.
Code: Private Sub Form_Current() Dim ctl As Control For Each ctl In Me.Controls If ctl.ControlType = acTextBox Or ctl.ControlType = acComboBox Or ctl.ControlType = acListBox Then
[Code] ....
The save button is disabled, but it won't enable again after each field has data entered against it.
I also have this code in the AfterUpdate event in each required field:
Code: Private Sub cboErrorID_AfterUpdate() Call Form_Current End Sub