vb.net 教程 12-6 webbrowser 文本编辑器 1

版权声明：本文为博主原创文章，转载请在显著位置标明本文出处以及作者网名，未经作者允许不得用于商业目的。
现在不少网页的blog都是利用了将网页设置为编辑模式实现。

本节探讨使用WebBrowser做一个本地文本编辑器。

使用到的知识包括：Vb.net、Javascript、Html

由于之前已经对WebBrowser控件有了很好的认识，实际本节更多的是调用Document.ExecCommand方法。

设计界面：

使用到的常量：

    Private Const HTML_COMMAND_BOLD = "Bold"                       '加粗Private Const HTML_COMMAND_UNDERLINE = "Underline"             '下划线Private Const HTML_COMMAND_ITALIC = "Italic"                   '斜体Private Const HTML_COMMAND_SUBSCRIPT = "Subscript"             '下标Private Const HTML_COMMAND_SUPERSCRIPT = "Superscript"         '上标Private Const HTML_COMMAND_STRIKE_THROUGH = "StrikeThrough"    '删除线Private Const HTML_COMMAND_FONT_NAME = "FontName"              '字体Private Const HTML_COMMAND_FONT_SIZE = "FontSize"              '字号Private Const HTML_COMMAND_FORE_COLOR = "ForeColor"            '字体前景色Private Const HTML_COMMAND_BACK_COLOR = "BackColor"            '字体背景色Private Const HTML_COMMAND_INSERT_FORMAT_BLOCK = "FormatBlock" '加粗Private Const HTML_COMMAND_REMOVE_FORMAT = "RemoveFormat"      '清除样式Private Const HTML_COMMAND_JUSTIFY_LEFT = "JustifyLeft"        '文本左对齐Private Const HTML_COMMAND_JUSTIFY_CENTER = "JustifyCenter"    '文本中间对齐Private Const HTML_COMMAND_JUSTIFY_RIGHT = "JustifyRight"      '文本右对齐Private Const HTML_COMMAND_JUSTIFY_FULL = "JustifyFull"        '文本两端对齐Private Const HTML_COMMAND_INDENT = "Indent"                   '增大缩进量Private Const HTML_COMMAND_OUTDENT = "Outdent"                 '减小缩进量Private Const HTML_COMMAND_INSERT_LINE = "InsertHorizontalRule" '插入分割符Private Const HTML_COMMAND_INSERT_LIST = "Insert{0}List"         ' replace with (Un)Ordered 插入项目符号或项目编号Private Const HTML_COMMAND_INSERT_IMAGE = "InsertImage"         '插入图像Private Const HTML_COMMAND_INSERT_LINK = "CreateLink"           '插入链接Private Const HTML_COMMAND_REMOVE_LINK = "Unlink"               '移除链接Private Const HTML_COMMAND_TEXT_CUT = "Cut"                     '剪切Private Const HTML_COMMAND_TEXT_COPY = "Copy"                   '复制Private Const HTML_COMMAND_TEXT_PASTE = "Paste"                 '粘贴Private Const HTML_COMMAND_TEXT_DELETE = "Delete"               '删除Private Const HTML_COMMAND_TEXT_UNDO = "Undo"                   '撤销Private Const HTML_COMMAND_TEXT_REDO = "Redo"                   '恢复Private Const HTML_COMMAND_TEXT_SELECT_ALL = "SelectAll"        '全选Private Const HTML_COMMAND_TEXT_UNSELECT = "Unselect"           '取消选择Private Const HTML_COMMAND_TEXT_PRINT = "Print"                 ' 打印Private Const HTML_COMMAND_EDITMODE = "EditMode"                ' 编辑模式Private Const HTML_COMMAND_BROWSEMODE = "BrowseMode"            ' 浏览模式Private Const HTML_COMMAND_OVERWRITE = "OverWrite"             '转换插入、覆写模式

