国产探花免费观看_亚洲丰满少妇自慰呻吟_97日韩有码在线_资源在线日韩欧美_一区二区精品毛片,辰东完美世界有声小说,欢乐颂第一季,yy玄幻小说排行榜完本

首頁(yè) > 編程 > Visual Basic > 正文

使TextBox控件獲得焦點(diǎn)時(shí)改變字體顏色

2023-06-12 12:11:32
字體:
來(lái)源:轉(zhuǎn)載
供稿:網(wǎng)友

當(dāng)TextBox得到焦點(diǎn)時(shí)(GotFocus)改變文本顏色,失去焦點(diǎn)時(shí)(LostFocus)將還原文本顏色,F(xiàn)oreColor是設(shè)置文本的前景色。

'當(dāng)光標(biāo)移到TextBox時(shí)文字設(shè)置為紅色

Private Sub Text1_GotFocus()
              Text1.ForeColor = vbRed
        End Sub

'當(dāng)光標(biāo)移出TextBox時(shí)文字設(shè)置為黑色

Private Sub Text1_LostFocus()
              Text1.ForeColor = vbBlack
        End Sub

  以上代碼只要將Text1.ForeColor改為T(mén)ext1.BackColor即可改變TextBox的背景色。

發(fā)表評(píng)論 共有條評(píng)論
用戶名: 密碼:
驗(yàn)證碼: 匿名發(fā)表
主站蜘蛛池模板: 会宁县| 疏附县| 炉霍县| 深水埗区| 从化市| 芜湖市| 扬中市| 兴海县| 宁晋县| 津市市| 邵阳市| 辉县市| 滕州市| 仪陇县| 从化市| 焉耆| 民乐县| 慈溪市| 施甸县| 柯坪县| 睢宁县| 广东省| 山丹县| 乐都县| 来安县| 襄城县| 邹平县| 惠东县| 永州市| 宣恩县| 华阴市| 洪雅县| 九台市| 前郭尔| 垦利县| 丁青县| 黎城县| 永春县| 沛县| 黎城县| 车致|