简单问题！参与有分。。。。。。。

Question

50分是我的!!!Private Sub Form_Load()
Label1.FontName = "黑体"
End SubPrivate Sub Text1_Change()
Label1.Caption = Text1.Text
End Sub

Answer 1

我说的不够详细，再说一下：
三个控件（两个文本框，一个输入，一个输出，一个LABEL）
在输入框中输入的同时（不再其它事件激活），输出框和LABEL也输出
LABEL以另外一种字体显示！

Answer 2

我上不去qq了，在这给你说吧。
Private Sub Text1_Change()
Label1.Caption = Text1.Text
Text2.Text = Text1.Text
End Sub这样可以同时变，不过我忘了怎么换字体了。

Answer 3

以下达到你的要求:Private Sub Form_Load()
Label1.FontName = "黑体" '设定你想用的字体
End SubPrivate Sub Text1_Change()
Text2.Text = Text1.Text
Label1.Caption = Text2.Text
End SubPrivate Sub Text1_KeyPress(KeyAscii As Integer)
Text1.Text = ""
End Sub'你自己试试,不要看它短就不理会!
'把分给我

Answer 4

text1用来输入,text2和label1用来输出

Answer 5

Private Sub Form_Load()
Label1.FontName = "黑体" 
End Sub为什么这个在我的机器上是错误？

Answer 6

Private Sub Text1_Change()
Label1.Caption = Text1.Text
Text2.Text = Text1.Text
Label1.FontName = "黑体"End Sub

Answer 7

to zhenhao(轻松):
你有黑体这个font文件吗?