- ベストアンサー
文字列の出力で
king_joe1006の回答
- king_joe1006
- ベストアンサー率37% (70/189)
あらかじめ他の変数に"AAAA"を入れておいて、 Writeline(1,変数名) とかでいいのでは?
関連する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を使用しています。 IE上の範囲選択の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://・・・・ "">のようにダブルクォーテーションが含まれています。ダブルクォーテーションが2つなら、文字列として扱ってもらえると思っていましたが、文字列の終了位置として認識してしまうようです(エラーの内容から判断しました。) ダブルクォーテーションを含む文字列の場合どのように処理したらよいでしょうか?
- ベストアンサー
- 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年後の価値の倍率=(1+利子率)二乗 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コマンドを利用して1文字ずつコードをずらしていこうと思っているのですが、他に良い方法などあるのでしょうか?? 本当に初心者でどのようにしらたよいのか分かりません…。 どなたか分かりやすく教えていただけませんでしょうか?? お願いします。
- ベストアンサー
- 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
補足
回答ありがとうございます。 それでは無理です。実践済み 多分writeline以外の関数が必要と考えてますが、 適したものをご存知ないでしょうか?