请教一个command上的文字变色问题

我想让右边的Frame1的按钮“单”单击一下“单”字变成红色视为选中状态，再单击下变回原来的颜色。假设“单”为红色，然后输入N次，按确定，则在左边单序号显示N次。例“123”单击变为123输入8次，则在左边的1，2，3text中分别输入8.
请教下这个代码要怎么写，万分感谢ING

解决方案 »

  1.   

    vb中无法改变command的文本颜色
    可参考下这个http://zhidao.baidu.com/question/13526554.html
      

  2.   

    Option Explicit
    Dim r As BooleanPrivate Sub Command1_Click()
    If r = False Then Command1.BackColor = "255,128,0" Else Command1.BackColor = "0,128,128"
    r = Not r
    End Subcommand1的Style属性 = 1，就可以改变按钮的背景色了。
      

  3.   

    Command1.picture = loadpicture.................
      

  4.   

    弟，你看下我给你的连接。
    还有，单纯用vb去修改按钮的文本颜色是行不通的，因为command没有那个属性。连接里面是通过变通得到的，给你搜的，不过我没有测试。
      

  5.   

    以前看到代码通过api设置的，vb本身里面是没法设置的。
      

  6.   

    搜了下发现很多，懒得翻了：
    http://www.baidu.com/s?tn=monline_dg&bs=vb+%B8%C4%B1%E4%B0%B4%C5%A5%D1%D5%C9%AB&f=8&wd=vb+%B8%C4%B1%E4%B0%B4%C5%A5%CE%C4%D7%D6%D1%D5%C9%AB
      

  7.   

    Ctrl+T 里面找 Mictrsoft Forms 2.0...里面有个按钮是可以实现的
      

  8.   

    建议用OptionButton控件，style属性设为1，forecolor属性也可以设置，而且按下效果明显
      

  9.   


    谢谢，我找到了个按钮，单建一个按钮是可以变色，可是一用数组ForeColor就不能使用了。
      

  10.   

    上面放个label控件盖住就行了
    或者直接用label控件代替command控件
      

  11.   

    这个你用forms2.0里头的commandbutton很好实现的嘛，编程的时候用其forecolor不就ok了，具体也就是一个if语句就搞定了啊