Question

VB中用print如何设置字体随机颜色

VB中用print如何设置字体随机颜色,就是字体的颜色随时间的变化而变化,用TIME控件吗>要怎么用啊,r,g,b在TIME里不好表示啊???

Answer 1

print本身不能设置颜色，只能改变它载体的颜色。如果你是在窗体上显示只要改变窗体的前景颜色即可。
Private Sub Timer1_Timer()
Dim r As Integer
Dim g As Integer
Dim b As Integer
r = Int(Rnd * 255)
g = Int(Rnd * 255)
b = Int(Rnd * 255)
Form1.ForeColor = RGB(r, g, b)
Print "xing", vbRed
End Sub