琉球挂满中国国旗:用VB语言编写程序(1):

来源:百度文库 编辑:查人人中国名人网 时间:2024/04/28 23:15:56
设计一个程序,让窗体每次接受鼠标点击后随机改变窗体背景颜色.

提示:背景颜色BackColor可以使用QBColor函数指定,该函数能接受数字0~15,随机数可以用函数Rnd产生.

考试帮助啊!

Private Sub Form_Click()

Randomize (Timer) ' 对随机数生成器做初始化的动作。
Form1.BackColor = QBColor(Int((16 * Rnd))) ' 生成 0 到 15 之间的随机数值给QBcolor
End Sub

Private Sub Form_Click()
Me.BackColor = QBColor(15 * Rnd)
End Sub
就这就可以了