打開共享LostFocus事件處理程序的發件人

我有一個包含七個文本框的表單，全部描述了二手車的不同屬性。在我的文本框共享的LostFocus事件中，我需要一個case語句來確定失去焦點的特定TextBox。然後我需要執行不同的各種任務，但我不認爲他們對我的問題很重要。打開共享LostFocus事件處理程序的發件人

如何判斷哪個文本框在共享的LostFocus事件處理程序中失去焦點？

Select Case ________???

你可以做兩件事之一。

首先是對名稱

Dim tb as TextBox = CType(sender,TextBox) 

Select Case tb.Name 
    Case "TextBox1"

選擇第二個是我喜歡做的，它是使用文本框的Tag屬性，並把它的唯一編號。所以在這種情況下，你的Select語句看起來像。

Dim tb as TextBox = CType(sender,Textbox) 

Select Case CInt(tb.tag) 
    Case 1 

    Case 2 
    ....

你提到的另一件事是如何確定哪個TextBox失去了焦點。除了您正在處理的離開事件之外，還有一個LostFocus事件可以處理。

2011-11-25 05:11:20

欣賞它，謝謝。我們的任務很清楚，我們必須在_Leave事件中執行此操作：共享文本框離開 創建一個共享事件過程，當用戶選中或單擊不在控件上時驗證所有文本框（離開事件） o聲明一個通用的文本框，它將表示觸發事件的文本框 o使用case語句來確定哪個文本框丟失了焦點 –

@PhillCookie好吧，我只是通過最後一個作爲參考。選擇陳述應該適合你。發件人對象將成爲剛剛失去焦點的文本框。 –

真的很感激你花時間來解釋....非常感謝您的幫助。 –

那將是Select Case DirectCast(sender, TextBox)。

2011-11-25 05:00:34 Ryan

回答