VB5.0を使用しています。
リッチテキストボックスに複数行の文字列があり、
その行間幅を広げることが可能でしょうか。
ワードでの段落設定と同様なことが行いたいのです。
宜しくお願い致します。

リッチテキストボックスは、あまり使わないのではずしてるかも・・・。

たとえばこう？

Option Explicit
Private Sub Command1_Click()
Dim i As Long
    For i = 1 To 10
        RichTextBox1.SelStart = 19 * (i - 1) + 18
        RichTextBox1.SelLength = 2
        RichTextBox1.SelFontSize = i
    Next
End Sub

Private Sub Form_Load()
    Dim i As Long
    RichTextBox1.Text = ""
    For i = 1 To 10
        RichTextBox1.Text = RichTextBox1.Text & "あいうえおabcde１２３４５" & vbCrLf & vbCrLf
    Next
End Sub

ありがとうございました。
おっしゃっている意味がやっとわかりました。
最後のvbCrLf(改行)のフォントサイズを変更しているのですね。
>RichTextBox1.Text = RichTextBox1.Text & "あいうえおabcde１２３４５" & vbCrLf & vbCrLf
長い文章の場合は、一定の文字数で改行、改行して、
フォントサイズの変更を行えばできそうですね。
試してみます、ありがとうございました。

> その行間幅を広げることが可能でしょうか。
> ワードでの段落設定と同様なことが行いたいのです。

RTFの仕様自体には、行間を指定するために
  「\sa数値」 Space after: 段落前間隔指定
  「\sb数値」 Space before: 段落後間隔指定
   [\sl数値」 Space between lines: 行間指定
などといったRTFコードが用意されているのですが…残念ながら、
RichTextBoxコントロールは、これらのRTFコードをサポートしていません。

フォントサイズを変更した空行で誤魔化すか、もしくは、
行間を指定可能なコントロール(WebBrowserなど)で代替されては如何でしょう。

ありがとうございました。

> RichTextBoxコントロールは、これらのRTFコードをサポートしていません。
　残念です。

> フォントサイズを変更した空行で誤魔化すか、
　「Say」様の内容のことですね。

> 行間を指定可能なコントロール(WebBrowserなど)で代替されては如何でしょう。
　他のコントロールを勉強してみます。

いろいろありがとうございました。