[AccessD] acCmdZoomBox issues

David McAfee davidmcafee at gmail.com
Mon Jun 21 15:53:07 CDT 2010


warning all aircode OTTOMH:
I'd do it via a pop up form:

txtLimitedTextBox_DoubleClick:
Docmd.OpenForm "MyZoomBox",,,acdialog


MyZoomBox On Open:
me.txtEnterText = nz(forms!frmPreviousForm!txtLimitedTextBox,"")
me.txtEnterText.SetFocus
me.txtEnterText.SelStart(LEN(me.txtEnterText.Text)+1)

CmdOK_Click:
forms!frmPreviousForm!txtLimitedTextBox = metxtEnterText
DoCmd.Close acForm,Me.name, acSavePrompt


On Mon, Jun 21, 2010 at 1:12 PM, Edward Zuris <edzedz at comcast.net> wrote:
>
>  The reason for the zoom box is because
>  there is limited form space.
>
>  So I tried to teach the customer to use
>  Shift+F2, but they keep forgetting how to
>  launch it.   So, I could teach them to
>  double or single click instead.
>
>  I think the zoom box is a different object
>  than the text box.  Is there like me.zoom,
>  etc ?
>
>  Thanks.
>
>  Edz. . . .
>
>
> -----Original Message-----
> From: accessd-bounces at databaseadvisors.com
> [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of David McAfee
> Sent: Monday, June 21, 2010 12:58 PM
> To: Access Developers discussion and problem solving
> Subject: Re: [AccessD] acCmdZoomBox issues
>
>
> I thought I did it the 2nd way years ago, but testing it this morning I
> see it opens the Zoom box in a modal mode.
>
> You might have to create a simple pop up form as suggested by Stuart.
>
> You can use a bigger text box with larger font and force the entry at
> the end of the existing text.
>
> What is the reason for the Zoom box? Usually they should be used to
> display more data than is allowed on the form or datasheet. If they are
> allowed to edit/enter data, I'd force them to do it via a new pop up
> form, emulating a zoom box.
>
> D
>
> On Sun, Jun 20, 2010 at 5:44 PM, Edward Zuris <edzedz at comcast.net>
> wrote:
>>
>>  Thanks David
>>
>>  I have been playing with that
>>  and it seems to have no effect.
>>
>>  - - - Example - - -
>>
>>    With Me.txtTaskDescriptionN
>>            .SetFocus
>>            .SelStart = Len(.Text) + 1
>>    End With
>>
>>    DoCmd.RunCommand acCmdZoomBox
>>
>>  - - - Or - - -
>>
>>    DoCmd.RunCommand acCmdZoomBox
>>
>>    With Me.txtTaskDescriptionN
>>            .SetFocus
>>            .SelStart = Len(.Text) + 1
>>    End With
>>
>>  - - - Or - - -
>>
>>    DoCmd.RunCommand acCmdZoomBox
>>
>>    With Me.txtTaskDescriptionN
>>            .SetFocus
>>            .SelStart = 10
>>            .SelLength = 5
>>    End With
>>
>>    DoEvents
>>
>>
>>  - - - - Any more Ideas to Try ? - - - -
>>
>>
>>
>> -----Original Message-----
>> From: accessd-bounces at databaseadvisors.com
>> [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of David
>> McAfee
>> Sent: Sunday, June 20, 2010 6:28 PM
>> To: Access Developers discussion and problem solving
>> Subject: Re: [AccessD] acCmdZoomBox issues
>>
>>
>> Look into SelStart and Len(MyTextBox.Text)+1
>>
>> Sent from my Droid phone.
>>
>> On Jun 20, 2010 4:47 PM, "Edward Zuris" <edzedz at comcast.net> wrote:
>>
>>
>>
>>  When using the (DoCmd.RunCommand acCmdZoomBox) to do
>>
>>  a shift+F2 zoom on a text box all text is selected.
>>
>>
>>
>>  So if a customer fat fingers something or wants to
>>
>>  add something starts typing, without clicking at the
>>
>>  bottom-end of the data, all the previous information
>>
>>  is erased.
>>
>>
>>
>>  Is there anyway to deselect the data appearing inside
>>
>>  the Zoom text box before the customer starts typing?
>>
>>
>>
>>  Thanks.
>>
>>
>>
>>  Sincerely,
>>
>>  Ed Zuris
>>
>>  <mailto:edzedz at comcast.net> edzedz at comcast.net
>>
>>
>>
>> --
>> AccessD mailing list
>> AccessD at databaseadvisors.com
>> http://databaseadvisors.com/mailman/listinfo/accessd
>> Website: http://www.databaseadvisors.com
>> --
>> AccessD mailing list
>> AccessD at databaseadvisors.com
>> http://databaseadvisors.com/mailman/listinfo/accessd
>> Website: http://www.databaseadvisors.com
>>
>> --
>> AccessD mailing list
>> AccessD at databaseadvisors.com
>> http://databaseadvisors.com/mailman/listinfo/accessd
>> Website: http://www.databaseadvisors.com
>>
>
> --
> AccessD mailing list
> AccessD at databaseadvisors.com
> http://databaseadvisors.com/mailman/listinfo/accessd
> Website: http://www.databaseadvisors.com
>
>
> --
> 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