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，很好用
但是我还是想明白上面那段语言到底是什么意思，希望高手指教，谢谢
{{--
相关问答：
我在类中有一个函数
Public Function DownloadAdditionalSite(SiteName As siteconfig, Directory As String, ymd As String) As Boolean
siteconfig是我自定义类型的数据，为什么会提示“只有在公共对象模块中� ......
现在有个xml文件是<?xml version="1.0"?>
<?mso-application progid="Excel.Sheet"?>
<Workbook xmlns="urn:schemas-microsoft-com:office:spreadsheet"
xm ......
dim a as string,b as string，c as string
a="工程编号,单位工程名称,分部工程编号"
b="单位工程名称"
c="单位"
怎么才能判断出a字符串中存在b字符串，而不存在c字符串
看看i ......
