求VB大神帮忙

你看，
简简单单3经验又到手了，
距离升级不远了。
　　　　　　　 　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　 ╮(￣▽￣)╭　　　　　　　　　　你为什么这么好玩，我也不知道为什么咯。　

[SLEEPING SYMBOL]
你看，
简简单单3经验又到手了，
距离升级不远了。
　　　　　　　 　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　 ╮(￣▽￣)╭　　　　　　　　　　你为什么这么好玩，我也不知道为什么咯。　

画一个label和timer,
private sub form_load()
label1.autosize=true
label1.caption="你好"
label1.fontsize=52
label1.forecolor=vbred
label1.backcolor=rgb(255,255,255)
timer1.interval=100
end sub
private sub timer1_timer()
iflabel

问题二：
1、 设计一个能实现加、减、乘、除的程序。求完整源码

画一个label和timer,
private sub form_load()
label1.autosize=true
label1.caption="你好"
label1.fontsize=52
label1.forecolor=vbred
label1.backcolor=rgb(255,255,255)
timer1.interval=100
end sub
private sub timer _timer()
if label1.top>me.height-(label1.height+540) then
timer1.enabled=false
else
label1.top=label1.top+100
end if
end sub