求助

Question

Public stroe1   As String
Public stroe2   As String
  
Private Sub Command3_Click()If x= "1" Then
            store1 = Text2.Text           
            Text3.Text = store1           
           End If
        i=not i
        x=iif（i，1，2 
If x= "2" Then
                 Text3.Text = store1                        
            End If
end  sub我第一次进入时x=1，store1 = Text2.Text  
马上将改为x=2，位什么不能显示  store1呢，显示的是空白的，难道是执行中就释放了  store1 的变量的内容吗？还是另有问题呢？     

Answer 1

Dim x As Integer
Public stroe1  As String
Public stroe2  As String  
Private Sub Command3_Click()If x = "1" Then
            store1 = Text2.Text
            Text3.Text = store1
          End If
        i = Not i
        x = IIf(i, 1, 2)
If x = "2" Then
                Text3.Text = store1
            End If
End Sub

Answer 2

Public static stroe1  As String 

Answer 3

Public static stroe1  As String 报错啊，