以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助] RichTextBox的值如何引用  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=31183)

--  作者:lsy
--  发布时间:2013/4/11 13:17:00
--  [求助] RichTextBox的值如何引用

在模式窗口的BeforeClose事件中:

Dim ct As New Windows.Forms.RichTextBox

MessageBox.Show(ct.Text)

无论文本框中是否输入文本,消息框都不显示输入的文本。

这和TextBox值的引用不同啊,正确的方法是什么呢?帮助中没找到,代码精灵又没提示。

如果是普通文本框,就会这样:

Dim ct As WinForm.TextBox = e.Form.Controls("TextBox1")

MessageBox.Show(ct.Text)

麻烦各位老师,指教指教。

 


 


--  作者:Bin
--  发布时间:2013/4/11 14:10:00
--  
= =和普通的文本框一样使用.

Dim ct As WinForm.RichTextBox= e.Form.Controls("RichTextBox1")

MessageBox.Show(ct.Text)


你第一个代码并未赋值.肯定怎么弹出都是空白啊


--  作者:lsy
--  发布时间:2013/4/11 14:22:00
--  
以下是引用Bin在2013-4-11 14:10:00的发言:
= =和普通的文本框一样使用.

Dim ct As WinForm.RichTextBox= e.Form.Controls("RichTextBox1")

MessageBox.Show(ct.Text)


你第一个代码并未赋值.肯定怎么弹出都是空白啊

谢谢,有错误提示。


图片点击可在新窗口打开查看此主题相关图片如下:f63_1pubn8d5(o)1$ivnjd.jpg
图片点击可在新窗口打开查看

 

AfterLoad:


Dim ct As New Windows.Forms.RichTextBox
ct.Dock = Windows.Forms.DockStyle.Fill
e.Form.Panel.Controls.Add(ct)

正常显示了RichTextBox控件,并且正常输入文本。

[此贴子已经被作者于2013-4-11 14:23:47编辑过]

--  作者:Bin
--  发布时间:2013/4/11 14:25:00
--  
刚看了一下.FOXTABLE根本没有RichTextBox这个控件啊.
--  作者:Bin
--  发布时间:2013/4/11 14:27:00
--  
如果使用第三方控件请查看有关第三方控件的帮助哦
--  作者:lsy
--  发布时间:2013/4/11 14:29:00
--  
以下是引用Bin在2013-4-11 14:27:00的发言:
如果使用第三方控件请查看有关第三方控件的帮助哦

看了,似懂非懂,没实际用过,还是得请教。