主题：[讨论]绑定RichTextBox

不外传的秘诀，绑定到richtextbox的text属性：

ct.DataBindings.Add("text", Tables("表A").Grid.DataSource, "第一列")

都不是，你可以指定名称：

ct.name = "ac"

至于richtextbox的用法，请查阅.net文档。

这么引用：

Dim ct As Windows.Forms.RichTextBox

ct = e.Form.Controls("SplitContainer1").Panel1.BaseControl.Controls("你定义的控件名")

1、

If Str1.ToLower.Contains(Str2.ToLower) Then

End If

2、

Dim ct As New Windows.Forms.RichTextBox
ct.Dock = Windows.Forms.DockStyle.Fill
ct.Name ="RichTextBox1"

ct.HideSelection  = False
e.Form.Controls("SplitContainer1").Panel1.BaseControl.Controls.Add(ct) 

嘿嘿，这种非主流的应用，自己摸索吧，不会有现成的东西的。

搞不定，就没必要必要钻研这个，本没有什么意义的，不值得。