• ベストアンサー

テキストボックスの内容(複数行)をリストへ

テキストボックスの内容(複数行)をリストボックスへ1行表示にするにはどうすれば良いのでしょうか? replaceにてvbcrlf(改行文字?)を置き換えしようとしても無理でした。 ご教授お願いします。

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

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

TextBox1はMultiLineをTrueにしました。 List1を貼りつけました。 ボタンを1つ貼りつけました。 Private Sub Command1_Click() s = Text1.Text s1 = Replace(s, vbCrLf, "") MsgBox s1 List1.AddItem s1 End Sub で テキストボックスでエンタキーで改行する方法で 例えば4行を入力し、ボタンをクリックすると、リストボックスには、1行の表示になりましたが。 そうならなかったのはなぜでしょうね。

yama888
質問者

お礼

目が覚めました! うれしいです!ありがとうございました。

関連するQ&A

  • 複数行のテキストボックスを受け取って、改行させたい。

    複数行のテキストボックスを受け取って、改行させたい。 お世話になります。ASP.NET VB2005を使っています。 Byrefでテキストボックスと、ByValで何桁目で改行させたいかを受け取って、 テキストボックスの内容を指定桁数で改行を入れたいのですが、 どのようにすればいいのでしょうか? 1行目が何桁あるかを判断する。 指定された桁数以上あったら改行させる。 という事を実現したいと考えています。 以上です、宜しくお願い致します。

  • [VBA]テキストボックスからエクセル反映(複数行)

    始めまして。初めて質問させて頂きます。至らない点があると思いますがよろしくお願い致します。 今テキストボックスよりエクセル(単一セル)に文字を入力するシートを作成しております。 テキストボックスで複数行入力(Enterで改行)の方法と複数行入力した文字をシート(1セル)に反映したいのですが良い方法をご存知でしたらご教授お願いします。 【やりたい事項】 テキストボックス内 (1)○は△です。(Enterで改行) (2)×は●です。 エクセルシート上(A1セルで) (1)○は△です。(ALT+Enter) (2)×は●です。 現状:MultiLineをTRUEにして右端まで文字入力すると2行目に入力可能 エクセルに反映すると「○は△です。×は●です。」と1セルで1行で表示となってます。 言葉足らずかもしれませんが、よろしくお願いします。

  • 【VB6】複数行のテキストボックスの改行

    お世話になります。 VB6で、複数行入力出来るテキストボックスを作成しました。 そのテキストボックスの横幅は、最大30文字(60byte)まで入力出来ます。 ですが、あくまでフォーム上で伸縮させていた為、中途半端に折り返しされます。 【例】 iiiiiiiiiijjjjjjjjjjiiiiiiiiiijjjjjjjjjjiiiiiiiiiijjjあ jjjjjjj (↑計62バイトなので、本来であれば2行目に改行されてしまったjjjjjjjの左5文字を1行目に表示させたい) その行は特定のバイトを超えたらその場で強制的に改行!というソースを追加したいです。 その為には、常にテキストボックスの入力バイト数を監視するようにしなければならないと思いますが、なるべく動作や容量が重くならないような方法はありますでしょうか?

  • リストボックスの内容をテキストボックスに表示する。

    タイトルどおりなんですが、リストボックスの内容をテキストボックスに表示することが出来ません。 といっても、普通に表示することは出来たのですが、 今やっていることは、テキストボックスの中にある文章を表示しておいてカーソルがある部分にリストボックスの内容を表示する。。というものです。 (例) テキストボックスの中身が 「おはようございます。今日の天気はです。」 リストボックスの中身が 晴れ・曇り・雨 このとき「~天気は(ここにカーソルがある)です」 あるボタンを押すことで(ダブルクリックでもどちらでも良い) テキストボックスの内容が 「~天気は晴れ(リストボックスで選択したアイテム)です。」 と表示できるようにしたいのです。どうしても文末にしか表示することが出来ませんでした。長文で分かりづらい点が多々あると思いますが、 良い方法があれば教えてください。

  • リストボックスの内容をテキストに書き込むには?

    似たような質問が前に出ていて恐縮なのですが、そちらと多少の違いがあって解決できなかったため、質問させていただきます。 Visual Basic6.0で、リストボックスに表示している内容をテキストボックスに書き込むにはどうすればよいのでしょうか? 一応、下記のようなプログラムを自分で組んでみたのですが、なぜかリストボックスの一行目にある項目だけが複数回書き込まれてしまいます。 (Print~の位置をNext~の次にすると、一行目が一度だけ書き込まれて終了、になってしまいました。) Open filename For Output As #1 Dim lngIdx As Long Dim strData() As String ReDim strData(List.ListCount - 1) For lngIdx = 0 To List.ListCount - 1 strData(lngIdx) = List.List(lngIdx) Print #1, strData(IngIdx) Next lngIdx Close #1 Do UntilとLoopを入れるべきなのだと思いますが、どうも入れ方が悪いようで必ずプログラムが動かなくなってしまいました。 初めてまだ2ヶ月の初心者なのでかなり初歩的なことを質問しているとおもいますが、回答よろしくお願いします。

  • 複数行のエディットボックスで改行入力

    複数行のエディットボックスで改行入力 MFC ダイアログベースで、簡単なテキストエディタを作成しています。 エディットボックスは固定サイズで、縦横スクロール無しにしています。 上記エディットボックスに、改行の無い2行分の文字列を出力すると自動的に折り返され、 2行で表示されるのですが、そのとき、2行目の行頭でEnterキーを押すと、 カーソル位置で改行し、空行が挿入されます。(計3行分の表示となる) 10文字文の幅のエディットボックスにて、 文字列 "12345678901234567890" をエディットボックスに出力 エディットボックスでは下記の用に表示。 1234567890 1234567890 2行目の先頭でEnterキー押下で3行表示となる 1234567890 (空行) 1234567890 実際には、1行目の終わりに改行コードが挿入されているので 空行ではなく、改行された状態の2行表示としたいのですが、 どのようにすれば、よいでしょうか? よろしくお願いします。

  • ACCESSでテキストボックスの制御がしたい

    テキストボックスの制御をしようとして、つまずいてしまったので質問いたします。 やりたいことは ・テキストボックス全体の文字数120文字。 ・テキストボックス1行の文字数40文字。 ・3行固定で途中改行しても固定は続ける。 ・3行目にカーソルがあるときに改行すると、次のテキストボックスに移動する。 現状は、テキストボックス内で改行すると、次の行から次の文字が始まってしまい、3行で固定出来ず4行目にはみ出してしまう状態です。 インターネットなどで調べても情報がない状態で困っています。 ご存知の方、ご教授よろしくお願いします!

  • ButtonコントロールのTEXTを複数行表示するには?

    ButtonコントロールのTEXTを複数行表示したいのですが、文字を沢山書いても改行されず1行の表示になってしまいます。どうすれば複数行表示できるでしょうか?VS2005を使用しています。

  • VB2008 テキストボックス内文字検索と置き換え

    テキストボックスの先頭5文字目から2文字に特定の文字があるか探し出して、特定文字があるならその行の後ろに文字をコピーして置き換え。 検索文字があっても無くても空白行の次の行になったら同様の処理を行う。 こういう処理をするにはどのようにすればいいでしょうか? 例) 特定の文字:ef 置き換えする内容:ef→いーえふ <テキストボックスの内容> abcdefgh ijklmnop qrstuvwx yzABefEF GHYJKLMN OPQRefUV <検索して置き換えた後> abcdefgh いーえふ ijklmnop qrstuvwx yzABefEF GHIJKLMN OPQRefUV いーえふ どなたかご教授ください。 よろしくお願いします。

  • VB6 複数行のテキストをリストへ出力

    VB6 でTextBoxのMultiLineをTrueにして複数行にしてあります。 このテキストのデータをリストへ表示させたいのですが、方法が分かりません。 コマンドクリックイベントへ試しに List1.AddItem Text1.Lines(0) などやってみたのですがエラーしてしまします。 LinesはVB6では使用できないのでしょうか?? ご教授願います。

専門家に質問してみよう