掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
改行について (ID：79664)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
1行に５３文字以上ある行は、改行させる方法として （ノートパッドの「右端で折り返す」というのとほぼ同じようなもの） VB6.0であれば、Split関数使った方法もありますね。 Dim strBuf As String Dim varData As Variant Dim cnt As Long Dim pos As Long 'Text1の内容を１行52文字とし、右端で折り返したものをText2に表示 strBuf = StrConv(Text1.Text, vbUnicode) varData = Split(strData, vbCrLf) For cnt = 0 To UBound(varData) strBuf = varData(cnt) pos = 1 While pos < Len(strBuf) Text2.Text = Text2.Text & Mid(strBuf, pos, 52) & vbCrLf pos = pos + 52 Wend Next
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.