|
|
 |
| Access VBA Discuss using VBA for Access programming. |
Welcome to the p2p.wrox.com Forums.
You are currently viewing the Access VBA section of the Wrox p2p Programmer to Programmer discussion community. This is a community of more than 40,000 computer programmers including Wrox book authors and readers. As a guest, you can read any forum posting. By joining our free Wrox p2p community you can post your own programming questions and respond to other programmers’ questions. Registered users also don't have to see the ads that are displayed to guests. Registration is fast, simple and absolutely free so please, join today!
Join today and post to win prizes! Post more to increase your chances of being Wrox’s top poster of the month.
|
 |
|

September 5th, 2003, 05:35 AM
|
|
Registered User
|
|
Join Date: Sep 2003
Location: , , Belgium.
Posts: 4
Thanks: 0
Thanked 0 Times in 0 Posts
|
|
nice intro scree
I'm a new programmer in vba and try to write a billing system. I would like to know where I can find examples of nice intro screens for my application, eventually with colors for the background in gradient colors, animated gifs etc...If no examples exist, can I program them in vba ?
thanks.
tsc
The Stardust Company
__________________
The Stardust Company
|

September 7th, 2003, 08:04 PM
|
|
Friend of Wrox
|
|
Join Date: Jun 2003
Location: , , USA.
Posts: 1,065
Thanks: 0
Thanked 3 Times in 2 Posts
|
|
You can look at some pretty cool interfaces here to get some ideas:
http://www.activ8.com.au/interface/
Or, you can create your own Splash Screens by creating a regular old form and setting the following properties:
Scrollbars: Neither
Record Selectors: No
Navigation Buttons: NO
Auto Center: Yes
Plus whatever else you like. Then program several of the Splash Screens events as follows:
Private Sub Form_Activate()
' Hide built-in Form View toolbar.
DoCmd.ShowToolbar "Form View", acToolbarNo
End Sub
'Private Sub Form_Deactivate()
'
' ' Show built-in Form View toolbar where appropriate.
' DoCmd.ShowToolbar "Form View", acToolbarWhereApprop
'
'End Sub
Private Sub Form_Open(Cancel As Integer)
Me.TimerInterval = 5000
End Sub
Private Sub Form_Timer()
' If statement used to reset TimerInterval property.
If Me.TimerInterval <> 0 Then
Me.TimerInterval = 0
End If
DoCmd.OpenForm "frmSwitchboard", , , , acNormal
DoCmd.Close acForm, "frmSplashScreen"
End Sub
The code sets the Splash Screen's timer interval to 5 seconds (5000 milliseconds) so that the Splash Screen automatically closes after 5 seconds and opens up your Switch Board, or any other form.
Also set the apps start-up object to your Splash Screen form via Tools -> Startup.
HTH,
Bob
|

September 7th, 2003, 08:21 PM
|
|
Friend of Wrox
|
|
Join Date: Jun 2003
Location: , , USA.
Posts: 1,065
Thanks: 0
Thanked 3 Times in 2 Posts
|
|
Also remembered I've played around with one of Peter DeBeat's (sp?) freeware modules that'll do your BackColor Gradients in your form's detail section for you. Its at:
http://www.peterssoftware.com/bcg.htm
Regards,
Bob
|

September 8th, 2003, 03:41 PM
|
|
Friend of Wrox
|
|
Join Date: Sep 2003
Location: Madison, Wisconsin, USA.
Posts: 451
Thanks: 0
Thanked 0 Times in 0 Posts
|
|
I tried using one of the modules that I got from the Peter's Software website it and I went through hell trying to update the VBA code inside my database
majora
|

September 8th, 2003, 04:44 PM
|
|
Registered User
|
|
Join Date: Sep 2003
Location: , , Belgium.
Posts: 4
Thanks: 0
Thanked 0 Times in 0 Posts
|
|
Quote:
quote:Originally posted by Bob Bedell
You can look at some pretty cool interfaces here to get some ideas:
http://www.activ8.com.au/interface/
Or, you can create your own Splash Screens by creating a regular old form and setting the following properties:
Scrollbars: Neither
Record Selectors: No
Navigation Buttons: NO
Auto Center: Yes
Plus whatever else you like. Then program several of the Splash Screens events as follows:
Private Sub Form_Activate()
' Hide built-in Form View toolbar.
DoCmd.ShowToolbar "Form View", acToolbarNo
End Sub
'Private Sub Form_Deactivate()
'
' ' Show built-in Form View toolbar where appropriate.
' DoCmd.ShowToolbar "Form View", acToolbarWhereApprop
'
'End Sub
Private Sub Form_Open(Cancel As Integer)
Me.TimerInterval = 5000
End Sub
Private Sub Form_Timer()
' If statement used to reset TimerInterval property.
If Me.TimerInterval <> 0 Then
Me.TimerInterval = 0
End If
DoCmd.OpenForm "frmSwitchboard", , , , acNormal
DoCmd.Close acForm, "frmSplashScreen"
End Sub
The code sets the Splash Screen's timer interval to 5 seconds (5000 milliseconds) so that the Splash Screen automatically closes after 5 seconds and opens up your Switch Board, or any other form.
Also set the apps start-up object to your Splash Screen form via Tools -> Startup.
HTH,
Bob
|
The Stardust Company
|

