Wrox Programmer Forums

Need to download code?

View our list of code downloads.

Go Back   Wrox Programmer Forums > Microsoft Office > Access and Access VBA > Access VBA
Password Reminder
Register
| FAQ | Members List | Calendar | Search | Today's Posts | Mark Forums Read
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 Programmer to Programmer discussions. This is a community of tens of thousands of software programmers and website developers including Wrox book authors and readers. As a guest, you can read any forum posting. By joining today you can post your own programming questions, respond to other developers’ questions, and eliminate the ads that are displayed to guests. Registration is fast, simple and absolutely free .
DRM-free e-books 300x50
Reply
 
Thread Tools Search this Thread Display Modes
  #1 (permalink)  
Old September 5th, 2003, 04:35 AM
tsc tsc is offline
Registered User
 
Join Date: Sep 2003
Location: , , Belgium.
Posts: 4
Thanks: 0
Thanked 0 Times in 0 Posts
Default 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
Reply With Quote
  #2 (permalink)  
Old September 7th, 2003, 07:04 PM
Friend of Wrox
 
Join Date: Jun 2003
Location: , , USA.
Posts: 1,093
Thanks: 1
Thanked 12 Times in 11 Posts
Default

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

Reply With Quote
  #3 (permalink)  
Old September 7th, 2003, 07:21 PM
Friend of Wrox
 
Join Date: Jun 2003
Location: , , USA.
Posts: 1,093
Thanks: 1
Thanked 12 Times in 11 Posts
Default

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

Reply With Quote
  #4 (permalink)  
Old September 8th, 2003, 02:41 PM
Friend of Wrox
 
Join Date: Sep 2003
Location: Madison, Wisconsin, USA.
Posts: 451
Thanks: 0
Thanked 0 Times in 0 Posts
Send a message via AIM to Ben Horne
Default

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
Reply With Quote
  #5 (permalink)  
Old September 8th, 2003, 03:44 PM
tsc tsc is offline
Registered User
 
Join Date: Sep 2003
Location: , , Belgium.
Posts: 4
Thanks: 0
Thanked 0 Times in 0 Posts
Default

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
Reply With Quote
  #6 (permalink)  
Old September 8th, 2003, 03:47 PM
tsc tsc is offline
Registered User
 
Join Date: Sep 2003
Location: , , Belgium.
Posts: 4
Thanks: 0
Thanked 0 Times in 0 Posts
Default

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
Reply With Quote
  #7 (permalink)  
Old September 8th, 2003, 04:06 PM
tsc tsc is offline
Registered User
 
Join Date: Sep 2003
Location: , , Belgium.
Posts: 4
Thanks: 0
Thanked 0 Times in 0 Posts
Default

Quote:
quote:Originally posted by majora
 Hello Majora, did you finally succeed or was it all for nothing ?


The Stardust Company
Reply With Quote
  #8 (permalink)  
Old September 9th, 2003, 06:09 PM
Friend of Wrox
 
Join Date: Sep 2003
Location: Madison, Wisconsin, USA.
Posts: 451
Thanks: 0
Thanked 0 Times in 0 Posts
Send a message via AIM to Ben Horne
Default

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
Reply With Quote
  #9 (permalink)  
Old September 9th, 2003, 07:51 PM
Friend of Wrox
 
Join Date: Jun 2003
Location: , , USA.
Posts: 1,093
Thanks: 1
Thanked 12 Times in 11 Posts
Default

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

Reply With Quote
  #10 (permalink)  
Old September 9th, 2003, 09:52 PM
Friend of Wrox
 
Join Date: Jun 2003
Location: , , USA.
Posts: 1,093
Thanks: 1
Thanked 12 Times in 11 Posts
Default

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

Reply With Quote
Reply


Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

BB code is On
Smilies are On
[IMG] code is Off
HTML code is Off
Trackbacks are Off
Pingbacks are On
Refbacks are 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 08: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 10:44 AM
Nice Textbook!! juhu Pro VB 6 2 May 3rd, 2005 06:24 PM
Intro to ASP.NET 2.0 DB mar0364 ASP.NET 1.0 and 1.1 Basics 1 April 9th, 2005 11:19 AM



All times are GMT -4. The time now is 08:01 PM.


Powered by vBulletin®
Copyright ©2000 - 2020, Jelsoft Enterprises Ltd.
© 2013 John Wiley & Sons, Inc.