Reports :: How To Make Label Visible Depending On Text Box Value
Jul 27, 2014
I have a report that displays on a continuous style report. What courses the employee have been on and when they expire
right I have field call expirydate and another call dayover showing the number of days till that course has expired also I have made a label called Expired1
now what I'm trying to do.....
if the expirydate has passed I want the expired1 label to be visible and dayover field to become invisible
I have tried
Code:
Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer)
If Me.Expirydate < Date Then
Me.expired1.Visible = True
Me.DaysOver.Visible = False
End If
If Me.Expirydate > Date Then
Me.expired1.Value = False
Me.DaysOver.Value = True
End If
I have also tried the code on current event on the report
now my problem if one of the course has expired it will show the label called Expired1 but on all the records but I only want it to display on the record that has expired and leave the daysover text box visible if course has not expired
I'm running Access 2003 and my question relates to delivery notes that are produced for drivers as reports. These delivery notes have a blank payment box for the driver to complete if the customer pays upon delivery.
As more and more customers are prepaying by credit cards, I'd like this payment box to be automatically filled with a "PAID" text which will let the driver know the order has already been paid for.
The delivery note is produced from an "Orders" table which has a "Paid" field whose value is automatically set to "Yes" when the order has been paid for.
I was hoping to be able to place a "PAID" label on the report which is only visible when the Paid field of the underlying query is Yes.
As things are at the moment I cannot see any way to put any conditional statement onto this Text/Label. The only options for the "Is Visible" property of the text are Yes or No.
I'm working on a report. I have a text box that contains directory path for a picture which is showed in a image box on my report which works great. I have now created a label called "nopiclb" that has "no Pic "entered in it but I want to set the label to not visible if path1 has a file path in it but visible if path1 is empty
I put the code below in onformat event in the detail section, but is not working
Code: Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer) If IsNull(Me.path1) = True Or Me.path1 = "" Then Me.Nopiclb.Visible = True Else Me.Nopiclb.Visible = False End If End Sub
I am trying to make a label visible on a form during print if a field has "like a string". We use a form so that it prints 3 forms to one page (They are tags for units for repair). I can get the label to be visible in the form view but when I print, the label is visible on every record where it is only visible on the current record in form view. My goal is to have the label only show on those records where the condition is met.
Here is my code that works in form view only: (It is to designate easier a warranty tag from a new repair tag)
Code: If Me.Problem_Description Like "Warr*" Then Me.lbl_w.Visible = True Else Me.lbl_w.Visible = False End If
I have attached an image of a tag sheet Tag_Sheet_W.jpg. As you can see if I got my desired result only the first tag would have a W.
Hi, I have a form with a INFO button, what I need is when the info button is pressed a text box becomes visible on the form and when pressed again the text box become not visible, this will allow the final user the have additional information regading compiling the form etc! Thanks Marco
I have a form with a Yes/No checkbox. Sometimes a data entry person will use this, sometimes an associated report is printed and a technician in the field will be required to fill check the box by hand and return the report for data entry. what I have tried to format the check box, if the box isn't already checked, I can't get it to show up clearly on the printed report. It's set to Visible, width 6pt, solid, black, always display, yet it still is barely visible. Ive tried increasing the grid line thicknesses, making it shadowed, nothing seems to work. Is there anything I can do?
I have 2 tables on one report, 1 is visible, the other visible = no, Is there a way to make that visible = yes when you reach a certain count (60days)...
Hi, Is it possible when choosing a combo box to have it make a text box visible, when in this text boxes properties you've chosen visible=NO. Can an event procedure or some code be written that will make visible=YES.
Hi, Is it possible when choosing a combo box to have it make a text box visible, when in this text boxes properties you've chosen visible=NO. Can an event procedure or some code be written that will make visible=YES.
I have a combobox [CBreason] that reads from a table to show me why someone is gaining access to the building.
One of the options is "Incident".
When incident is selected I want a textbox [TBIncidentNo] and a button[BIncidentDup] control I made to appear.
I thought that the code:
If Me.CBReason.Value = "Incident" Then Me.CBIncidentNo.Visible = True Me.BIncidentDup.Visible = True Else Me.CBIncidentNo.Visible = False Me.BIncidentDup.Visible = False End If
Placed in the after update action of the CBReason box would sufice but it doesnt work
I'm guessing the value is not recognised fro some reason but i cant work out why. There is no error message or issus, it makes the box dissapear when there is no entry but no change for selecting incident.
I have a Main Form with a Sub-Form, the sub-form is base off a query. on the sub-form i have 8 controls, one of them is "Status' and "Process" and "Review" My Main Form have a Refresh command that refreshes the data in the sub-form.
What i am trying to do is make the "Process" Control only visible is "Status" is a certain status and "Review" visible if "Status" is something else. what i have done works correctly On Open. I run into and issue on the refresh command. I get Run-time error '2165' "You can't hide a control that has the focus"
Code: If Forms!Main_Form.[Name subform]!Status = "Ready" Then Forms!Main_Form.[Name subform]!Process.Visible = True Forms!Main_Form.[Name subform]!Review.Visible = False ElseIf Forms!Main_Form.[Name subform]!Status = "Reviewing" Then Forms!Main_Form.[Name subform]!Review.Visible = True Forms!Main_Form.[Name subform]!Process.Visible = False End If
I have done similar with a main form and making sub-form visible or not based on a control on a main form and that has worked perfectly. I am not sure how the control is getting focus and cause the error.
I have one field in my table "Id". Here I have inputed 16 digit number always. Can I print out every digit with different text box or label in my report?
Hi I have a form where the processing is a little slow and I want to advise the user that something is actually happening! So I put a label on the form (lblWait) with a suitable message. The visible property is set to Yes. On the form open event I put Me.lblWait.visible = False This makes the label invisible as expected. On the code behind the run button I started it off like this Set cnn = CurrentProject.Connection Set rst = New ADODB.Recordset
' Reveal wait message Me.lblWait.Visible = True
' Delete any extant records in tblTmpReportDates cnn.Execute "DELETE * FROM tblTmpReportDates"
However, my wait message stays invisible throughout the whole process. All the other processing goes fine. I sense I am either using the wrong procedure to put up a wait message but shouldn't this work? Any words of wisdom would be most appreciated, especially if they solve the problem!! Thanks in advance and best wishes
I have a combo box with three columns, the first one is the bound one, the second is text in English, and the third is text in Spanish. Currently when the form is open, both the English and Spanish texts columns are visible. What I would like to do is set up a command button on a different form that will open the form with just the English showing in the combo boxes, and another button for Spanish. I've tried the following code which opens the form, but the combo box is disabled altogether.
but guess what, this doesnt work!! looks like the screen is not updated until the button_click processes, if i add a msgbox() after lblstatus.visible=true it shows but after the msgbox which i dont want. anyone know why?
I have a form (frmMain) which contains 3 subforms and they are being set to visible at different stages of application run (depending on the options selected).
In subfrm_Main_options i have 3 buttons, clicking on 'Job Review' will make the subfrm_Search visible. In the subfrm_Search i have 2 labels, 'View Jobs' and 'View Report' and I only want the 'View Jobs' to be visible!
I have tried setting the visible property of this label to False in the subfrm_Main_Options but its giving me an error (saying the form subfrm_Search is closed or does not exist in the database!). I also tried using a Global Variable (ViewJobs - declared in module mdlPublicVars) and set it to True once the 'Job Review' is clicked in the subfrm_Main_Options form, and then look at this in subfrm_Search and then display the correct label. However after trying to put this code in various events such as, On Open, On Got Focous, On Activation, ... i didnt get the result i wanted!
Can any1 please help me out with this. I would be really grateful!
PS. The buttons appearing on the form are placed on the frmMain, I did that to see if it appears on the main form but they must be in subfrm_Search!
I sent a post earlier today about making a label visible in a subform! I am still working on it but still no progress!
I have a different scenario (its the same thing but trying to explain the method i'm working on):
I have one main form (frmMain) that contains 3 subforms, say subfrm1, subfrm2 and subfrm3. On Open only 1 is visible and 2 and 3 are invisible (however they are open and loaded).
By choosing an option on 1 subfrm2 becomes available! When choosing an option on subfrm1 a boolean called 'XXX' is set to true. Now i want one particular label to become visible in subfrm2 if 'XXX' is true! To do this i need to write a code to be executed when subfrm2 is appears on screen! The problem is this form is already open so how and on which event of subfrm2 can i write the code???
At the moment i'm trying to refresh subfrm2 (by using code in subfrm1) and I have placed my code on the On Load event of subfrm2. I thought this way the form will reload and the On Loand event will pick up the new value for boolean XXX and set the label to visible! Thats the idea anyway... here is the code i have in subfrm1:
XXX = True
Forms![frmMain].subfrm2.Form.Refresh
subfrm1.Visible = False
subfrm2.Visible = True
I'm not sure if refreshing the subform will result in On Load event to be executed! And i'm not even sure that the code for refreshing subfrm2 is correct. Can any1 help me with this?
I have attached the actual database on my previous post sent today, if you prefer to look at the whole thing and get a feel of the problem!
hey guys i was just wondering if anyone knew the code to make a table visible via changing a combo box. i know for a form its simply Form_formname.visible=True
