- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- [求助]RichTextBox边框属性 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=117598)
-- 发布时间：2018/4/15 22:27:00
-- [求助]RichTextBox边框属性
不想要如图的3D模式，怎样设置?
此主题相关图片如下：666.jpg
生成RichTextBox的代码：
Dim rt As new Windows.Forms.RichTextBox \'定义 一个RichTextBox
rt.Dock = Windows.Forms.DockStyle.Fill \'控件停靠方式为撑满父控件
rt.name = "RichTextBox1" \'设置控件名称
e.Form.Controls("Panelx").BaseControl.Controls.Add(rt) \'控件放入Panel1中作为子控件
rt.Font = new System.Drawing.Font("仿宋_GB2312", 14)
UtilsSetLineSpace.SetLineSpace(rt, 500)
rt.SelectionColor = Color.Lavender \'背景色
addhandler rt.MouseDown, addressof mytxt_MouseDown
[此贴子已经被作者于2018/4/15 22:29:04编辑过]
-- 发布时间：2018/4/15 22:35:00
--
如
rt.borderstyle= 0