How do I move focus to an Image object

Posted on 2010-11-29
Medium Priority
Last Modified: 2013-11-29
I've been strugling with this problem for two days now:
I've got a form with about 100 Image objects and 100 textbox objects.
I would like to perform several actions on the objects, but instead of making a list in Visual Basic like:

Set ctl = image1
Set ctl = image2
Set ctl = image3

and so on I would like to make this dynamic like: Set ctl = "image" & me.imagenumber, but I haven't been able to get this to work.
I've also tried to do this with:

DoCmd.GoToControl ("Input" & Me.imagenumber)       for the textbox object
DoCmd.GoToControl ("Image" & Me.imagenumber)      for the image object

The strange thing is that for the textbox object it works perfectly, but when I try the same thing for the image object I get:
"Run-time error 2110 - access can't move the focus to the control"

It's probably (hopefully?) pretty easy to solve, but so far I haven't been able to find a solution and it's getting pretty frustrating.
Any help will be very much appreciated.

Kind regards,


Question by:Athoss22
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
  • 5
  • 4
  • 2

Expert Comment

ID: 34235401
An image cannot receive focus. Sorry 'bout that.

Author Comment

ID: 34235411
Ok thanks for the information, but  maybe there's another way around my problem?
The reason I'm is asking because I need to change (amongst other things) the postion of the images. So instead of making lists like:

Me.image1.Top = Me.Top
Me.image1.Left = Me.Left
Me.image2.Top = Me.Top
Me.image2.Left = Me.Left
Me.image3.Top = Me.Top
Me.image3.Left = Me.Left

and so on, I hope there's a better way to do this. Do you know if it's possible to do something like:
"Me.image" & me.imagenumber & ".Top" = Me.Top

Any suggestions?

Kind regards,


Expert Comment

ID: 34235415
Oh, you might try putting your images in bound or unbound frames which can receive focus.
Get free NFR key for Veeam Availability Suite 9.5

Veeam is happy to provide a free NFR license (1 year, 2 sockets) to all certified IT Pros. The license allows for the non-production use of Veeam Availability Suite v9.5 in your home lab, without any feature limitations. It works for both VMware and Hyper-V environments


Expert Comment

ID: 34235439
Check out this information. It might help you.

LVL 74

Expert Comment

by:Jeffrey Coachman
ID: 34235679
You can set the focus to a Image control using.

I will confess that I am a bit hazy as to what you ultimate goal is here.

You cannot set a Textbox equal to an image control.

If your goal here is to set the "Control source" of the textbox to the "Picture" property of the Image contol, then try something like this:

Dim ctl As Control
Dim intDesig As Integer
Dim strMatch As String
    For Each ctl In Me.Section(0).Controls
        If ctl.ControlType = acTextBox Then
            intDesig = CLng(Right(ctl.Name, Len(ctl.Name) - 3))
            strMatch = "img" & intDesig
            ctl = Me.Controls(strMatch).Picture
        End If
    Next ctl

Sample attached



Expert Comment

ID: 34235754
Jeff, does your code actually set focus on the image? I always was under the impression that could not be done. You cannot tab to an image since there is no tab stop. Same thing with a label. If his images are placed in frames then there is a tab stop and the frame can receive focus.
LVL 74

Expert Comment

by:Jeffrey Coachman
ID: 34236199
My code simply sets the control source of the textbox to the corresponding image .Picture property.

I am still not quite sure of what the asker is looking for, so this is just my interpretation...

I am even more confused by http:#a34235411
Now the goal is to set the position of the controls?
I am just not understanding the reason or need for doing this.

Perhaps I am just missing something simple...

Let's see if Athoss22 will take a step back and clearly explain what the ultimate goal is here...


Expert Comment

ID: 34236287
Jeff, sounds like the best thing. I am curious what it might be. Guessing that it might be he wants to cause the images to move around on the form. I hope he's got a lot of ram and a fast processor if so.

Author Comment

ID: 34237411
Thanks for all the feedback. To clarify what I'm trying to achieve I attached a screenshot. As you can see I have several rows of images of products of different sizes. Underneath each image there's a textbox to enter an amount of the product.
It's no problem to generate this layout from data in a table, but I need the form to get flexible.
If one of the products gets replaced by another product I need to adjust the size and the image of the image control and the size of the textbox below the image. Furthermore I need to adjust the location of all the products/textboxes to the right of the product that has changed.
If for example product 3 on row 2 gets replaced by a smaller product I need to adjust position of all the products in row 2 to the right of product 3 so that they move to the left.

I thought it would be easiest if I could set focus to the images and textboxes that need to be adjusted, but since that's not possible I'm looking for another way to do this.
LVL 74

Accepted Solution

Jeffrey Coachman earned 2000 total points
ID: 34238916
1. Well, what you are presenting above now is a far cry from what you originally requested
In the future simply state your ultimate goal.
When you tell us "How" you want things done (move focus to an Image object)
It hamstrings us.
What you are requesting has nothing to do moving the focus to an image control.

2. As far as I can tell, you need to "Group" these controls
(What version of Access are you using?, as the steps are different for different Access versions)

Open the form in design view and select the two controls (The image and the textbox) that you want to Group.
(Click the first control, then hold down the shift key and select the other contol)
Then (In Access 2007) click: Arrange-->Control Layout-->Then click the "Group" icon.
Now when you click on either control, they will both be selected (Grouped)
If you resize or move one, the other will follow.
(in Access 2003, click format-->Group.)

In Access 2007 You can even create a "Layout".
This is where you select "All" the contols and click the "Tabular" control Layout.
This will resize all the controls, in the "Grid" stlye you are asking about.

You can probably play around with both of these options (possibly in conjuction with one another) to get what you are after.

3. I also will say that this is a layout style that I have never seen. (not even in a web page)
Are you sure this is the only way that this data can be displayed?
This will require a fair amount of maintenance everytime a product changes.
As far as I can tell, this will never be truely "Dynamic" (Automatically adjusting on the fly) as you are are specifying.
Also, what if you have a thin product image with a long price? (price may not fit in the skinny textbox.)

LVL 74

Expert Comment

by:Jeffrey Coachman
ID: 34254319

Featured Post

On Demand Webinar: Networking for the Cloud Era

Did you know SD-WANs can improve network connectivity? Check out this webinar to learn how an SD-WAN simplified, one-click tool can help you migrate and manage data in the cloud.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

AutoNumbers should increment automatically, without duplicates.  But sometimes something goes wrong, and the next AutoNumber value is a duplicate.  This article shows how to recover from this problem.
This article shows how to get a list of available printers for display in a drop-down list, and then to use the selected printer to print an Access report or a Word document filled with Access data, using different syntax as needed for working with …
In Microsoft Access, learn how to “cascade” or have the displayed data of one combo control depend upon what’s entered in another. Base the dependent combo on a query for its row source: Add a reference to the first combo on the form as criteria i…
Add bar graphs to Access queries using Unicode block characters. Graphs appear on every record in the color you want. Give life to numbers. Hopes this gives you ideas on visualizing your data in new ways ~ Create a calculated field in a query: …
Suggested Courses

801 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question