比如有一个按钮command1,怎么按后在text1先前的内容上加上一个回车后,然后在text1中增加一句话,比如:text1.text+回车再+ label1.caption?

解决方案 »

  1.   

    Private Sub Text1_KeyPress(KeyAscii As Integer)
      If KeyAscii = 13 Then
         Me.Text1.Text = Me.Text1.Text & "hello "
      End If
    End Sub这个意思????
      

  2.   

    text1.text=text1.text & vbcrlf & label1.caption
      

  3.   

    回车:    vbCr
    换行:    vbLf
    回车换行:vbCrLf
      

  4.   


    Text1的Multiline属性设置成TruePrivate Sub Command1_Click()
        Text1.Text = Text1.Text & vbCrLf &  label1.caption
    End Sub
      

  5.   

    就应该把回车键用Asc码表示了啊
    写进程序,应该可以了吧
      

  6.   

    & Chr(13) & Chr(10)
      

  7.   

    chr(13)回车 
    chr(10)换行