高手来解释一下以下代码啊

Private Sub Form_Load() //声明form_load过程
Timer1.Interval = 500 式 //时钟控件跳动间隔为500毫秒
Scale (-320, 320)-(320, -320) //设置某坐标位置
Me.FontSize = 40 //设置对象me的字体大小为40
End Sub //过程结束

Private Sub Timer1_Timer() //声明Timer1_Timer过程
Dim x, y, j As Integer //定义变量xyj为integer类型
Cls //清除当前显示的内容
For i = 1 To 80 //循环从1开始到80结束
DrawWidth = 6 //图形宽度等6
x = 320 * Rnd //为坐标X赋值
y = 320 * Rnd //为坐标y赋值
If Rnd < 0.5 Then x = -x //如果变量rnd小于0.5那么x为负
If Rnd < 0.5 Then y = -y //如果变量rnd小于0.5那么y为负
PSet (x, y), QBColor(Rnd * 15) //用坐标X和Y绘制曲线,并设置颜色
Next i //继续下一次循环
Me.ForeColor = QBColor(Rnd * 15) //设置对象me前景色为QBColor()函数返回的值
Print "谢谢啊" //输出""谢谢啊""
End Sub //结束本过程

妈呀，你用什么写的也不说，叫人如何回答你