请教！！

loger 小水手 UID 259 精华 0 积分 1 帖子 1 阅读权限 10 注册 2005-8-4 来自 贵州 状态 离线	请教！！ Private Sub Dir1_Change()     File1.Path = Dir1.Path End Sub Private Sub Drive1_Change()     Dir1.Path = Drive1.Drive End Sub —————————————————————— Private Sub File1_Click()     SelectedFile = File1.Path & "/" & File1.FileName     Iamge1.Picture = LoadPicture(SelectedFile) End Sub —————————————————————— 请问虚线之间的代码有什么问题吗？我是照着教材录入的，可运行后却报告：实时错误“424” 要求对象。请教这段代码有什么问题？
2005-8-4 10:14 #1

feier 传说中的水手 UID 272 精华 0 积分 291 帖子 291 阅读权限 1 注册 2003-11-28 状态 离线	image1拼写错误!或者控件没有放上去
2005-8-6 09:36 #2

禾路 二副 UID 296 精华 0 积分 367 帖子 367 阅读权限 30 注册 2003-1-22 来自 江苏盱眙 状态 离线	我们来解释一下你的问题 这是一个通过dir file 和 drive控件配合共同来完成的操作 vb是由事件驱动的 故在 Private Sub Dir1_Change()     File1.Path = Dir1.Path End Sub Private Sub Drive1_Change()     Dir1.Path = Drive1.Drive End Sub 中 就是事件驱动 在 Private Sub File1_Click()     SelectedFile = File1.Path & "/" & File1.FileName     Iamge1.Picture = LoadPicture(SelectedFile) End Sub 依然是事件驱动 但又有不同 SelectedFile是一个string变量（你有没有定义？）它得到了file 的地址 然后  用LoadPicture这个方法调进图片 除了楼上的建议我在说几点 由于vb6和win98有冲突在调图片时容易出现问题 还有要注意正确的编码 你上面的编码是不完全的。 禾路 正直，坚强！
2005-8-13 21:19 #3

阿龙 二副 UID 212 精华 0 积分 213 帖子 213 阅读权限 30 注册 2002-5-10 来自 开封 状态 离线	能和你交个朋友吗？禾路 看你很厉害啊？我是一个新手。想找一位高人。看你很厉害啊。能加我吗？267365558 或者我加你也行。把你的QQ给我说以下
2005-8-15 17:55 #4

禾路 二副 UID 296 精华 0 积分 367 帖子 367 阅读权限 30 注册 2003-1-22 来自 江苏盱眙 状态 离线	这都是最基础的东西 朋友 潜心学习 面包会有的
2005-8-16 22:37 #5