Dim a As String
Private Sub Command1_Click()
Label1.Visible = False
Text1.Visible = False
Command1.Visible = False
a = Text1.Text
Print “a同学你好”
End Sub
代码如上,我要实现单击后 比如我在TEXT1中输入“张三” 输出张三同学你好。怎么实现啊~
求助诸位高手。。 
为什么老是输出a同学你好

解决方案 »

  1.   

    窗体放一个Text1、Command1Private Sub Command1_Click()
    MsgBox Form1.Text1.Text & "同学你好。"
    End Sub
      

  2.   


    Print “a同学你好”改为:Print a &“同学你好”
      

  3.   


    Print a & “同学你好”
    作业贴吧
      

  4.   

    貌似不行~为什么我改了后~他还说 编译错误 无效字符
    print a &"同学你好"
      

  5.   


    Option ExplicitPrivate Sub Command1_Click()
        Dim a As String
        a = Text1.Text
        Print a & "同学你好"End Sub