将Form嵌入Panel后TextBox默认行为丢失，如何恢复？

问题重现 #

将Form通过以下代码嵌入Panel后，Form内的TextBox出现异常：点击时光标固定在文本开头，无法通过拖动鼠标选中文本；但直接用Form_Brand.Show()打开时功能正常。

With Form_brand
    .TopLevel = False
    Panel2.Controls.Add(Form_brand)
    .BringToFront()
    .Show()
End With

解决方案 #

方案1：修正Form嵌入时的属性设置

Form本质是顶级控件，强行作为子控件嵌入时需调整关键属性，确保消息和焦点正常传递：

• 嵌入前设置Form的边框样式为无，避免边框干扰焦点处理：

  With Form_brand
      .FormBorderStyle = FormBorderStyle.None ' 添加该行
      .TopLevel = False
      .Dock = DockStyle.Fill ' 可选，让Form填满Panel优化布局
      Panel2.Controls.Add(Form_brand)
      .BringToFront()
      .Show()
  End With
  

• 确保Form内的TextBox的TabStop属性设为True，Enabled设为True，保证控件能正常获取焦点。

方案2：改用UserControl替代Form（更推荐）

Form设计为顶级窗口，作为子控件使用会存在诸多兼容性问题，更稳定的做法是：

1. 将Form_brand内的所有控件复制到新建的UserControl（比如命名为UC_Brand）中。
2. 将UserControl嵌入Panel：

   Dim ucBrand As New UC_Brand()
   ucBrand.Dock = DockStyle.Fill
   Panel2.Controls.Add(ucBrand)
   ucBrand.Show()
   

这种方式完全符合WinForms的控件嵌套设计，不会出现焦点或消息传递异常。

方案3：重写Form的WndProc处理鼠标消息

如果必须使用Form作为子控件，可通过重写Form的WndProc方法，确保鼠标消息正确传递给TextBox：

Protected Overrides Sub WndProc(ByRef m As Message)
    MyBase.WndProc(m)
    ' 处理WM_MOUSEACTIVATE消息，确保子控件能获取激活状态
    If m.Msg = &H21 Then ' WM_MOUSEACTIVATE
        m.Result = New IntPtr(&H1) ' MA_ACTIVATE
    End If
End Sub

内容的提问来源于stack exchange，提问作者RUSHI HARDWARE