RichTextBox1活動，然後RichTextBox2不活動

Question

你能幫我把焦點設置到RichTextBox嗎？我正在嘗試創建多個RichTextBox。當我OpenFile文本文件所有RichTextBox1，RichTextBox2和RichTextBox3被使用。

我希望當RichTextBox1是活動的，那麼其他的RichTextBox無效，

我試圖設置，則在焦點沒有用，但我不知道如何使用它。

Private Sub OpenToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles OpenToolStripMenuItem.Click 
    Try 
     With OpenFileDialog1 
      .Filter = "Text files(*.txt)|*.txt|" & "All files|*.*" 
      If Not focussedrtb Is Nothing Then 
       focussedrtb = rtb1 
       .ShowDialog() = DialogResult.OK 
       filename = .FileName 
       sr = New StreamReader(.OpenFile) 
       rtb1.Text = sr.ReadToEnd() 
       rtb1.Focus() 
       rtb1.Enabled = True 
       rtb2.Enabled = False 
      Else 
       rtb2.Text = sr.ReadToEnd() 
       rtb1.Enabled = False 
       rtb2.Enabled = True 
      End If 
     End With 
    Catch ex As Exception 
     MsgBox(ex.Message) 
    Finally 
     If Not (sr Is Nothing) Then 
      sr.Close() 
     End If 
    End Try 
End Sub 

感謝您編輯我的問題。

Answer 1

如果你試圖將焦點設置到rtb1然後重新排列這些：

rtb1.Enabled = True 
rtb2.Enabled = False 
rtb1.Focus() 

或實際上這些

me.ActiveControl = rtb1 

或

rtb1.Select(）

**

之一

更新：

**

If Not focussedrtb Is Nothing Then 
     focussedrtb = rtb1 
     .ShowDialog() = DialogResult.OK 
     filename = .FileName 
     sr = New StreamReader(.OpenFile) 
     rtb1.Text = sr.ReadToEnd() 
     rtb1.Enabled = True 
     rtb2.Enabled = False 
     rtb1.Focus() 
    Else 
     rtb1.Enabled = False 
     rtb2.Enabled = True 
     rtb2.Text = sr.ReadToEnd() 
    End If 

解釋你需要啓用之前，你可以把價值的文本框