窗体载入时设置字体和字号

    Private Sub frmBlog_Load(sender As Object, e As EventArgs) Handles Me.LoadDim linkhtm As String = "about:blank" 'Application.StartupPath & "\view.htm"wbBlog.Url = New Uri(linkhtm)wbBlog.Document.ExecCommand("EditMode", False, "")          '设置为可编辑模式Call setFontName()Call setFontSize()End Sub' 设置字体Private Sub setFontName()Dim computerFont As New System.Drawing.Text.InstalledFontCollectionFor Each font_family As FontFamily In computerFont.FamiliesIf font_family.IsStyleAvailable(FontStyle.Regular) ThentscFont.Items.Add(font_family.Name)End IfNexttscFont.SelectedIndex = 0End Sub'设置字号Private Sub setFontSize()tscFontSize.Items.Add("一号字")tscFontSize.Items.Add("二号字")tscFontSize.Items.Add("三号字")tscFontSize.Items.Add("四号字")tscFontSize.Items.Add("五号字")tscFontSize.Items.Add("六号字")tscFontSize.Items.Add("七号字")tscFontSize.SelectedIndex = 0End Sub

由于.net平台下C#和vb.NET很相似，本文也可以为C#爱好者提供参考。

学习更多vb.net知识，请参看 vb.net 教程目录

vb.net 教程 12-6 webbrowser 文本编辑器 1相关推荐

Markdown富文本编辑器（数学公式教程）
Markdown富文本编辑器(数学公式教程) 简单分类行内公式示例如下行间公式实例如下希腊字母上标与下标括号小括号与方括号大括号尖括号上取整下取整求和与积分求和积分连乘其 ...
百度富文本编辑jsp上传_百度富文本编辑器教程，从入门到放弃
原标题:百度富文本编辑器教程,从入门到放弃百度UEditor 资源与项目分离-完全教程夏老师人真好又求到一篇技术贴来来来继续掏出小本本什么是百度UEditor? 百度UEditor是一款富 ...
Django 3.2.5博客开发教程:使用富文本编辑器添加数据
在Django admin后台添加数据的时候,文章内容文本框想发布一篇图文并茂的文章需就得手写Html代码,这十分吃力,也没法上传图片和文件.这显然不是我等高大上程序猿想要的. 为提升效率,我们可以使 ...
ueditor html中使用方法,vue集成百度UEditor富文本编辑器使用教程
在前端开发的项目中,难免会遇到需要在页面上集成一个富文本编辑器.那么,如果你有这个需求,希望可以帮助到你. vue是前端开发者所追捧的框架,简单易上手,但是基于vue的富文本编辑器大多数太过于精简.于 ...
yii2 html编辑器,浅析Yii2集成富文本编辑器redactor实例教程
在上篇文章给大家介绍了如何在yii2中集成百度编辑器umeditor以及如何解决umeditor上传图片问题. 今天我们来谈谈yii2集成另外一个强大好用的富文本编辑器Redactor,个人觉得Red ...
《⑨也懂系列：GNU Emacs安装教程Ver.2》世界著名的顶级全能文本编辑器
备注:我的全部文章首发在自己的独立博客(http://rsreland.net)上,编程相关文章会同步到这里,不过文章的维护是优先那边.然后本篇文章的地址是:http://rsreland.net/a ...
devexpress html编辑器,DevExpress使用教程：富文本编辑器RichEditControl
传统.NET界面有一个富文本控件RichTextBox,可以存储图片文字等内容,它有自己的文件格式RTF,在RichEditControl,这个控件功能很强大,它可以做邮件编辑器,实现图文并茂的邮件的 ...
Vue富文本编辑器vue-quill-editor-使用-bug问题-教程
vue-quill-editor npm install vue-quill-editor –save or yarn add vue-quill-editor 文件中使用 <template& ...
基于jQuery的富文本编辑器summernote插件的使用教程
基于jQuery的富文本编辑器summernote插件的使用教程基于jQuery的富文本编辑器summernote插件的使用教程一:最近项目中遇到使用富文本编辑器的功能, JQuery的富文本编辑 ...

vb.net 教程 12-6 webbrowser 文本编辑器 1

vb.net 教程 12-6 webbrowser 文本编辑器 1相关推荐

最新文章

热门文章