VB6使用相同的按鈕2文本框

嗨我們的教練要求我們創建，只有在使用按鈕的值輸入計算器，它應該有1文本框中輸入值1，然後在VB6VB6使用相同的按鈕2文本框

上的下一個文本框中的其他值

有沒有辦法使用相同的按鈕來輸入下一個文本框的值？

可以說你按下按鈕3將顯示在TextBox1中後

Text1.Text = "3"

我的問題是，它不會進入下一個文本框後顯示3 我已經嘗試過

If Text2.Setfoucs = True Then 
    Text2.Text = "3" 
    Else 
    Text1.Text = "3" 
    End If

數

它給我錯誤。

我只是想用在第二個文本框相同的按鈕它的第一按鈕被按下打完一號文本

我想用按鈕的另一個一堆使用，並設置可見= TRUE後那nextone將

Text2.Text = "3"

我只是一個初學者在VB6任何建議將不勝感激。

這裏的項目是什麼樣子

http://i.imgur.com/ixK9s1U.png

來源

2013-08-02 Wolfstein

你問建議...名稱將使用有意義的名稱每個控制。它會幫助你編碼和調試，並且肯定會幫助其他人（比如我們）閱讀你的代碼並知道哪個控件是哪個。其次，「它給我錯誤。」沒有幫助。錯誤的描述，以及將會是什麼行。 – tcarvin

setFocus是一個函數，而不是一個變量，它沒有返回值，所以你不能一個if子句中使用它。

這裏是我的建議來完成你想要做什麼：

添加GotFocus事件，以每個文本框，即設置一個變量。像這樣：

Private selectedTxtBox As Integer 

Private Sub Text1_GotFocus() 
    selectedTxtBox = 1 
End Sub 

Private Sub Text2_GotFocus() 
    selectedTxtBox = 2 
End Sub

然後在您的按鈕，你可以這樣做：

If selectedTxtBox = 1 Then 
    Text1.Text = "3" 
ElseIf selectedTxtBox = 2 Then 
    Text2.Text = "3" 
End If

來源

2013-08-02 12:16:27

謝謝，它真的有幫助 – Wolfstein

VB6使用相同的按鈕2文本框

回答

相關問題