[AccessD] InputBox sizing

This looks like a case for a custom dialog box.

Design a small form with two buttons on it, "Report" and "Labels", also on
the form you need a hidden textbox, call it "Answer". Make sure the form
does *not* have a close button, and make it a modal popup.

The two button's OnClick events would do the following

	Answer = "Labels" ' or "Report" depending on which button is clicked
	Me.Visible = False

Then the code that calls this form (we'll call it "RepOrLab_frm") would look
like this...

DoCmd.OpenForm "RepOrLab_frm",,,,,acDialog
' opening the form in dialog mode halts this code until the
' form either closes or is made invisible
Opt=Forms("RepOrLab_frm").Answer
DoCmd.Close acForm ,"RepOrLAb"
' and then on with the show.

HTH

Lambert


> -----Original Message-----
> From:	John Clark [SMTP:John.Clark at niagaracounty.com]
> Sent:	Thursday, February 19, 2004 10:22 AM
> To:	accessd at databaseadvisors.com
> Subject:	[AccessD] InputBox sizing
> 
> Caution--Potential 'Dumb Question' warning!!!
>  
> I have placed an InputBox behind a command button, and it is a short
> question: 
>  
>     'Opt = InputBox("<R>eport or <L>abels", "Report Choice")'
>  
> My problem is that this box is huge compared to the needed entry, and I
> would like to shorten it up, if possible. It isn't simply that it looks
> dumb, but you just know  user will try to type more if there is room. Is
> there a way to control the size?
>  
> Thanks, John
> _______________________________________________
> AccessD mailing list
> AccessD at databaseadvisors.com
> http://databaseadvisors.com/mailman/listinfo/accessd
> Website: http://www.databaseadvisors.com