vb中如何设置白色幸运星？

来源：百度知道 编辑：UC知道 时间：2024/06/08 14:12:37
vb中如何设置白色幸运星？设置的方法？

此方法还可以生成一个五星红旗

'需要控件:command1
Private Sub Command1_Click()
With Me
.BackColor = vbRed
.CurrentX = 500
.CurrentY = 500
.FontSize = 60
.ForeColor = vbWhite ' vbYellow=黄色,vbWhite=白色,vbred=红色,vbblue=蓝色
End With
Print Chr(-24081)
End Sub