动态添加控件，参考
Dim rtxt As New Windows.Forms.RichTextBoxe.Form.Controls("Panel1").BaseControl.Controls.Add(rtxt)
加好友 
发短信
Post By：2015/10/9 12:34:00 [只看该作者]
