[急！]如何响应运行添加的控件的事件

Question

[急！][难题]如何响应运行添加的控件的事件 
  
 是这样的 
 Dim myControl as control 
 myControl = frame1.controls.add ("FormWork.TextBox1","txtBox") 
 myControl.top = 10 
 myControl.height = 10 
  
  
 可如何响应我这个txtBox文本框的事件？如Enter事件？

Answer 1

Option Explicit
Dim WithEvents myControl As TextBoxPrivate Sub Form_Load()
    
     Set myControl = Controls.Add("VB.TextBox", "txtBox", Frame1)
     With myControl
        .Move 200, 200, 1000, 315
        .Text = ""
        .Visible = True
     End With
    
End SubPrivate Sub MyControl_GotFocus()
   MsgBox "txtobx Get focus."
End Sub