• ベストアンサー

文字を改行<Visual Basic 6.0>

*TextBoxの中にある文字を改行するにはどうしたらいいのでしょうか?コードで書くとどうなりますか? *それとcommandボタンを押したらウィンドウを閉じるプログラムはコードに何を打てばできますか? お願いします。

質問者が選んだベストアンサー

  • ベストアンサー
  • kiki_s
  • ベストアンサー率59% (147/248)
回答No.3

>コードでおねがいします。 Text1.Text = "あいうえお" & vbCrLf & "かきくけこ"・・・・・・・・ 「&」は文字列の結合です(加算ではありません) 「vbCrLf」は改行文字です(表示はされません) 注意するのは、テキストボックスのMultiLineをTrueにする事。 >ウィンドウを閉じるプログラムは・・・ VBならウィンドウというよりフォームですね。 1つのフォームなら終了と同じになりますので、 書くのは「End」だけです。 ただし、ファイル操作などをしている場合は、 手順を守る必要があります。 Private Sub Command1_Click() End End Sub Windowsの終了などであれば、APIなどを利用する事になります。

imarusu
質問者

お礼

ありがとうございました!!! kiki_sさんの言うとおりにやったらできました!

その他の回答 (2)

  • imogasi
  • ベストアンサー率27% (4737/17068)
回答No.2

前半は 10進の10(16進0AのLineFeedの文字コードです) と改行(10進の13がそのコード)をあわせて、改行部に挿入する。 通常はvbCrLfをはさみます。 vbCrLf VbCr, VbLf なども試してください。 またテキストボックスのプロパティのMultiLineをTRUE にしないと、画面表示効果(改行)が表われないでしょう。 後半は http://homepage2.nifty.com/sak/w_sak3/doc/sysbrd/vb_t39.htm のようなことですか。

imarusu
質問者

補足

どのようにはさむかできればそこまでの手段も教えてください! コードでおねがいします。 例 Private Sub Form_Load() Text1.Text = "あいうえお"・・・・・・・・ End Sub

  • OsieteG00
  • ベストアンサー率35% (777/2173)
回答No.1

"a" & vbnewline & "b" で改行します。 me.close またはunload meでよかったかと思います。 手元にVBがないので未確認です。

imarusu
質問者

お礼

ありがとうございます! やってみたのですが、何かできませんでした; どうしてでしょうか;