September 8th, 2003, 04:47 PM
|
|
Registered User
|
|
Join Date: Sep 2003
Location: , , Belgium.
Posts: 4
Thanks: 0
Thanked 0 Times in 0 Posts
|
|
Quote:
quote:Originally posted by Bob Bedell
Really thanks a lot Bob, I wasn't aware that vba could do such a nice things.
|
The Stardust Company
|

September 8th, 2003, 05:06 PM
|
|
Registered User
|
|
Join Date: Sep 2003
Location: , , Belgium.
Posts: 4
Thanks: 0
Thanked 0 Times in 0 Posts
|
|
Quote:
quote:Originally posted by majora
Hello Majora, did you finally succeed or was it all for nothing ?
|
The Stardust Company
|

September 9th, 2003, 07:09 PM
|
|
Friend of Wrox
|
|
Join Date: Sep 2003
Location: Madison, Wisconsin, USA.
Posts: 451
Thanks: 0
Thanked 0 Times in 0 Posts
|
|
Bob,
I just wanted to make a comment on the VBA code for the On Deactive event of the splash screen form.
I was having a problem getting into Design View so I could make needed changes to my Music Inventory 2001 database. I had already implemented a splash screen form and I had also coded it using the code you provided so it would work correctly.
Thing is, I noticed that for the On Deactive procedure, there is a ' before the text "DoCmd.ShowToolbar "Form View", acToolbarWhereApprop in the On Deactivate section. You CANNOT have a ' in front of the code you want Access to execute. Access will not execute comments
Just thought I'd let you know
Quote:
quote:Originally posted by Bob Bedell
You can look at some pretty cool interfaces here to get some ideas:
http://www.activ8.com.au/interface/
Or, you can create your own Splash Screens by creating a regular old form and setting the following properties:
Scrollbars: Neither
Record Selectors: No
Navigation Buttons: NO
Auto Center: Yes
Plus whatever else you like. Then program several of the Splash Screens events as follows:
Private Sub Form_Activate()
' Hide built-in Form View toolbar.
DoCmd.ShowToolbar "Form View", acToolbarNo
End Sub
'Private Sub Form_Deactivate()
'
' ' Show built-in Form View toolbar where appropriate.
' DoCmd.ShowToolbar "Form View", acToolbarWhereApprop
'
'End Sub
Private Sub Form_Open(Cancel As Integer)
Me.TimerInterval = 5000
End Sub
Private Sub Form_Timer()
' If statement used to reset TimerInterval property.
If Me.TimerInterval <> 0 Then
Me.TimerInterval = 0
End If
DoCmd.OpenForm "frmSwitchboard", , , , acNormal
DoCmd.Close acForm, "frmSplashScreen"
End Sub
The code sets the Splash Screen's timer interval to 5 seconds (5000 milliseconds) so that the Splash Screen automatically closes after 5 seconds and opens up your Switch Board, or any other form.
Also set the apps start-up object to your Splash Screen form via Tools -> Startup.
HTH,
Bob
|
Ben
|

September 9th, 2003, 08:51 PM
|
|
Friend of Wrox
|
|
Join Date: Jun 2003
Location: , , USA.
Posts: 1,065
Thanks: 0
Thanked 3 Times in 2 Posts
|
|
Hi Ben,
Sorry I didn't clean that up before posting it. Must have been debugging something and forgot to uncomment that particular block.
Regards,
Bob
|

September 9th, 2003, 10:52 PM
|
|
Friend of Wrox
|
|
Join Date: Jun 2003
Location: , , USA.
Posts: 1,065
Thanks: 0
Thanked 3 Times in 2 Posts
|
|
Quote:
|
quote:I was having a problem getting into Design View so I could make needed changes to my Music Inventory 2001 database.
|
Hi Ben,
An easy way to get around this apparent problem when the Form View toolbar isn't visible is to press the F11 key. That will display your Database Toolbar and Database Window where you can select design view.
Bob
|
| Thread Tools |
Search this Thread |
|
|
|
| Display Modes |
Linear Mode
|
Posting Rules
|
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts
HTML code is Off
|
|
|
Similar Threads
|
| Thread |
Thread Starter |
Forum |
Replies |
Last Post |
| A simple hello & intro |
Diana Alexandra Boston |
BOOK: Beginning CSS: Cascading Style Sheets for Web Design ISBN: 978-0-7645-7642-3 |
1 |
June 29th, 2007 09:47 AM |
| Nice book..but |
ShaneTheMaster |
BOOK: ASP.NET 2.0 Website Programming Problem Design Solution ISBN: 978-0-7645-8464-0 |
5 |
April 13th, 2007 11:44 AM |
| Nice Textbook!! |
juhu |
Pro VB 6 |
2 |
May 3rd, 2005 07:24 PM |
| Intro to ASP.NET 2.0 DB |
mar0364 |
ASP.NET 1.0 and 1.1 Basics |
1 |
April 9th, 2005 12:19 PM |
| intro image in dreamweaver/HTML |
JeremyWard |
BOOK: Beginning Dreamweaver MX/MX 2004 MX ISBN: 978-0-7645-4404-0; MX 2004 ISBN: 978-0-7645-5524-4 |
9 |
November 8th, 2004 02:20 PM |
|
 |