大家好，我想把一个图片重命名，新名字是根据选择项目的不同而改变，如该图片有人物和水，我则分别点击人物和水的按钮，保存之后新名字就是人物水。如果我点击人物，新名字就是人物。请问怎么实现？谢谢

谢谢您，我具体说下：
下面我写的程序是错误的，我想要实现的是：标签中的内容是变化的，也就是说text1.text是变化的，我想打开一个图片，对这个指定的图片进行编辑（即实现通过改变text中的值来重命名图片，图片的新名字就是text中的值。）但问题是现在执行a = App.Path & "\b.JPG"时没有吧b当成变量，而是最终新名字就是b字母，求指导？怎实现图片的新名字就是text中的值，多谢！
Dim a As String
Dim b As String
Dim c As String
c = App.Path & "\qq.JPG"
Text1.Text = Label1.Caption + Label2.Caption + Label3.Caption
b = Text1.Text
a = App.Path & "\b.JPG"
Name c As a

好哒！！弄清楚了，谢谢啦！