picturebox控件

Question

我在用picturebox控件时用LoadPicture(C:\a.bmp),在加载时出现不支持此方法或属性，是怎么回事？难道picturebox控件没有loadpicture这个属性马？

Answer 1

LoadPicture("C:\a.bmp")  '加双引号

Answer 2

对了，忘了说了，我加载图片时是用变量的。我把源代码贴出来，因为loadpicture加载的是变量，所以不能加双引号啊！
 ShowSave = True
 CDl.CancelError = True
 CDl.Filter = "*.jpg|*.JPG|*.bmp|*.BMP"
 CDl.ShowOpen
 If Err.Number <> 0 Then
    ShowOpen = False
    Exit Function
 End If
'得到打开的路径
 pathname = CDl.FileName
  Picture.Picture = LoadPicture(pathname)

Answer 3

代码无误，是否有Picture名字的控件

Answer 4

Picture.Picture = LoadPicture(pathname),我看这句话有错，是否Picture1？
在VB中Picture本身是一个保留字

Answer 5

呵呵，问题在这里：
Picture.Picture = LoadPicture(pathname)
改为
Set Picture.Picture = LoadPicture(pathname)
就ok了。
你的picturebox控件的名字是Picture吗？给分吧：）

Answer 6

用这一条就ＯＫ了。
picture1.picture=loadpicture("c:\a.bmp")

Answer 7

Picture.Picture = LoadPicture(pathname)
你这最后一句改成
Picture.Picture = LoadPicture(" & pathname & "),应该可以吧。（我没有试）

Answer 8

注意你的pathname是不是一个合法的路径名和文件名，经常见人在编程取路径名和文件名时都会因为多了一个或少了一个“\”而出错，建议你在picture1.picture=loadpicture(pathname)前先检查一下pathname的值。