Topics Search

Zoom In and Out

Zoom In and Out
Views: 2
Public Function DisplayImage(ctlImageControl As Control, strImagePath As Variant) As String

Dim strResult As String
Dim strDatabasePath As String
Dim intSlashLocation As Integer

With ctlImageControl
If IsNull(strImagePath) Then
.Visible = False
strResult = "No image name specified."
If InStr(1, strImagePath, "\") = 0 Then
' Path is relative
strDatabasePath = CurrentProject.FullName
intSlashLocation = InStrRev(strDatabasePath, "\", Len(strDatabasePath))
strDatabasePath = Left(strDatabasePath, intSlashLocation)
strImagePath = strDatabasePath & strImagePath
End If
.Visible = True
.Picture = strImagePath
strResult = "Image found and displayed."
End If
Sponsored Links:

Similar posts...


Stop auto-highlighting on text box Zoom

Stop auto-highlighting on text box Zoom Icon
I have a text box with a memo control source, when you click the text box an acCmdZoomBox is run. However when the Zoom box opens it highlights all of the data, which is causing issues with people accidentally deleting all the information. I have seen something about a selstart, sellength command, but I don't know how to refer that to a zoom box.
Also is it possible to carriage return on a Zoom Box memo, or even text box

Create a Zoom Button

Create a Zoom Button Icon
Is there any way to create a Zoom Button on a form that will open the Zoom form normally activated by the Ctrl-F2 command while in a text or memo field

Builiding a custom Zoom Box to display a large amount of data...

Builiding a custom Zoom Box to display a large amount of data... Icon
Microsoft's built in zoom box allows viewing a large amount of data in a pop up dialog form. I don't like it's looks at all, so I want to do the same thing except using a slicker custom form, Form1. A single click or a double click on any field on Form1 opens the custom form, Zoom.
Database3 is where my existing Table1 and the existing form I would like to customize with the new zoom box are located.

Zoom would have a large memo field to display the data. Users can add or change data and when the OK button is clicked on Zoom, the updated field data is saved for that field.

Does anyone know how to do this so I can copy the code into my existing form, or create a new one with this functionality

Custom Zoom Form Not Updating Data

Custom Zoom Form Not Updating Data Icon
I have some code tied to the double click event for a control that opens a custom zoom form and displays the text as well as the label of that control. Right now, if I add to the text in the zoom form, it doesn't actually update the data in the table. I know I've read somewhere how to accomplish this, but my searching isn't finding it again.

Edit Data in Zoom-In Control

Edit Data in Zoom-In Control Icon
While designing a Form, Report or Query certain properties of these objects we can Zoom in and edit the property values in a big window, like Record Source Property, Filter or Order By property etc. When you right-click on these properties a Shortcut Menu will open up with the Zoom... option in it and when clicked we can edit the property values comfortably in a big window.

Use Zoom Box For Inserting Large Amount Of Data

Use Zoom Box For Inserting Large Amount Of Data Icon
Many a times while entering data into database tables, we need to enter a large amount of data in single cell. Since Access 2010 table columns length has to be set first to view all the entries being written, you can use Zoom box instead to enter the data. Zoom box will be helpful especially when you need to insert large amount of data that cannot be displayed properly in control box.

Design View

Design View Icon
I am very new to Access and have not been able to find a way to be in Design View and zoom in to align text fields. I have used another database that allowed me to zoom inand out to see how the details.

Pan and Zoom Images

Pan and Zoom Images Icon
I have a Microsoft Access 2007 application that displays images in an image frame. I would like to be able to pan and zoom the images. Is there a way to do that? If so how is it done?

Allow Users to Zoom into Comment Fields

Allow Users to Zoom into Comment Fields Icon
Find out how to Allow Users to Zoom into Comment Fields. (video tutorial)

Zooming in on a Form Image

Zooming in on a Form Image Icon
I created a Form where I display a JPG image using the following code:

Me![DRImageFrame].Picture = Me.[DRIP]

This works great.

If I view the same JPG using "Windows Picture and Fax Viewer I am able to zoom in on the image. And so my question is, is there a way I can zoom in on the JPG image from within the Access Form