我在文件内的TP文件夹内有很多的图片，我想在Text1.Text输入图片的名字就可以让Image1显示相应的图片，可是路劲就是搞不懂了，谢谢各位老师给一个正确的路劲。
Private Sub Command1_Click()
Image1.Picture = LoadPicture(App.Path & "\TP\Text1.Text & .jpg")
End Sub