回 帖 发 新 帖 刷新版面

主题:StdPicture对象如何调整大小

Dim BackPic As New StdPicture

Set BackPic = LoadPicture(App.Path & "\back.jpg")
BackPic.Width = 100

在对BackPic.Width赋值时出现错误

我的目的是对图片进行缩放
又不想用控件

请知道的朋友们解答一下

回复列表 (共2个回复)

沙发

StdPicture不是控件,而是对象类,所以它的width不能这样赋值,你看看对象浏览器就知道

板凳

应该读取StdPicture的大小再按比例缩放
★注意单位(ScaleMode).

我来回复

您尚未登录,请登录后再回复。点此登录或注册