[AccessD] Ac2013 startup form

Dan Waters df.waters at outlook.com
Thu Jun 25 08:42:58 CDT 2015


Hi Bill,

There are many sites which explain how to set up a splash screen.

Do a search on 'create a splash screen in access' - lots of pages!

Dan

-----Original Message-----
From: AccessD [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of
Bill Benson
Sent: Thursday, June 25, 2015 8:36 AM
To: Access Developers discussion and problem solving
Subject: Re: [AccessD] Ac2013 startup form

OMG this is utterly unbelievable - making that change did NOT help. It
randomly goes back to a huge dialog.

Arggghhh

On Thu, Jun 25, 2015 at 9:31 AM, Bill Benson <bensonforums at gmail.com> wrote:

> Apparently changing border style from sizeable to dialog solved the 
> problem with size. Now if I could just get positioning to work without 
> the intervention of VBA/macros?
>
> On Thu, Jun 25, 2015 at 9:22 AM, Bill Benson <bensonforums at gmail.com>
> wrote:
>
>> I have created a popup form that I want to display as a splash screen.
>> Unfortunately on startup, before any macros are enabled and therefore 
>> before my code can shape the form to the required size and put it in 
>> the required position, it is opening super-huge.
>>
>> I could control this with an AutoExec that opens the form, but then 
>> the user would be getting informaed that macros are present, and all 
>> have been halted. That is an annoyance that has utterly put me off 
>> the AutoExec macro
>> - so if anyone knows how to make THAT stop I would be grateful as well.
>>
>> So here I am with a form I know how large it should be - and really 
>> want it to be because the image I use as its background is getting 
>> centered and looks ugly on a stretched out form. the kind of code I 
>> would be running to control the size and position is shown below. I 
>> don't know why the darned form won't just stay in that condition.
>>
>> Option Compare Database
>> Option Explicit
>> Private Sub cmdBatch_Click()
>> DoCmd.OpenForm "frmBatchReporting"
>> End Sub
>> Private Sub cmdSingle_Click()
>> DoCmd.OpenForm "frmreportingfilters"
>> End Sub
>> Private Sub Form_Load()
>> DoCmd.MoveSize 5000, 2000, 8000, 5000 lblEnableContent.Visible = 
>> False cmdSingle.Visible = True cmdBatch.Visible = True End Sub
>>
>
>
--
AccessD mailing list
AccessD at databaseadvisors.com
http://databaseadvisors.com/mailman/listinfo/accessd
Website: http://www.databaseadvisors.com



More information about the AccessD mailing list