0

在Visual Basic中, 我想打一個TextBox2時可見TextBox1.Text = "SHUTDOWN"Visual Basic中..我想打一個TextBox2中可見,當TextBox1.text = 「SHUTDOWN」

這是我的代碼

Private Sub TextBox1_TextChanged(sender As Object, e As EventArgs) 
                Handles TextBox1.TextChanged 
    AcceptButton = Button1 
    If TextBox1.Text = "SHUTDOWN" Then 
     TextBox2.Visible = True 
    End If 
End Sub 

但它不工作

注:沒有錯誤消息......而TextBox1的charachter外殼是「上」,所以這將是「關閉」,而不是工作的手段,當我寫在TextBox1中「關閉」,TextBox2中不要變得可見

+2

任何錯誤信息?它是區分大小寫的「SHUTDOWN」不等於VB中的「關機」。 –

+0

請詳細說明您在「TextBox1」中輸入的內容,意思是「不工作」。 – serhio

+0

沒有錯誤按摩...和textbox1 charachter外殼是「上」,所以它將「關閉」 而不是工作意味着,當我寫在文本框1中的「關閉」的文本框2不會變得可見 – AhmedSamir

回答

2

.NET是區分大小寫的,這意味着shutdown不等於SHUTDOWN。您可以使用Equals與需要StringComparison過載:

If TextBox1.Text.Equals("SHUTDOWN", StringComparison.CurrentCultureIgnorecase) Then 
    TextBox2.Visible = True 
End If 

在VB.NET另一種選擇是隻對文件級或項目級別使用OPTION Compare

如果您使用您的文件這是第一行:

Option Compare Text 

你得到一個區分大小寫的比較。但是,我更喜歡.NET方式。

文本:基於不區分大小寫的文本的字符串比較結果排序 您的系統的語言環境確定的順序。這種類型的比較是 如果您的字符串包含所有文本字符,並且您希望 比較它們時會考慮到字母等效性,例如 不靈敏和密切相關的字母。例如,您可能希望 將A和a視爲相等,並且將A和A放在B和b之前。

+0

恐怕案件不是問題... – serhio

0

要忽略文本的情況下(如果是這樣的問題),你可以使用以下內容:

If TextBox1.Text.ToUpper() = "SHUTDOWN" Then 
    TextBox2.Visible = True 
End If 

也確保您的TextBox2有當顯形權座標

+0

它不工作2 – AhmedSamir

+0

你試圖把一個斷點行「如果TextBox1.Text.ToUpper()=」SHUTDOWN「然後」? – serhio

0
Dim Wrd As String = "SHUTDOWN" 
Protected Sub TxtBox1_TextChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles TxtBox1.TextChanged 
     If Wrd = TxtBox1.Text.ToUpper Then 
      TxtBox5.Visible = True 
     End If 
End Sub 
+0

它不工作。 – AhmedSamir

1
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load 

Textbox2.visible = False 

End Sub 


Protected Sub TxtBox1_TextChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles TxtBox1.TextChanged 
    If TxtBox1.Text.ToUpper = "SHUTDOWN" Then 
     TextBox2.Visible = True 
    Else 
     TextBox2.Visible = False 
    End If 
End Sub 
0

只是做一個測試:

Private Sub TextBox1_TextChanged(sender As Object, e As EventArgs) Handles TextBox1.TextChanged 
    If (TextBox1.Text = "SHUTDOWN") Then 
     TextBox2.Visible = True 
    End If 
End Sub 

沒有發現問題 - 這可能是的AcceptButton = Button1的。我不確定它爲什麼不能正常工作,但是當「SHUTDOWN」被輸入時我的工作正常。嘗試將AcceptButton更改爲註釋('),然後嘗試代碼,如果它工作,那麼它的AcceptButton變量。

可能不會聲明存儲按鈕?

相關問題