关于text与label同步的问题!!!!

Question

Private Sub Text1_Change()
Label1.Caption = Text1.Text
End Sub

Answer 1

Label1.Caption = Text1.Text

Answer 2

如果Jneu(沧海桑田)的方法不符合你的要求,那么试试:
Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer)
    Label1.Caption = Chr(KeyCode)
End Sub
不知道现在的结果是否符合你的要求?否则请详细说明你的想法或要实现的功能.

Answer 3

谢谢你们!是对了!:)
还有一个简单的问题,数据库字段可以在代码中变成中文吗?
我用的是ssoledbgird
分一起给,好吗?:)