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