Private Sub Form_Click()
Dim x1 As Integer, y1 As Integer, i As Integer
FontSize = 20
Scale (-320, 320)-(320, -320)
Cls
Print "新年快乐!"
For i = 1 To 80
DrawWidth = 6
x1 = 320 * Rnd
y1 = 320 * Rnd
If Rnd < 0.5 Then x1 = -x1
If Rnd < 0.5 Then y1 = -y1
PSet (x1, y1), QBColor(Rnd * 15)
Next i
End Sub
这段VB代码如何更改“新年快乐”这几个字的字体颜色?
答案:3 悬赏:40 手机版
解决时间 2021-04-27 23:22
- 提问者网友:孤凫
- 2021-04-27 03:43
最佳答案
- 五星知识达人网友:何以畏孤独
- 2021-04-27 05:00
设置窗体的ForeColor属性就可以了
全部回答
- 1楼网友:大漠
- 2021-04-27 07:09
在Print "新年快乐!"这句前加一句:
Me.ForeColor=255
- 2楼网友:山河有幸埋战骨
- 2021-04-27 05:46
VB里都是这样 ,字体在什么控件上,就设置这个控件的FORECOLOR就可以了,字体自然就变颜色了
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
大家都在看
推荐资讯