谁教我做VB程序 简单就好 学校活动要交程序

来源：百度知道 编辑：UC知道 时间：2024/06/04 20:19:47
谁教我做VB程序 简单就好 学校活动要交个程序
可我不会就想做个最简单的交掉就好
最好过程详细点 要求是某个VB程序制作的过程 我照做一遍。。

Private Sub Form_Load()
Timer1.Interval = 500
Scale (-320, 320)-(320, -320)
Me.FontSize = 40
End Sub

Private Sub Timer1_Timer()
Dim x, y, j As Integer
Cls
For i = 1 To 80
DrawWidth = 6
x = 320 * Rnd
y = 320 * Rnd
If Rnd < 0.5 Then x = -x
If Rnd < 0.5 Then y = -y
PSet (x, y), QBColor(Rnd * 15)
Next i
Me.ForeColor = QBColor(Rnd * 15)
Print "祝你生日快乐"
End Sub
一个生日贺卡，添加个时间控件，运行就行了

还是自已动手吧