如何获取图像控件的控件名称

沙溪一滴水　发表于：2013-12-08 21:30:59 　

要获取文本框、命令按钮等可用Set ctl = Screen.ActiveControl，若要获取图像（图片）控件的名称应该用什么方法呢？因为用Set ctl = Screen.ActiveControl系统给出的错误提示是：你输入的表达式需要控件在活动窗体中。

Top

123木头人发表于：2013-12-09 19:33:31

虽然我不会，但是图片控件是自己放上去的，还要用代码来获取名称，有点浪费资源的怀疑。

一般人会去获取控件名称是因为控件多了，一个个列麻烦，才会去遍历。

Top

cspa 发表于：2013-12-10 12:10:08

Private Sub Form_Open(Cancel As Integer)
Dim ctl As Control
Dim strName As String

For Each ctl In Forms![图像控件所在窗体名称]
   If TypeOf ctl Is Image Then
    strName = ctl.Name                'strName就是你要的所有图像控件的名称
   End If
Next
End Sub

Top

沙溪一滴水发表于：2013-12-10 14:08:36

老师好！是这样，我设计了一个窗体，上面有几十个图片控件，分别代表不同的产品，我的目的是单击图片时系统就会弹出一个信息窗介绍图片所代表产品的相关信息，这样就需要以图片控件名称与信息窗体之间建立链接关系，当然通过编写不同图片控件单击事件的代码也能实现，但为了代码更简洁，以变量的形式获取图片控件的名称，再与信息窗体之间建立链接关系就会更简便高效。谢谢！

非常感谢Cspa老师，用了你教的方法终于实现了我的愿望，再次谢谢！

Top

沙溪一滴水发表于：2013-12-10 14:27:46

非常感谢Cspa老师，你教的方法终于帮我实现的我的愿望，再次谢谢！

Top

沙溪一滴水发表于：2013-12-10 16:17:47

Cspa老师好！你的方法是列出了所有图片控件的名称，可我要的是我鼠标所点击的哪个图片控件的名称该怎么做

Top

总记录：5篇页次：1/1 9 1 :

Access交流中心

如何获取图像控件的控件名称