My Assistant
![]() ![]() |
|
|
Jan 9 2006, 11:48 AM
Post
#1
|
|
|
New Member Posts: 15 |
Hi- I have certain fields in which the user will need to enter significant amounts of text. If I want to allow the user to open the text box in a separate text window that pops up what do I need to do? Thanks in advance.
|
|
|
|
Jan 9 2006, 11:52 AM
Post
#2
|
|
|
Retired Moderator Posts: 37,716 From: The San Francisco Bay Area |
Create a separate form with a large text box. Bind the text box the the field in the table. (The Record Source for the form will be the table.) Open the form with:
DoCmd.OpenForm "NameOfForm", , , "[PrimaryKeyID] = " & Me.NameOfControlOnCurrentFormWithRecordID hth, Jack |
|
|
|
Jan 9 2006, 11:52 AM
Post
#3
|
|
|
UtterAccess VIP / UA Clown Posts: 25,199 From: LI, NY |
Create a form with a larger text box. Then use an event trigger (a button or the double click) to open the form using a filter for the current record:
Dim strFilter as String strfilter = "[keyfield] = " & Me.txtkeyfield DoCmd.OpenForm "Formname",,,strfilter |
|
|
|
Jan 9 2006, 01:24 PM
Post
#4
|
|
|
UtterAccess VIP Posts: 2,121 From: Lansing, MI USA |
Access allows one to do that anyway without the use of forms or VBA programming. Simply place your cursor in the text box, press SHIFT+F2 and a Zoom box opens. You can change the font for that zoom box to any size for easy reading. When you're done reading/editing, click OK.
|
|
|
|
Jan 9 2006, 01:57 PM
Post
#5
|
|
|
UtterAccess VIP / UA Clown Posts: 25,199 From: LI, NY |
Greg,
I didn't know that. Is it possible to open that in an Event? Like the double click event? |
|
|
|
Jan 9 2006, 02:28 PM
Post
#6
|
|
|
UtterAccess VIP Posts: 2,121 From: Lansing, MI USA |
The only way I know of is to use this on the double-click event:
CODE SendKeys "+{F2}", True I don't know of any zoom properties I can invoke, e.g. Me.txtBox.Zoom = True. If anyone can find some obscure one, please let us know. |
|
|
|
Jan 9 2006, 02:33 PM
Post
#7
|
|
|
UA Forum Administrator Posts: 38,131 From: Birmingham, Alabama USA |
All that is needed here is to use the On Double Click event of the control:
CODE Private Sub ControlName_DblClick(Cancel As Integer) DoCmd.RunCommand acCmdZoomBox End Sub RDH |
|
|
|
Jan 9 2006, 02:39 PM
Post
#8
|
|
|
UtterAccess VIP Posts: 2,121 From: Lansing, MI USA |
Bingo! Thanks, Ricky. I knew there had to be a way to "properly" invoke it but the exact method eluded me... and, of course, Access help was useless.
|
|
|
|
Jan 9 2006, 06:45 PM
Post
#9
|
|
|
UtterAccess VIP / UA Clown Posts: 25,199 From: LI, NY |
Thanks to you both. That is a great tool.
|
|
|
|
![]() ![]() |
|
Go to Top · Lo-Fi Version | Time is now: 19th June 2013 - 01:43 AM |