richtextbox 控件_c richtextbox换行光标_richtextbox fontsize(3)

代码中的下一个项目是菜单退出调用。它是用来终止应用程序。关闭应用程序之前，这个子程序检查，如果当前文件已被修改，如果有，它向用户发出警报，并询问是否应将该文件保存之前关闭它和应用程序。代码如下:私人小组ExitToolStripMenuItem_Click（BYVAL发件人，_System.Object的，BYVAL E）作为System.EventArgs _把手ExitToolStripMenuItem.Click如果rtbDoc.Modified然后昏暗的答案作为整数回答= MessageBox.Show（"当前文档beenquot;放大器; -"保存，你会想继续不节能quot;？，"未保存Documentquot;，MessageBoxButtons.YesNo，_MessageBoxIcon.Question）如果答案= Windows.Forms.DialogResult.No然后退出小组其他Application.Exit（）结束如果其他 Application.Exit（） 结束如果 END SUB

接下来是菜单选项用于选择当前字体。此代码只使用一个标准字体"对话框中设置丰富的文本框控件SelectionFont的属性用户通过字体对话框中选择字体。要做到这一点的代码如下:私人小组SelectFontToolStripMenuItem_Click（BYVAL发件人_作为System.Object的BYVAL作为System.EventArgs E）_把手SelectFontToolStripMenuItem.Click如果不rtbDoc.SelectionFont是Nothing FontDialog1.Font = rtbDoc.SelectionFont其他FontDialog1.Font =无结束如果FontDialog1.ShowApply = TRUE如果FontDialog1.ShowDialog（）= Windows.Forms.DialogResult.OK然后 rtbDoc.SelectionFont = FontDialog1.Font结束如果 END SUB

图10:在使用字体对话框

同样，字体颜色菜单选项是使用标准颜色对话框显示给用户，如果用户选择从对话框的颜色，ForeColor属性的文件将被更新，以包含选定的颜色。由于丰富的文本框控件的工作主要与选定的文本（即，你在选择字体或改变颜色改变），此功能将只对选定的文本改变颜色。如果没有文本被选中，在插入点的颜色将举行中脱颖而出的色彩选择，并从插入点输入将显示在新选定的颜色的文本。分FontColorToolStripMenuItem_Click（BYVAL发件人_ 作为System.Object的BYVAL作为System.EventArgs E）_ 把手FontColorToolStripMenuItem.ClickColorDialog1.Color = rtbDoc.ForeColor如果ColorDialog1.ShowDialog = Windows.Forms.DialogResult.OK然后rtbDoc.SelectionColor = ColorDialog1.Color结束如果 END SUB

接下来的三个部分的代码是用来设置所选文本粗体，斜体或下划线属性的子程序。每一节设置工作，例如，如果选定的文本是大胆，选择大胆的选项将删除粗体（或斜体或下划线）。 （由于他们基本上都相同，我只呈现出大胆在这里。）分BoldToolStripMenuItem_Click（BYVAL发件人以_System.Object的，BYVAL E）作为System.EventArgs _ 把手BoldToolStripMenuItem.Click如果不rtbDoc.SelectionFont是Nothing DIM currentFont System.Drawing.Font = rtbDoc.SelectionFontDIM newFontStyle作为System.Drawing.FontStyle如果rtbDoc.SelectionFont.Bold = True，则newFontStyle = FontStyle.Regular 其他newFontStyle = FontStyle.Bold 结束如果rtbDoc.SelectionFont =新字体（currentFont.FontFamily，_currentFont.Size，newFontStyle） 结束如果 END SUB

本文来自电脑杂谈，转载请注明本文网址：
http://www.pc-fly.com/a/jisuanjixue/article-25592-3.html