Foxtable(狐表)用户栏目专家坐堂 → [求助]RichTextBox边框属性


  共有2039人关注过本帖树形打印复制链接

主题:[求助]RichTextBox边框属性

帅哥哟,离线,有人找我吗?
天一生水
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:五尾狐 帖子:1141 积分:11272 威望:0 精华:0 注册:2017/9/26 16:30:00
[求助]RichTextBox边框属性  发帖心情 Post By:2018/4/15 22:27:00 [显示全部帖子]

不想要如图的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编辑过]

 回到顶部