弹出窗体的定位问题

roych

个人建议把窗体属性修改为不可见，单击后则把窗体改为可见即可。例如：
Private Sub Txt_Click()
If me.子窗体.Visiable Then
me.子窗体.Visiable=False
else
me.子窗体.Visiable=true
End if
End Sub