运行后工具栏不见了？

Private Sub Form_Resize() '文本框大小发生变化时
On Error Resume Next   '当程序发生错误时转到下一步代码的处理; On Error GoTo ErrHandler发生错误时转向错误处理器程序
  RTB1.Move 100, 100, Form1.ScaleWidth - 200, Form1.ScaleHeight - 200 '文本框所在的位置
End Sub

RTB1.Move 100, 100, Form1.ScaleWidth - 200, Form1.ScaleHeight - 200 '这个语句将界面占据了，并且覆盖了其他控件，因此就不见了。