永发信息网

跪求以下这段VB代码到底哪里出错了,错误说.forecolor属性使用无效,是设置字体颜色的。

答案:3  悬赏:20  手机版
解决时间 2021-02-14 04:41
  • 提问者网友:人傍凄凉立暮秋
  • 2021-02-13 15:40
Private Sub Combo3_Click()
Select Case Combo3.Text
Case 0
Text1.ForeColor vbRed
Case 1
Text1.ForeColor vbGreen
Case 2
Text1.ForeColor vbBlue
End Select
End Sub
最佳答案
  • 五星知识达人网友:梦中风几里
  • 2021-02-13 16:24
少了等号,应改为
Private Sub Combo3_Click()
Select Case Combo3.Text
Case 0
Text1.ForeColor = vbRed
Case 1
Text1.ForeColor = vbGreen
Case 2
Text1.ForeColor = vbBlue
End Select
End Sub
全部回答
  • 1楼网友:往事埋风中
  • 2021-02-13 18:46
private sub command1_click() print "hello,vb" form1.forecolor = "&h0000ff" ' 窗体字体颜色通过forecolor属性设置,这里设置为红色 form1.backcolor = "&h00ff00" ' 窗体背景颜色通过backcolor属性设置,这里设置为绿色 end sub
  • 2楼网友:拾荒鲤
  • 2021-02-13 17:37
属性使用等号赋值 Text1.ForeColor vbRed 改成 Text1.ForeColor = vbRed 其他类似
我要举报
如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
点此我要举报以上问答信息
大家都在看
推荐资讯