Question

VB中怎么用代码打出红色的字

比如弄个按扭command1，怎么把弄出按扭的字用代码变成红色
如果可以的话能不能把每条代码什么意思写出来。
谢谢！
不是让代码的字变红，是象电脑里的计算器的Baskspace一样字变红。

Answer 1

Command是没有forecolor这个属性的，如果要改变的话肯定要用到API，如果觉得用API很麻烦的话，可以用其它的控件代替。可以使用Option控件或者唤氏是Check控件代替，在窗体上添加一个单选框控件Option1，然后把Option1的Style改为一然后再把Option1的ForeColor属性改为红色，然后在Option1的Click事件里面写入

Private Sub Option1_Click()
Option1.Value = False
'这下面写你想要写的代码
End Sub

我就只能想到用代替的方法了，如果不知道怎么使用API的话，这个也是一个和仿散方法。

对了还有一个方法，，选择菜单“工程”---"部件"----弹出部件对话框大纤，在部件对话框中选择"Microsoft Forms 2.0 Object Library"，然后在左边的的工具箱里面就添加了该控件, 里面有一个按钮(CommandButton)控件,那个按钮控件就有ForeColor属性,把ForeColor改为红色就可以啦.然后再Caption属里面输入文字.

Answer 2

选择返启菜单“工程”---"部漏培如件"----弹出部件对话框，在部件对话框中选择"Microsoft Forms 2.0 Object Library"，然后在左边的的工具箱里面就添加了该控件, 里面有一个按钮(CommandButton)控件,那中纳个按钮控件就有ForeColor属性,把ForeColor改为红色就可以啦.然后再Caption属里面输入文字.

Answer 3

他这个按钮或许不是command控件，很多漂亮的设计都是通过帆困其他方法实现的。
或者他是图片背景。
个人认为态此念扒伏VB的COMMAND控件没有ForeColor属性。

Answer 4

command1.forecolor=&H000000FF&
就是设置字体颜色为红色

Answer 5

属性设置。