还是看得有些迷糊,4567是输入的还是代码生成的?“像在text1文本框里手动按回车一样的效果”,这句话不对啊,按了回车,文本框不会自动变出4567来
'在写代码前要在text1和属性面板的text里面输入123Private Sub CommandButton1_Click()Text1.MultiLine = TrueText1.Text = Text1.Text + vbCrLf & "4567"End Sub