我很笨的,讲一讲这句

Text1.FontUnderline = Option1.Value

一个建议：

提问时最好详细点，比如程序要达到什么目的，运行结果是什么，如果出错，VB的出错信息是什么，这样大家才能更快更准确地帮你找出问题原因。

你的代码是没有错的，但是在check1_click和check2_click中，True写成了Ture，我认为可能是你发贴时的笔误，而pigpigpig就认为那是你的代码出错原因，如果你的说得详细点，就不用让我和pigpigpig猜了。

当option1.value=true时，text1.fontunderline=true

当option1.value=false时，text1.fontunderline=false

对不起, 我去了好多论坛,他们都觉得我的问题太简单了,这里太好了,

Text1.FontUnderline = Option1.Value Text1.FontItalic = Option2.Value Text1.FontStrikethru = Option3.Value

上面代码的意是不是,只有option1.value时,Text1.FontUnderline

而option不能全部都选中,所以就只能出现一种情况,

而option不能全部都选中,所以就只能出现一种情况,

----------------------------------------------------------------

不错。

晕,我也搞了半天,还是英文出问题,难怪我怎么看,怎么就是对的，可以就是出不了结果

几年前的贴也能被顶起,佩服