http://www.okweb.ne.jp/kotaeru.php3?q=194302
この質問の回答を頂いてプログラムを変更したのですが、また詰まってしまいました・・・(T.T)
Open strTmp For Binary As #1
Put #1, , strCom
Put #1, , "EXIT"
Close #1
として、ファイルstrTmpの中身をみると、(strCom=dir/wとする)
dir/wEXIT
となっています。
希望する結果は、
dir/w
EXIT
なのですが、方法はあるでしょうか?
VBのHELPを参照した感じでは、配列変数を使えばいいみたいですが、strComの値は可変です。
ついでの質問ですが、VBのプログラムをするにあたって、VBのヘルプを利用するだけで技術アップは望めるでしょうか?
市販の書籍は必要とする部分が少なく金額も高いため考えてしまいます。
No.2
- 回答日時:
>vbCrLfというのがあったんですね
ちなみに、vbNewLineというのもあります。
Microsoftではこちらのほうを薦めているようです。
このあたりは、VBのヘルプにあります。(ただ、インストール時のMSDNにあるかどうかは、未確認。すいません)
この回答への補足
その後、shell(strTmp,~)とすることで、DOS窓を開いて、dir/wを実行後、EXITでDOS窓を閉じるはずなのですが、なぜかDOS窓が閉じてくれないんです。
手動でDOS窓開いて、手動でabc.batを実行だとbat内の最後のEXITでDOS窓が閉じるんだけど・・・
このあたり分かればよろしくお願いします。
この件ですが、できました!
ヘルプでよく調べてみたら書いてありました。
お手数おかけしました。
参考に・・・
shell("command.com/c "+strTmp,~)
で、終了後閉じるようになりました。
回答、補足の記入がめちゃくちゃになってしまいましたが、教えてくれた方ありがとうございました。
No.1ベストアンサー
- 回答日時:
Put #1, , strCom
Put #1, , vbCrLf '改行コード
Put #1, , "EXIT"
っていうか、1行づつならPut以外の方法をお勧めします。
Open strTmp For For output As #1
Print #1, strCom
Print #1, "EXIT"
close #1
参考URL:http://oshiete1.goo.ne.jp/kotaeru.php3?q=169686
この回答への補足
アドバイスを参考にプログラム変更で目的のファイル出力ができました。
でも、なぜか他の部分がうまくいかないんです。
strTmpは、abc.bat(DOSのバッチファイル)
strComは、
dir/w
EXIT
その後、shell(strTmp,~)とすることで、DOS窓を開いて、dir/wを実行後、EXITでDOS窓を閉じるはずなのですが、なぜかDOS窓が閉じてくれないんです。
手動でDOS窓開いて、手動でabc.batを実行だとbat内の最後のEXITでDOS窓が閉じるんだけど・・・
このあたり分かればよろしくお願いします。
vbCrLfというのがあったんですね。(&H13を追加してみたりしたのですが、うまくいかなくて)
Printのほうは、初めて知りました。
For outputでファイルを開いて、writeでやったら、文字列の前後に"~"が入ってしまって、Binaryで何とかしようと思ってましたので、助かりました。
今日、さっそくやってみたいと思います。
私の場合、昔N88 BASICをやってたので、当時のコマンドで何とかしようとしてしまうのが原因かもしれません。
うちのVBは、ヘルプでOPENを検索しても灰色の文字で内容が表示できないんのだけど、MSDNの使い方が悪いのかな?
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) シートをコピーする下記記述でダイアログを用いた記述がわかりません?( A = Dir(ThisWor 4 2022/08/22 12:26
- Excel(エクセル) Excelにて、フォルダ内のTextファイルをマクロで統合すると文字化けしてしまう時の解消コード 4 2023/01/01 07:32
- Visual Basic(VBA) ファイル名の右側を変更したい ファイル名:「1001日別売上」の左側へ「2022」を追加し、「202 6 2022/10/14 10:03
- Visual Basic(VBA) 集めたシートのシート名を変更したい。 下記のコードでサブフォルダにあるファイルのSheet3を集めて 6 2022/08/23 10:38
- Visual Basic(VBA) サブフォルダ(データ)にある複数の.xlsxファイルのSheet3のA2セルの値で01から左側をB2 2 2022/08/14 15:46
- Visual Basic(VBA) VBAのユーザーフォームのテキストボックスに入力制限をしたい 6 2022/11/15 08:28
- Visual Basic(VBA) 入力ボックスが繰り返しポップアップして止まらない。 下記コードでファイル名の変更をしたいのですが、変 1 2022/09/08 11:27
- Visual Basic(VBA) エクセルのマクロについて教えてください。 7 2023/07/04 09:18
- Visual Basic(VBA) Excel-VBAでのファイルの開き方 4 2023/02/14 11:01
- Visual Basic(VBA) 九九の答えの計算 3 2022/12/20 22:13
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
あるプログラムのコマンドライ...
-
このプログラミング誰か教えて...
-
Excelで4096点以上のFFTの方法
-
パックマンプログラム
-
「Outlookが他のプログラムによ...
-
PICマイコンのコピー(クローン...
-
自動クエリとはどういうもので...
-
UWSCで指定のフォルダを開きたい。
-
Excelに埋め込んだVBAのプログ...
-
Notepad++の関数リスト表示でC...
-
円周率を求めるC言語のプログラム
-
excelのexe化について
-
VBAを使って、pdfを関連付けら...
-
ロボットの作り方を教えて下さ...
-
VBAにてメール作成した際、一部...
-
表計算プログラムの作り方
-
寿命
-
C言語でプロセスをWAITさせる方...
-
C言語でのaccess violationに...
-
外部プログラム呼び出し
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
Excelに埋め込んだVBAのプログ...
-
Notepad++の関数リスト表示でC...
-
あるプログラムのコマンドライ...
-
これってほんとにみますか?
-
Excelで4096点以上のFFTの方法
-
「Outlookが他のプログラムによ...
-
自動クエリとはどういうもので...
-
VBAでユーザーフォームが自動的...
-
VBAにてメール作成した際、一部...
-
PICマイコンのコピー(クローン...
-
テキストボックスのエンターキ...
-
読み込み中にアクセス違反が発...
-
特定のwebサイトのタイトルや記...
-
未使用の変数を一括検索する方法
-
モジュール、アプリケーション...
-
COBOLの連絡領域について
-
Google カレンダーの商用利用
-
エクセルとワードをデスクトッ...
-
ドロップダウンリストの文字を...
-
binファイルってiphone専用です...
おすすめ情報