Modules & VBA :: Splash Screen / Dashboard Progress Bar
Jul 9, 2014
I want a progress bar in a form that will increase from bottom to top . The data will from Access table. The bar will start from 0 to Maxvalue. The Maxvalue will be calculated as below:
Total number of batches in the table/ No. of working days between 14072014 and 31112014 / 2
So the above calculation will define the range of a progress indicator.
And now we have to show the % percentage that means how many batches have been scanned for today. For this the following calculations will be used:
Count total batches where scandate=today and scannedby<>null
Now this will show the percentage in the bar that means hopw much work has been completed.
The progress bar should move from bottom to top when % increases.
Hi all, I was wondering if it is possible to use a splash screen in the middle of your program? Ex. Can I have a splash screeen to display at the beginning of my database and then have another splash screen open during my program. If i click on a command button to display a form, cause I have a splash screen appear before that form load? Is till possible while using Data Access Pages as well? thanks in advance
I have learned how to create animated command buttons within a form. This works out great, but this brought on new ideas.
Currently, all I have is a stand alone picture (our logo) that is stored in the same directory as the db and to my knowledge this has nothing to do with access at all (other then it pulling the .bmp). I would like our Logo to be animated (simple rotating) during the Intro Splash screen.
I need to add another lbl to the following code. Just where to I add the other lbl. I pick this code up somewhere. The code works great. But all I would like to do is add another lbl to the Splash Screen.
Option Compare Database
Dim intEndingRed As Integer Dim intEndingGreen As Integer Dim intEndingBlue As Integer Dim intIncrementRed As Integer Dim intIncrementGreen As Integer Dim intIncrementBlue As Integer Dim sngRemainingDiffRed As Single Dim sngRemainingDiffGreen As Single Dim sngRemainingDiffBlue As Single
Private Sub Form_Activate() '* 4370509 is a shade of green '* 13883752 is a shade of cyan bcg_SetColors Me, 14977294, 14098070 End Sub
Private Sub Form_Deactivate() bcg_SetColors Me, -2147483645, -2147483620 End Sub
Private Sub Form_Load() Me.lbl1.Width = 0 Me.Image1.Width = 0 DoCmd.Restore End Sub
Private Sub Form_Open(Cancel As Integer) 'PlaySound ("V:Contractswelworld")
End Sub
Private Sub Form_Timer()
If Me.lbl1.Width = 6000 Then ' I think this is where it should go, GoTo ImageExpand Else Me.lbl1.Width = Me.lbl1.Width + 100 Me.Repaint Exit Sub End If
ImageExpand:
If Me.Image1.Width = 4000 Then Exit Sub Else Me.Image1.Width = Me.Image1.Width + 100 Me.Repaint End If
If Me.Image1.Width = 4000 Then Me.lbl2.Visible = True End If
End Sub
Private Sub lbl1_Click()
End Sub
Private Sub lbl2_Click() MsgBox "Close this splash screen and take user somewhere else." DoCmd.Close End Sub Private Sub Command13_Click() On Error GoTo Err_Command13_Click
I have just created a splash screen for my database.
I was wondering if anyone knows anything else that is good to add to this form which would make it look pretty impressive?
I would like to add a loading bar (Similar to the one that appears at the bottom the page on internet explorer). Does anyone know if this is possible? If so how do you do it?
I've done some searching here, but don't see exactly what I am looking for. I am wanting to attach some code to the timer on a slash screen, or on the close event, to fade the splash screen out. I have looked at the "Cadice Tripp" site. It's fine, but not a fade out. What I want is a simple fade in.... fade out, on the splash screen. Anyone seen any code for this? Thanks
I would like to have an animated opening screen when the database opens with the autoexec.
I have an animation package called Xara that makes some wonderful 3d animations. I would like to use this in an Access form. Is this possible? Animated GIF or Flash?
If the answer is no, can I call another application to show the animation?
I have on very large form in my db that takes several seconds to load. I want to optimize things, so I am trying to have it load hidden in the background when the db first starts up, this way it can be immediately called on when it is needed later. Please read further :
I want to have a splash screen that loads as well. I have set the splash screen to the default form when the database opens. However, I am not quite sure how to get the other form to load in the background as hidden, AFTER the splash screen opens and appears. I tried calling it with the oncurrent event of the splash screen, but then splash screen wont appear until after the other (hidden) form has finished loading. I have tried different orders of events, but am having no luck getting the desired results.
Summary: I want the splash screen to show first, then the big form to open (hidden) in the background. The user can click on a continue button on the splash screen and then the main switchboard will open.
All access application is realized as MDI container. (if I'm right)
In this case it is possible to set the MDI object background image instead develop splash screen. This picture always in background form open another forms or reports, does not depend on the screen resolution, etc, etc ... Splash screen must be removed in order to realize the other forms or reports.
How to set Access 2013 application backgroundimage, and backgroundImageLayout?
I have this splash screen, which welcomes all the users. It has an OK command button that exits the screen, and a checkbox that says "Do not show this screen again". I still do not have the code behind the checkbox. Thus I was wondering if there is a way where I could entirelly close or "get rid" of the splash screen until the user loggs in again. Because right now there is no code behind it, so everybody that checks it and click OK, leaves the screen. But they can still open it, if they select the "splash form".
I want to display the message "Processing Record ? of ???..." on the screen while my vba code is running without interruption. Since the msgbox requires the user to click a button to continue, what is the simplest way to display this message on the screen without interrupting the program or requiring user interaction?
On frmDatabaseStwitcher, the code for Progress Bar is: Option Compare Database Option Explicit Private Declare Sub sapiSleep Lib "kernel32" _ Alias "Sleep" _ (ByVal dwMilliseconds As Long)
[code]...
This code is working in two ways:
If I go with "SetProgressBar n / NOS" then progress bar shows 2% and then connecting process time. Or If I go with "SetProgressBar n + NOS" then progress works till 100% but then connecting process time. Also SetProgressBar (n / NOS) * 100 but then connecting process time.
How can I show a msgbox with the text "Update in progress! Please wait a while", when I execute the following make table querye on form load?
Code: Private Sub Form_Load() 'Turns the Access warning messages off DoCmd.SetWarnings False DoCmd.OpenQuery "q_tblUdtrk2" 'Turns the Access warning messages back on DoCmd.SetWarnings True
I would like to get pro month and marketing campaign the values of about 12 KPIs. This dashboard will be used by different countries/marks. My KPIS do not have the same entries. For example : - the customer satisfaction is calculated on the number of customers "satisfied", "unsatisfied", "acceptable", - the percentage of corrected and on-time reports is based on the number of reports "total", "late", "with failures", "late and with failures", - the availability of the is based on the number of hours... etc.
Do you have an idea of the way to proceed?
I created the following tables : -Tbcampaign (ID_Campaign, Campaign name) -TbKPI (ID_KPI, KPI Name) -TbRegion (ID_Region, Region Name) -TbTime (ID_Time, Month, Year) -TbFact (ID_KPI, ID_Campaign, ID_Region, ID_Time, Value)
... but how can I proceed with the KPIs? Thanks a lot in advance! Co.
I have tried to make a login screen, I have also searched for information and tried some of the examples but, I just can't get one to work. Is there someone or somewhere where I can get information on how to build one step by step in simple easy instructions....(access 2003).
Also, how do you get access to open all the windows, tables, queries etc in full screen mode. I have expaneded them and shut it down and then reopened it but they still want to open out of full screen mode.
Thanks, everyone has been a great help in creating my first Access program.
I have a dashboard that opens with my main form and it contains many textboxes with Dcounts, Dlookups and Dsums in it. I am hoping that I can put these textboxes on a separate form that is hidden unless a command button is clicked to make it visible.
I know how to do this, but my question is whether or not all of those queries will run whether or not the form is visible. Obviously if the Dsums etc.. are going to run anyway, then I won't bother.
I would like to put a message on the screen for informing the user - mostly during some procedures that might take time or when, after a warning, I want to go on with the program but without action from the user.
Msgbox is obviously not the one I'm looking for as it needs customer acknowledge. Is there a solution for this task?
