Question

VB 问题（为什么在Form 的 Load事件中输入以下代码，却不能执行？

Answer 1

不是不执行
只是被刷掉了
要么设置Me.AutoRedraw
=
True
要么先me.show显示窗体后再执行print
Private
Sub
Form_Load()
Me.AutoRedraw
=
True
sample$
=
"vwxyzq"
x
=
(ScaleWidth
-
TextWidth(sample$))
/
2
y
=
(ScaleHeight
-
TextHeight(sample$))
/
2
CurrentX
=
x
CurrentY
=
y
Print
sample$
End
Sub

Answer 2

单个的窗口程序吗？
看下你的启动的代码是不是
设为了sub_main
还的启动程序时是不是启动的这个窗口
如果多个窗口的话，你要加入启动代码
load
Object

Answer 3

是不是想让窗体显示出来以后再执行你的vbs?
private
sub
form_load()
...
formx.show
'在这里执行你的vbs
end
sub
这样试试看行不~