以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  请老师帮忙，弄糊涂了  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=63371)
--  作者：htlk25
--  发布时间：2015/1/19 18:18:00
--  请老师帮忙，弄糊涂了

e.Form.Controls("DropBox1")的内容为：white

我希望引用("DropBox1")的内容来改变("TextBox4")里字体的颜色，

下面的代码实在是搞不来，请各们指点一下，谢了！@

 

 

Dim ys As WinForm.DropDownBox = e.Form.Controls("DropBox1")
e.Form.Controls("TextBox4").ForeColor = Color." & ys.text & "

 

 

 
--  作者：有点甜
--  发布时间：2015/1/19 19:18:00
--  
Dim ys As WinForm.DropDownBox = e.Form.Controls("DropBox1")
e.Form.Controls("TextBox4").ForeColor = Color.FromName(ys.text)