関連するQ&A

  • TEXTBOXに文字列を表示させたいのだが、スペースで改行してしまう

    困っています。 VB6にてプログラムを作成しています。 簡単なプログラムでTEXTBOXに、改行のない長い文字列を スクロールバーを使わずに折り返して表示させたい のですが、適当なところで勝手に改行されてしまいます。 いろいろと試してみると、スペースからスペースまでの 文字を1つの文字列としているみたいで、その文字列が なるべく折り返さないように、もしスペースがあったら 改行するようです。 つまり文字列にまったくスペースがなければきれいに 折り返して表示されます。 スペースもその文字列として扱ってくれるような方法 はないでしょうか? よろしくお願い致します。

  • 改行のコマンドを教えてください。

    ラジオボタンを押すと、プログラムの真ん中にある文字が表示されるエリアに文字が出るようにしました。コードをプリントすると、矢印がたくさん出てとても見にくいので、コードの中で文字を改行したいのですが、コードの改行用コードがわからないです。 教えてください。よろしくお願いします。 例題 '=============================== Private Sub radauthor_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles radAuthor.CheckedChanged lblMessage.Text = " Moji : abcdefghijklmnopqrstuvwxyz." End Sub '=============================== ここの 「lblMessage.Text」の後にある文字を改行したいのです。 自分のカンでは、 lblMessage.Text = " Moji: abcdefghijkl"_          "mnopqrstuvwxyz." これで改行できると思っていたのですが、できないのでここに質問させていただきました。 よろしくお願いします。

  • vt100端末に改行(コード)を送るには

    下記ライブラリを使い、JavaでSSH接続するプログラムを作っています。vt100端末に改行つき(ターミナルエミュレータで動かした場合のEnterを押す動作)で、コマンドの文字列を送りたいのですが、どのように書けばよいのでしょうか? 例えば、 String command = "show"; で、showの後に改行コードを入れたい場合は、ダブルクォーテーションの中に、さらに何か入れなければいけないのでしょうか? とんちんかんなことを言っているかもしれませんが、よろしくお願いします。 http://www.jcraft.com/jsch/index.html

  • C# 文字列を改行コードで分割

    C# 文字列を改行コードで分割 テキストボックスに記載された文字列を1行ごとに取り出そうと思い string[] strs = textBox1.Text.Split('\n'); とコーディングしたら、末尾に\rがついてしまいました。 末尾の\rを削除するコードを追加して書けばよいのですが、改行コード\r\nで分割する方法ありましたらお教えください。

  • EXCELのフォームで改行ができない

     EXCELのフォームで改行したいのですが、次のコードで改行しようとしています。  au = "手伝う" & vbCrLf & "手伝う"  TextBox1 = au でテキストボックスに       手伝う       手伝う と表示されて欲しいのですが改行が文字として表示されてしまい改行されません。何故なのでしょうか?テキストボックスのプロパティの問題でしょうか?    

  • Visual Basic の平方根について

    Visual Basic を用いて、TextBoxから入力した 数字について、ボタン1を押すと平方根を求め、Labelに書き出し、 ボタン2を押すとリセットされるプログラムを 作りたいのですが、全くわかりません。 コピペしたらプログラムが動くコードを教えてください。 お願いします。

  • ソフト改行文字が入らず困っています

     VB6環境で、テキストボックスにEM_FMTLINES(= &HC8)をSendMessageしソフト改行文字を入れた形でテキストを取得したいのですが、希に複数行入力されているにもかかわらず、ソフト改行文字が追加されない場合があります。  MultiLineをtrueにしたテキストボックス「text1」とボタン「Command1」をフォームに貼り付け、以下のようなテストプログラムを作成してみました。(お見苦しいところありましたらすみません) Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As Long Private Const EM_FMTLINES = &HC8 'ソフト改行文字を設定/削除する定数 Private Sub Command1_Click() Dim ret As Boolean Dim str As String ret = True 'ソフト改行文字を付加 Call SendMessage(Text1.hwnd, EM_FMTLINES, 1&, ByVal 0&) str = Text1.Text If InStr(str, vbCr & vbCr & vbLf) = 0 Then MsgBox "失敗!" ret = False End If 'ソフト改行文字を削除 Call SendMessage(Text1.hwnd, EM_FMTLINES, 0&, ByVal 0&) If ret = True Then MsgBox "成功" End If End Sub  テキストボックスの横幅をある程度狭くし、複数行になるよう適当に文字を入力しボタンをクリックすると、ほとんど成功するのですが、確かに20回に1回くらい失敗します。  失敗した際は何度ボタンをクリックしても失敗します。逆に成功した文字列でなんどもボタンをクリックしても成功しか帰ってきません。  試した環境   WindowsXP Pro SP2、Windows2000 SP4  なんとも法則性も見つからず、途方に暮れております。決方法やこんな事象ご存知でしたら助けて頂けないでしょうか。よろしくお願い致します。  

  • 改行コード変換

    先に「chompの使い方」で質問したものです。 文字コードを調べたところ、改行が「^M」で表示されていました。 テキスト文書ファイルもCGIプログラムも文字コードはEUCにしてありますし、改行コードもLFにしているんですが、フォームで入力される改行コードはCR+LFになっているようです。 これはどうやって制御すれば(全ての改行をLFにする)よいのでしょうか? ご教示いただけるとうれしいです。よろしくお願いいたします。

    • ベストアンサー
    • CGI
  • TextBox内で改行できるようにしたい

    エクセル2003です。 UserForm1にTextBox1を配置しました。 TextBoxに文字を入力し右端にきたら自動で次の行へ改行し、文字を入力し続けたいのですがなぜかできません。 エンターキーを押しての改行もできません。 アクセスならなぜか自動でできました。 スクロールバーがないせいかな?と思い、 TextBox1のScrollBarsプロパティを 「mScrollBarsVertical」にしてもスクロールバーが表示されません。 何か解決方法はありますか? ご教授よろしくお願い致します。

  • 全角・半角が混じったテキストで20文字毎に改行を入れたい

    perl5.8.5でCGIのプログラムを作っています。 全角・半角が混じったテキストで20文字毎に改行を入れたいと思っています。 プログラムの文字コードはEUCで書いています。 (変換前)12345678901234567890123456789012345678901234567890    ↓ (変換後)12345678901234567890\n12345678901234567890\n1234567890 という感じです。 いろいろな方法で実現できると思ったのですが スマートな書き方を教えていただけますでしょうか。 よろしくお願いいたします。

    • ベストアンサー
    • Perl

専門家に質問してみよう