定义一个全局变量 aaaaaPrivate Sub Form_Load() 加入一个判断 如果 text1.text=1
全局所有的aaaaa的值都为 da如果text1.text=2
全局所有的aaaaa的值都为 xiao
如何定义这个全局变量aaaaa

解决方案 »

  1.   

    工程菜单-新建标准模块,编写如下代码:
    Public aaaaa As String
    在 Text1_Changed 里面写If Text1.Text = "1" Then aaaaa = "da"
    If Text1.Text = "2" Then aaaaa = "xiao"
      

  2.   

    和2楼的差不多,不过没放在Text1_Changed ,放类里了
    Public aaaaa As Strimg
    If Text1.Text = "1" Then aaaaa = "da"
    If Text1.Text = "2" Then aaaaa = "xiao"
    End Functin
      

  3.   

    现在不知道怎么多个变量一起定义
    Public Function aaaaa() As String,bbbbb() as String
    这样不对
    谁知道对的方法
      

  4.   

    现在不知道怎么多个变量一起定义
    Public Function aaaaa() As String,bbbbb() as String
    这样不对
    谁知道对的方法