vb.net中灰色代码,vb代码黄色

vb.net复选框及字体颜色问题 题目是图上的第十题，计算代码我会做，但是那个红字黄底的代码怎么写

        TextBox1.ForeColor = Color.Red

        TextBox1.BackColor = Color.Yellow

        TextBox1.Text = 1234

相关问答

Q1: VB.NET，如何用代码实现改变字体、颜色、加粗，以及恢复默认？

1、2和3：你怎么改的,就怎么恢复默认

3：textbox1.font=new font(字体名称，字体大小，字形)，字形有加粗常规倾斜下划线等几种。

Q2: vb.net里改标签背景颜色的代码是什么啊

Label1.BackColor = Color.Red

Label1.BackColor = Color.Blue

Label1.BackColor = Color.Yellow

Q3: 在vb。net中 我们制作个打字程序我想在文本框里的字母中指定一个字母变颜色的代码，要怎么写？？

在TextChanged事件中：privatevoidrichTextBox1_TextChanged(objectsender,EventArgse)

{

if(label1.Text==richTextBox1.Text)

richTextBox1.ForeColor=Color.Black;

else

richTextBox1.ForeColor=Color.Red;

}-------------------继续答复：

首先，还是建议你使用TextChange方法。KeyPress方法只有在松开键后才触发，如果一直按着键比如写a，那这串a颜色不会变的，直到你松手。

然后上代码，测试可用的，你直接放到KeyPress里也能用：

PrivateSubrichTextBox1_TextChanged(senderAsObject,eAsEventArgs)

ForiAsInteger=0TorichTextBox1.TextLength-1

richTextBox1.SelectionStart=i

richTextBox1.SelectionLength=1

Ifi=label1.Text.LengthThen

richTextBox1.SelectionColor=Color.Blue

ElseIflabel1.Text(i)richTextBox1.Text(i)Then

richTextBox1.SelectionColor=Color.Red

Else

richTextBox1.SelectionColor=Color.Black

EndIf

Next

richTextBox1.SelectionLength=0

richTextBox1.SelectionStart=richTextBox1.TextLength

EndSub这里写错的是红色，多写出来的是蓝色，具体你自己可以调整。

顺便鄙视一下那个把我代码直接转VB贴上来的，我直接用工具转成VB了，方便楼主参考。

有问题可以继续追问。