文本框文字顏色問題

问题描述

請教一下，這段是不是哪裡寫錯了，為何界面上，死活就是黑色的，不會變顏色Ifdatatable1.Rows.Count>0ThenSelectCasedatatable1.Rows(0).Item(0)Case"1"TxtF009.Text="合格"TxtF009.ForeColor=Drawing.Color.GreenCase"0"TxtF009.Text="不合格"TxtF009.ForeColor=Drawing.Color.Red

解决方案

解决方案二：
Ifdt.Rows.Count>0ThenSelectCasedt.Rows(0).Item(0)Case"1"TxtF009.Text="合格"TxtF009.ForeColor=Drawing.Color.GreenCase"0"TxtF009.Text="不合格"TxtF009.ForeColor=Drawing.Color.RedEndSelectEndIf

你要有结束符号，以上红色字。
解决方案三：
下断点，在SelectCasedatatable1.Rows(0).Item(0)上然后调试，看看有没有走进去。
解决方案四：
Ifdt.Rows.Count>0ThenSelectCasedt.Rows(0).Item(0)Case"1"TxtF009.Text="合格"TxtF009.ForeColor=Drawing.Color.GreenCase"0"TxtF009.Text="不合格"TxtF009.ForeColor=Drawing.Color.RedEndSelectEndIf
解决方案五：
写在formload方法里判断！---------------------------------------------对整个页面进行刷新操作！
解决方案六：
PublicClassForm1PrivateSubButton1_Click(senderAsObject,eAsEventArgs)HandlesButton1.ClickDimDataTable1AsNewDataTableDataTable1.Columns.Add()DataTable1.Rows.Add("0")DataTable1.Rows.Add("1")IfDataTable1.Rows.Count>0ThenSelectCaseDataTable1.Rows(0).Item(0)Case"1"RichTextBox1.Text="合格"RichTextBox1.ForeColor=Drawing.Color.GreenCase"0"RichTextBox1.Text="不合格"RichTextBox1.ForeColor=Drawing.Color.RedEndSelectEndIfEndSubEndClass没有问题了。你的错误在于控件选择错了。应该使用RichTextBox控件。下次提问题时，尽量完整的代码贴过来，这样才能正确而且及时帮您。