读取图片

Question

Private Sub Command1_Click()
a = Text1.Text & Text2.Text
Image1.Picture = LoadPicture("d:/'a'.bmp")
End Sub
图片名为 TEXT1。TEXT  &  TEXT2。TEXT 如果TEXT1。TEXT=1 
TEXT2。TEXT=23那么图片名为123
a=text1.text & text2.text
我用Image1.Picture = LoadPicture("d:/'a'.bmp")
读不出来 
应该怎么样读
谢了

Answer 1

d:/'a'.bmp   文件名错误吧？！ 文件名中不该有：'

Answer 2

Private Sub Command1_Click() 
a = Text1.Text & Text2.Text 
Image1.Picture = LoadPicture("d:/" & a & ".bmp") 
End Sub