📄 8570.html
字号:
<html>
<head>
<title>可以Undo，但仅能Undo最近一次的设定</title>
</head>
<body bgcolor="#FFFFFF" vlink="#808080">
<center>
<h1>可以Undo，但仅能Undo最近一次的设定</h1>
</center>
<hr size=7 width=75%>
<hr size=7 width=75%><p>
Posted by <a href="mailto:cww5@mail.ncku.edu.tw">cww</a> on December 24, 1998 at 08:36:57:<p>
In Reply to: <a href="8550.html">请问cww关于改变RichTextBox的字型</a> posted by jason on December 23, 1998 at 15:44:02:<p>
Private Sub Command1_Click()<br>CommonDialog1.Flags = cdlCFEffects Or cdlCFBoth ' 显示「字型」对话方块<br>CommonDialog1.ShowFont<br>RichTextBox1.SelFontSize = CommonDialog1.FontSize<br>RichTextBox1.SelFontName = CommonDialog1.FontName<br>End Sub<p>Private Sub Command2_Click()<br>Dim i As Long<br>i = SendMessage(RichTextBox1.hwnd, EM_UNDO, 0, 0)<br>End Sub<p>以上面的例子来说，只会undo SelFontName的设定而<br>SelFontSize则不受影响，原因很清楚吧
<br>
<br><hr size=7 width=75%><p>
<a name="followups">Follow Ups:</a><br>
<ul><!--insert: 8570-->
<!--top: 8579--><li><a href="8579.html">Re: 可以Undo，但仅能Undo最近一次的设定</a> <b>jason</b> <i>11:05:24 12/24/98</i>
(<!--responses: 8579-->0)
<ul><!--insert: 8579-->
</ul><!--end: 8579-->
</ul><!--end: 8570-->
<br><hr size=7 width=75%><p>
</body></html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -