实验十一：出现、删除

一、实验目的

设计一个程序使其新出现一个东西并能删去

二、实验内容

设计一个程序使其新出现一个东西并能被删除，下面是其具体过程

Dim  with.events mytextbox As VB.TextBox

Private Sub Command1_Click()

Dim myTextBox As VB.TextBox

set mytextbox = me.controls.Add("VB.TextBox","mytextbox)

my textbox.move me.Command1.left - 1500,me.command1.top,me.command1.height,me.command.height 

my TextBxb.Visible=True

End sub

Private Sub command2-Chick

Me.confnols.remove:"myTextBox"

End sub

private Sub Text1-Chang()

Privt Test1.Text'

Eext Sub 

Private Sub' muTextBox-change

Pnnt myTextBox Text

End Sub

三、心得体会

       做VB的过程中，会遇到很多我无法解决的问题，但是，有老师和同学的帮助，也能最终解决，很开心的过程。

四、遇到的问题和解决方法

      做vb时，做这个程序时，有很多不会的地方，遇到了很多问题。

     通过，问老师，和同学交流，查找教科书，上网搜索网络，搜索相关知识。