关于StdPicture的问题~~~~~~~~~~~~~

Question

请问为什么这段代码总是说第二句的对象变量或 with 块变量未设置？？？
Dim Pic As StdPicture
Pic.AutoRedraw = True
Pic.Picture = LoadPicture("C:\test.jpg")
Pic.CurrentX = (Pic.Width - Pic.TextWidth("test")) / 2
Pic.CurrentY = (Pic.Height - Pic.TextHeight("test")) / 2
Pic.Print "test"
SavePicture Pic.Image, "c:\new.jpg"

Answer 1

Dim pic As New StdPicture即使你这个错误调通了，估计还会有其他的问题，你这是在哪弄的代码！？＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝
免费的学习交流网站，欢迎大家访问！
http://www.j2soft.cn/

Answer 2

不对吧。AutoRedraw 属性只有picture控件才有吧。一个stdpicture类型应该没有哦。
lz还是老老实实用控件来做。 放个picture控件： 名称改为pic
再把Dim Pic As StdPicture去掉。 就应该ok了！！

Answer 3

但是我不需要让picture控件显示出来啊，而且我是编译com组件，如果在服务端创建控件的话，太影响性能了吧？

Answer 4

我在窗体上放picture控件就可以为什么会这样。

Answer 5

autodraw, print...
这些你用的属性，方法，都是picture控件的方法啊，
要达到你的目的，这个控件最方便。要不显示，visiable=false就可以了。
不清楚其他的方法。。