VB下角标问题，请高手帮帮我，谢谢您 - VB / 基础类
我之前问过，怎样才能搞出来下角标，有人告诉我用富文本框，然后给我这个例子
VB code:
Private Sub Command1_Click()
RichTextBox1.Font.Name = "Times New Roman"
RichTextBox1.Font.Size = 20
RichTextBox1.Text = "X3Y4"
OffsetRichText RichTextBox1, 3, 1, -6
End Sub
Private Sub OffsetRichText(box As RichTextBox, start As Integer, length As Integer, offset As Integer)
box.SelStart = start
box.SelLength = length
box.SelFontSize = box.Font.Size - Abs(offset)
box.SelCharOffset = ScaleY(offset, vbPoints, vbTwips)
box.SelStart = 0
box.SelLength = 0
End Sub
这些都是什么意思，帮我解释一下吧。我如果需要X2Y3（2和3是下角标）应该怎么改呢？谢谢您
谢谢您的帮助，我傍晚回来看
老师教我一个方法，是用OLE，很好用
但是我还是想明白上面那段语言到底是什么意思，希望高手指教，谢谢
{{--
相关问答：
VB怎样获得鼠标处的超级连接呢？
在WebBrowser控件中有这样一个事件:StatusTextChange(index As Integer, ByVal Text As String)
它的Text参数正是鼠标处的超级连接,但问题是如果我的浏览器正� ......
在vb中如何读取Word内容(包含表格，图片，等）
竟然不是zero。
不知道怎么实现的不要说话
这个只能读文本,
VB code:
Private Sub Command1_Click()
Dim WordApp As Object
Set WordApp = CreateObject(& ......
现在有个xml文件是<?xml version="1.0"?>
<?mso-application progid="Excel.Sheet"?>
<Workbook xmlns="urn:schemas-microsoft-com:office:spreadsheet"
xm ......
vb WebBrowser 小问题，请教：
WebBrowser里的网址跳转后，怎么取得跳转后的页面的URL地址
顶下顶下
引用
BeforeNavigate2
好像没有这个吧 vb6.0
BeforeNavigate2
这个可以有，呵呵。
......
