VB6.0让字体变颜色问题

来源：百度知道 编辑：UC知道 时间：2024/05/25 03:39:15
比如我想让用户在文本框中输入一个颜色，然后点击一个按钮,使用这条语句输出的东西变成用户在文本框中输入的颜色“form.print("显示的字")”
我想问的是怎么写?
我的意思是,当我在文本框中输入一个颜色,然后点击按钮,那么整个窗口就能显示一串字，而这串字的颜色就是我输入的颜色~~~wlm_jxj 你说的那种方法麻烦了一点，有没简单的?另外不明白你的“text2.forecolor=""”.好像我没要求显示在另一个文本框里吧

Private Sub Form_Click()
Me.ForeColor = vbRed
Print "输出";
Me.ForeColor = vbGreen
Print "不同颜色的";
Me.ForeColor = vbBlue
Print "字符串"
End Sub

private sub command1_click()
select case text1.text
case "红"
text2.forecolor=""
.....
end select
end sub