VB 窗体的打印和隐藏解决办法

VB 窗体的打印和隐藏
已知控件Frame3在sstabView里面
现在我打印的时候只要打印Frame3
这样来搞打印的时候什么都看不到,该如何是好呢
         
          sstabView.Visible   =   False
          Frame3.Visible   =   True
          Me.PrintForm


[解决办法]
Private Declare Function SetParent Lib "user32 " (ByVal hWndChild As Long, ByVal hWndNewParent As Long) As Long

Private Sub Command2_Click()
SetParent Frame1.hWnd, Me.hWnd
SSTab1.Visible = False
Me.PrintForm
SetParent Frame1.hWnd, SSTab1.hWnd
SSTab1.Visible = True
End Sub