掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
縦書きで表示するには？ (ID：104274)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
RichTextBoxを使うなら、たとえばこんなかんじ Option Explicit Private Declare Function SendMessage Lib "user32.dll" _ Alias "SendMessageA" _ (ByVal hwnd As Long, _ ByVal Msg As Long, _ ByVal wParam As Long, _ lParam As Any) As Long Private Sub Command1_Click() Dim lngWin32apiResultCode As Long With RichTextBox1 .Visible = False .Text = "（あい＿うえお）" & vbCrLf & "(かき_くけこ)" lngWin32apiResultCode = _ SendMessage(.hwnd, _ &H44D&, _ &H2&, _ ByVal CLng(&H400000)) .Visible = True End With End Sub
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.