UtterAccess.com
X   Site Message
(Message will auto close in 2 seconds)

Welcome Guest ( Log In | Register )

 
Reply to this topicStart new topic
> Allow user to open text box in larger separate window    
 
   
DSC
post 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.
Go to the top of the page
 
+
Jack Cowley
post 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
Go to the top of the page
 
+
ScottGem
post 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
Go to the top of the page
 
+
SerranoG
post 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.
Go to the top of the page
 
+
ScottGem
post 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?
Go to the top of the page
 
+
SerranoG
post 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.
Go to the top of the page
 
+
R. Hicks
post 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
Go to the top of the page
 
+
SerranoG
post 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.
Go to the top of the page
 
+
ScottGem
post 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 the top of the page
 
+

Thank you for your support! Reply to this topicStart new topic

Jump To Forum:
 



RSS Go to Top  ·  Lo-Fi Version Time is now: 19th June 2013 - 01:43 AM