一个关于vb界面效果的简单问题！谢谢了！

我有一段程序如下：Dim CX, CY, XPOS, YPOS, msg
ScaleMode = 3
DrawWidth = 5
ForeColor = QBColor(4)
FontSize = 34
CX = ScaleWidth / 2
CY = ScaleHeight / 2
Cls
msg = "欢迎您使用"
CurrentX = CX - TextWidth(msg) / 2
CurrentY = CY - TextHeight(msg)
Do
    XPOS = Rnd * ScaleWidth
    YPOS = Rnd * ScaleHeight
    PSet (XPOS, YPOS), QBColor(Rnd * 15)
    DoEvents
    Loop这段程序的效果就是使界面慢慢呈彩色雪花点分布。书上把它放在private Sub Form_Click()中，效果可以实现，但我把它放在Private Sub Form_Load()下，运行时找不到窗体所在，请问为什么呀？
大家可以把它放在程序里试试看。