- ベストアンサー
文字列の出力で
はじめまして、vb.netの初心者です。 テキストファイルの作成で下記のようにした場合 FileOpen(1, FileName, OpenMode.Output) Writeline(1,"AAAA") FileClose(1) "AAAA"と文字列が出力されるところを の""を外して AAAA と出力指定のですが何か良い方法はないでしょうか？ よろしくお願い致します。m(_ _)m
- VBBiginer
- お礼率33% (1/3)
- Visual Basic
- 回答数3
- ありがとう数1
- みんなの回答 （3）
- 専門家の回答
質問者が選んだベストアンサー
先ず、「何故、ヘルプを見ないのですか？」 ヘルプの表示方法を知らないのでしょうか？ ヘルプは、調べたい語句にキーボードカーソルを置いて、 F1キーを押せばその語句に関するヘルプを表示します。 Writelineのヘルプを見れば、 「WriteはPrintとは違って」いう記述が出てきます。 関連項目に「Print」「PrintLine」とかが並んでいます。
その他の回答 (2)
- tom11
- ベストアンサー率53% (134/251)
こんにちは、 ちょっと意味が、不明ですが、このようなことですか。 aaaa ではなく、 "aaaa" と、出力したいのですか？？ ファイル出力では、ないのですが、このようにすると、 Public Sub f() Dim con As String con = "aaaa" Debug.Print con con = """aaaa""" Debug.Print con End Sub 実行結果は、 aaaa "aaaa" になります。 もし、 ファイルの出力結果が、 "AAAA" にしたいのでしたら、 WriteLine(1,"""AAAA""") になるのかな。 外していたら失礼。
- king_joe1006
- ベストアンサー率37% (70/189)
あらかじめ他の変数に"AAAA"を入れておいて、 Writeline(1,変数名) とかでいいのでは？
補足
回答ありがとうございます。 それでは無理です。実践済み 多分writeline以外の関数が必要と考えてますが、 適したものをご存知ないでしょうか？
関連するQ&A
- 文字コードについて
特定のコードを指定して保存してみましたが、文字列を読み込めません。 どうしたら、読み込めるようになるかを教えてください。例えば、 FileOpen(FreeFile(), FileName, OpenMode.Output) Print(Filenum, Chr(150)) FileClose() というような具合で保存すると、文字列を読み込んでコードを表示しても0になります。 よろしくお願いします。
- ベストアンサー
- Visual Basic
- SAVEダイアログを使用する場合の保存名の指定
下記のとおり、SAVEダイアログを使用してデータを保存するプログラムを使用したのですが、保存の際に予めファイル名称を指定したいと考えています。 ネットで色々調べたのですが、どれもうまくいかなかったので教えて下さい。 環境はVB2008、windosXP（SP3）です。 Private Sub Command3_Click(ByVal eventSender As System.Object, ByVal eventArgs As System.EventArgs) Handles Command3.Click Dim nFilter As String Dim Ret As String Dim ReadData As String 'フィルターの設定 nFilter = "データファイル(*.dat)" & Chr(0) & "*.dat" & Chr(0) Ret = SaveDlg(Me.Handle.ToInt32, nFilter) 'ファイルを保存する FileOpen(1, Ret, OpenMode.Output) WriteLine(1, Text1.Text) WriteLine(1, Text2.Text) WriteLine(1, Text3.Text) FileClose(1) End Sub
- ベストアンサー
- Visual Basic
- ダブルクォーテーション付きの文字列を含むファイルを読み込む方法？
Visual Basic 2008 Express Editionを使用しています。 ＩＥ上の範囲選択のHTMLテキストをテキストファイルに保存しています。 保存日時(Date型):time "文字列":moji のように保存しています。 FileOpen(n, "Data.dat", OpenMode.Append) WriteLine(n, time, moji) ～保存されたファイルの例～ #2008-08-31 10:21:05# , "この記事に関するコメントを投稿するには、下のボタンをクリックしてください。投稿フォームが表示されます。通常のご質問、ご意見等は<A href=""/vb/bbs/index.html"">掲示板</A>へご投稿ください。 " このファイルを以下のように読み込もうとしています。 FileOpen(n, "Data.dat", OpenMode.Input) Do While Not EOF(n) Input(n, time) Input(n, moji) TextBox1.Text += vbCrLf & time & vbCrLf & moji & vbCrLf Loop ところが、HTMLの文字配列の中には、<a href="" http://・・・・ "">のようにダブルクォーテーションが含まれています。ダブルクォーテーションが２つなら、文字列として扱ってもらえると思っていましたが、文字列の終了位置として認識してしまうようです（エラーの内容から判断しました。） ダブルクォーテーションを含む文字列の場合どのように処理したらよいでしょうか？
- ベストアンサー
- Visual Basic
- PowerShellでの文字列置換ができない
PowerShellで「\」を含む文字列が変換できません。たぶん正規表現とかで問題があると思うのですが・・・ あとテキストファイル内の文字列置換で指定された文字列がある行があった場合、その行を削除するといったことは出来るのでしょうか？ 詳しい方いらっしゃいましたらよろしくお願いいたします。 ＜テキスト＞ BBBB AAAA NNNN AAAAあああA NNNN AAAA ＜検索文字列＞ あああ ※行内に「あああ」をみつけたらその行を丸ごと削除したい・・・
- ベストアンサー
- その他（プログラミング・開発）
- Visual Basicで作成したプログラムをExcelに出力したいです
Visual Basic. NET 2003を使っています。 「N期間（年間）と利子率（％）を入力し、1年目からN年目までの元金の価値の倍率のリストを作成するプログラムを作成し、出力データをMS－Excelのカッマ区切り形式（ファイル名.csv）に保存すること」を、授業の課題として出されました。大学の授業って大変ですね。。。 貯金した元金の価値の倍率は以下の式で表されます。 N年後の価値の倍率＝（１＋利子率）二乗 N期間 自分でここまではやってみました。 Dim principal As Integer Dim period As Integer Dim interest As Double Dim value As Double 'Input principal = Val(TextBox1.Text) period = Val(TextBox2.Text) interest = Val(TextBox3.Text) / 100 'Calculation value = principal * ((1 + interest) ^ period) 'Insurt data Const filename As String = "value.csv" FileOpen(1, filename, OpenMode.Output) WriteLine(1, period, interest, value) FileClose(1) お昼からずっと格闘しています。。。そろそろお腹がすいてきました（笑）もう困り果ててしまったので、ここに質問させていただきます！！ どなたか回答してくださればうれしいです♪ よろしくお願いします！！
- 締切済み
- Visual Basic
- ファイルの存在の確認をする方法
こんにちは。 VB.netでプログラミングしているんですが、ファイル処理について質問があります。ファイルを保存する際に、よく「すでにファイルが存在します。上書きしますか？」と聞いてきますよね。これを実現するにはどんな方法があるでしょうか？ただし、コモンダイアログは使いません。FileOpen、FileCloseで実現したいのです。 以下のプログラムをどのように変えたらいいでしょうか？ご教授お願いいたします。 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click FileOpen(1, Format(Now, "yyyyMMdd") & " .txt", OpenMode.Output) PrintLine(1, "test") FileClose(1) End Sub
- ベストアンサー
- Visual Basic
- 文字列を配列に…。
VBはまだ始めたばかりで本当に初歩的なことかもしれませんが分かる方がおられたら是非教えて下さい。 text1.textから取り込んだ文字列を”一文字ずつ”（Dim a(100) as stringで宣言した)配列に格納したいのですがどうしたらいいのでしょうか？？ ＜例＞text1.textに"abc"と入力しcommandbuttonを押すとa(0)に"a"がa(1)に"b"がa(2)に"c"が格納されるといったかんじです。 ちなみに今私がしたいのはtext1.textに、ある文字列を入れその文字列を文字コードに変換しそれを一文字分ずつ+1してまたそのコードを文字に直しtext2.textに出力するというものです（ようは簡単な暗号化ですね）。 私はAscとChrコマンドを利用して１文字ずつコードをずらしていこうと思っているのですが、他に良い方法などあるのでしょうか？？ 本当に初心者でどのようにしらたよいのか分かりません…。 どなたか分かりやすく教えていただけませんでしょうか？？ お願いします。
- ベストアンサー
- Visual Basic
- インデックスが配列の境界外です。というメッセージ
連立方程式を解くプログラムにおいて、連立方程式の解をテキストファイルに記録する作業を行うために以下のようにしました。 [連立方程式のPAD] Dim File As Integer File = FreeFile() FileOpen(File, "ABC.txt", OpenMode.Output) Dim i As Integer For i = 0 To N_i - 1 WriteLine(File, b_data(i)) Next i FileClose(File) End Sub すると、「インデックスが配列の境界外です」とエラーメッセージが出てしまいました。理由がまったく分かりません。 どなたかご回答よろしくお願いします。
- 締切済み
- Visual Basic
- VB2005でのファイル操作について
Dim filedata As String Dim fileNum As Integer Dim fileName As String Dim i As Integer fileName = "C:\Paradata.txt" fileNum = FreeFile() FileOpen(fileNum, fileName, OpenMode.Output) For i = 0 To 9 filedata = data(i, 0) & "," & data(i, 1)・・・・・ PrintLine(fileNum, filedata) Next FileClose あるボタンを押しますと上記のようにテキストファイルにデータを保存しようとしているのですが、1回目のボタンクリックではエラーが無いのですが2回目以降は"別のプロセスで使用されているため、プロセスはファイル 'C:\Paradata.txt' にアクセスできません。"のエラーが発生してしまいます。いろいろと調べているのですがまだわからないのでどこがおかしいか教えてください。よろしくお願い致します。
- 締切済み
- Visual Basic
お礼
すみません。ごもっともです。 ヘルプを使うのが苦手で、学引き大全500で調べていたのですが、 掲載されてなかったため安易に質問してしまいました。 CSVファイルを作成したく、安易にWriteLineだけで、解決したい と思っていたのですが、Printを含めれば解決しますね。 今後、安易な質問を控えます。 ありがとうございました。