くだすれVB6.0以前（� ..
[2ch|▼Menu]
418:デフォルトの名無しさん
08/12/17 09:43:20
日頃はVC使い。今更VB6始めたが、(VCもそうだが)仕事とかではない

VB6でdllexportするっていったら、基本的にはOCX化するのみ？
あと、簡潔に、通常の.objファイルをスタティックリンクする方法とかある？


ついでに参加
>>415
最近、VB6で書かれたマルウェアが増えてきて、ちょっと勉強しとこうと思ったのが、
いまさらVB6やろうと思ったきっかけ どう考えてもVCで書いた方が楽なような処理を
ごりごりVB6で書いてあるようで、もしかすると、難読化のつもりもあるのかもしれん
あと、IDE軽かったから、遊ぶ分にはいいかなとｗ

419:デフォルトの名無しさん
08/12/17 10:49:40
恥ずかしいにもほどがある

420:デフォルトの名無しさん
08/12/17 11:13:14
OCX化というよりActiveX（COM)化、EXE,　DLL,　OCX　形式のCOM。
ものすごい裏技でVBの関数を直接呼び出す方法もあるちゃあるが現実的ではない。

＞最近、VB6で書かれたマルウェアが増えてきて
VBSなどで書かれてるその手のスクリプトをそのまま流用できるからじゃないのかね。
COMの扱いは簡単だしランタイムも大概入っている。


421:デフォルトの名無しさん
08/12/17 13:53:25
流れぶった切って申し訳ない。
ｖｂは余り馴染みがなく今から記述することが出来るかどうかお教え頂きたい。

VBで作成したアプリに中国語を表示したい。
OSの設定ロケールは日本語。
vb6jp.dllはインストール済み。

OSのロケールが中国の場合は上手く中国語が表示出来ました。
日本ロケールだと文字化けしてしまいます。
SetThreadLocaleを使いロケールを変更してみましたが効果ありませんでした。
SetLocaleInfoは使い方が解りませんでした…。

ロケール変更にて文字化けを直すことは可能なのでしょうか？
お教え願います。

422:デフォルトの名無しさん
08/12/17 16:01:54
あきらめるか、.netにする。

423:デフォルトの名無しさん
08/12/17 20:05:59
>>421
中国語版のVB6.0で開発すればできるよ。

424:デフォルトの名無しさん
08/12/17 20:26:15
似たような質問
URLﾘﾝｸ(www.biz.kotaete-net.net)

425:デフォルトの名無しさん
08/12/18 01:44:45
>>422-424
回答ありがとうございます。
自分で調査したうえでそのような予感はしてましたが・・・。

特に424さんありがとうございました。
何故ダメなのか？という理由までわかったのですっきり諦められます。
別の方法で処理を回避、またはオペレーション誘導などで
問題を回避したいと思います。

皆さんありがとうございました。

426:デフォルトの名無しさん
08/12/18 12:13:42
VB6にての質問。
ファイル名が文字化けしているファイルを、コモンダイアログで指定して読み込みたいんだけど、
読み込んだ段階でパス名が変わってしまって、読み込みが出来ない。
解決策はありますか？

427:デフォルトの名無しさん
08/12/18 13:40:42
文字は化けてなどいない

428:デフォルトの名無しさん
08/12/18 20:41:41
リネームしたら

429:デフォルトの名無しさん
08/12/19 12:19:15
>>427
一般的に文字化けと言うと思う。

>>428
リネームしたら確かに読み込めるけど、そのままいける方法が無いかなとね。

430:デフォルトの名無しさん
08/12/19 13:23:25
>>429
何がどう化けたと思ってるんだ？

431:デフォルトの名無しさん
08/12/19 14:19:53
UNICODEのファイル名を読んで化けたとか言うオチじゃあるまいな

432:デフォルトの名無しさん
08/12/19 15:07:57
VB6でMDBからデータを引っ張りクリスタルレポートに出力しています。
最初はクリスタルレポート8.5を使っていたのですが使いにくいので前使っていた4.7を入れなおしました。
プリンターとプレビューの出力は上手く行くのですがテキストファイルやCSVの外部ファイルにエクスポートの際に
実行時エラー20540
エクスポート DLL がないかまたは古いです。
というエラーメッセージが出ます。
散々ぐぐりましたが解決策が見つかりません。
何かコンポーネートか参照をし忘れてるのでしょうか？

433:デフォルトの名無しさん
08/12/19 16:12:02
OSのクリーンインストールからやり直して、やっぱりエラーが出てから文句言え

434:デフォルトの名無しさん
08/12/19 18:40:38
リネームできるんだからよめるだろ

435:デフォルトの名無しさん
08/12/20 09:45:58
根本的に変な質問かもしれませんが教えて下さい。
VBで作られたEXEはデバッグというかコードを
読むことができるんでしょうか？
Visual Studio 6.0は入ってます。

正直なところ、EXEはアセンブラで読むしかない
みたいなイメージがあるんですが･･･

436:デフォルトの名無しさん
08/12/20 10:16:52
読めない

437:デフォルトの名無しさん
08/12/20 11:24:20
VB用の逆アセツールもあるけどね

438:デフォルトの名無しさん
08/12/20 11:29:25
>>435
URLﾘﾝｸ(www.watahiki.info)

439:デフォルトの名無しさん
08/12/20 19:20:56
Dynamic HTML Editing Control SDK　を入手できるWebサイトは？
まあ無くても、もう持ってるから別に困りませんが。





440:デフォルトの名無しさん
08/12/21 08:23:22
>>439
MSDN

441:デフォルトの名無しさん
08/12/24 00:03:19
VB6.0でエクセルのAVERAGEみたいな計算できませんか？

| 10| 20| |=AVERAGE(A1:C1)


442:デフォルトの名無しさん
08/12/24 00:11:07
(10+20)/2

443:デフォルトの名無しさん
08/12/24 00:13:39
>>441
ｽﾚﾀｲどおりで乙


444:デフォルトの名無しさん
08/12/24 01:27:17
(10+20)/3だろ

445:デフォルトの名無しさん
08/12/24 08:44:14
C1のnullをどう扱うかだな

446:441
08/12/24 10:56:17
>>445
そうなんです。nullをどう処理するかなんです。
IF 文でだらだら書くのがちょっと思い書きました。
>>444
10ではなく15の答えが欲しいのです。



447:デフォルトの名無しさん
08/12/24 11:21:18
FlexGridか何かでやってるのかな
/nのnの数を
セルの値がisnumericでTrueになったらインクリメントしていくとか

448:デフォルトの名無しさん
08/12/24 12:25:59
>>446
次は最初からそう書こうね　後出しはじゃんけんでも嫌われるだろ？

449:デフォルトの名無しさん
08/12/25 06:44:52
まだいるかな

>>435
Pコードだと、Pコード逆アセンブラがいる >>438
ネイティブコードなら、デバッグシンボル吐かせれば、お好きなように
clでいう、/Faみたいなものは、ラベルが大幅に置き換わってしまうため、
ろくな内容にならない exeを直接逆汗したほうがまし

450:デフォルトの名無しさん
08/12/25 11:05:47
VB5.0のツリービューのノードのテキストは
一部分を色を変えることはできるでしょうか？

例えば
hoge (100)
という文字列の場合(100)だけ青にするといったことが
可能でしょうか？


451:デフォルトの名無しさん
08/12/25 20:49:55
たぶん無理。カスタムドローできないよね？

452:デフォルトの名無しさん
08/12/30 20:41:11
vb6.0でＩmageListコントロールを表示するにはどうしたらいいのでしょうか？

453:デフォルトの名無しさん
08/12/30 20:47:59
自己解決しました

454:デフォルトの名無しさん
09/01/01 00:03:49
あけおめ

455: 【だん吉】 【1371円】
09/01/01 01:13:05
С Новым Годом!

456:デフォルトの名無しさん
09/01/01 03:33:22
質問お願いします。
３種類の商品をi(i=1,2,3)として、
それぞれの発注プログラムを構築したいと思っています。

計算方法は同じなので、iが3になるまでのFor～Next処理でやりたいのですが、
それぞれのパラメータ（例えば需要INVi）のiのなかに数値を代入して
あらかじめ決めておいたINV1からINV3の数値を利用して作りたいと思っています。

この場合はINViのiの中に数値i=1～3を代入してINV1～INV3とするにはどのようなコードを書けばよいのでしょうか？
また、そうしたらそれ以前に決めておいたINV1～INV3の数値を参照できるのでしょうか？

初心者の質問で申し訳ないですが、どうかご教授お願い致します。

457:デフォルトの名無しさん
09/01/01 10:24:52
何をしたいのかまったくわからん・・・

とりあえず、配列ではだめなんかい？

458:デフォルトの名無しさん
09/01/02 02:54:20
AからBまでの和を求めるとしたらどうやってコードすればいいんですか？
大小のチェックをして場合分けしてやると思うんですけど。
教えてください。

459:デフォルトの名無しさん
09/01/02 02:59:46
ΣA+B

460:デフォルトの名無しさん
09/01/02 02:59:54
そーなんですよ川崎さん

461:デフォルトの名無しさん
09/01/02 03:06:10
For i = A To B
　　 result += i
Next

462:デフォルトの名無しさん
09/01/02 10:14:02
>>357さん

なるほど～配列使ってやってみます！

説明下手ですいませんでした…ありがとうございました！

463:デフォルトの名無しさん
09/01/05 22:54:11
VB6でform1の何らかの処理中にform2で処理中って表示したいんだけど
なんかいい方法ありますか？
モーダルだとform1の処理が止まってしまうんで・・・

464:デフォルトの名無しさん
09/01/05 22:58:49
止まってるように見える事なんて気にせず実行ファイル作ればいいとおもうよ

465:デフォルトの名無しさん
09/01/05 23:03:29
DoEvent

466:デフォルトの名無しさん
09/01/05 23:19:37
もしかして別フォームをモーダルで表示しても
その後の処理は続いてると？

ついでに教えてもらいたいんですが
モーダルで表示したフォームってshowイベントで止まるでいいですか？

467:デフォルトの名無しさん
09/01/05 23:24:24
>>463
素直にドトネトつかってマルチスレッドのコードを書く方がいい。
ってういか、だからFormのコードに処理なんか書いちゃダメなんだよそもそも。
だからVB厨って呼ばれるんだ。

468:デフォルトの名無しさん
09/01/05 23:26:04
モードレスで出せばいいだろJK

469:デフォルトの名無しさん
09/01/05 23:40:33
処理中はform1を操作できなくしてform2のみ操作できるようにしたいのです
モードレスでもいい方法があればいいのですがありますか？

質問ばかりですいません・・・

470:デフォルトの名無しさん
09/01/05 23:47:05
vodal

471:デフォルトの名無しさん
09/01/05 23:50:59
Enable = False でいいだろJK

472:デフォルトの名無しさん
09/01/05 23:52:28
form1.enabled=false

473:デフォルトの名無しさん
09/01/06 00:13:55
一度enabledでやってみたんですがウィンドウがアクティブにならなかったので諦めてました
もう一度試してみます

夜遅くに付き合ってくださってありがとうございました！

474:デフォルトの名無しさん
09/01/06 00:31:11
操作できないウィンドウをアクティブにして何がしたいんだよ？

475:デフォルトの名無しさん
09/01/06 00:35:15
form2をアンロードして、form1のenabledをtrueにしたときです
やり方がまずかったのか、もう一度試してみます

476:デフォルトの名無しさん
09/01/06 10:27:29
本当に申し訳ありませんが、どなたか教えてください。

'住所1の印字
P_PRINT.E_Font "FC行楷書体", ADRS_FNT, True, 0
HH = ADRS_FNT / 2.835 + 1
If Not IsNull(AdoRs![住所1]) Then
For I = 1 To Len(AdoRs![住所1])
BAR = Mid$(AdoRs![住所1], I, 1)
' If BAR = "－" Then BAR = "ー"
' P_PRINT.E_String_Tate 60, 14 + (I - 1) * HH, BAR, RGB(0, 0, 0) '縦書き
If BAR = "ー" Or BAR = "－" Then BAR = "｜"
P_PRINT.E_String 60, 14 + (I - 1) * HH, BAR, RGB(0, 0, 0)
Next
End If

上記はVBでのアプリケーションから封筒に宛名を印刷する。
というコードの一部なのですが、現在縦書き仕様になっており、
横書き仕様に書き換えたいのですが、一体どこをどう換えれば良いのか、
全く検討つきません。
心優しい方、ご教示いただければありがたいです。。。


477:デフォルトの名無しさん
09/01/06 12:25:18
age

478:デフォルトの名無しさん
09/01/06 16:18:35
>>476
縦書きの部分がREMになってて横書きの部分が有効になってるように見えるんだけど…
とりあえずこれでどうかな

P_PRINT.E_Font "@FC行楷書体", ADRS_FNT, True, 0

(略)

If BAR = "－" Then BAR = "ー"
P_PRINT.E_String_Tate 60, 14 + (I - 1) * HH, BAR, RGB(0, 0, 0) '縦書き
' If BAR = "ー" Or BAR = "－" Then BAR = "｜"
' P_PRINT.E_String 60, 14 + (I - 1) * HH, BAR, RGB(0, 0, 0)

(略)

479:デフォルトの名無しさん
09/01/06 17:34:42
>>478
回答ありがとうございます！


480:デフォルトの名無しさん
09/01/06 17:41:48
>>478 さんは
私の神様です！まだ実行してないですが、とにかく嬉しかったので・・・
連投すみません！

481:デフォルトの名無しさん
09/01/07 02:15:27
Google先生に頑張ってもらったのですが見つからないので、力をお貸しください。

VBAでListViewを作成しています。
グリッド表示で任意の行にある項目をダブルクリックした時、それが列の何番目なのかを取得したいのですが
VBAでは上手く出来なくて困っています。
ヒントや方法、解説されているサイトなどがありましたら、教えていただけないでしょうか。
よろしくお願いします。

482:デフォルトの名無しさん
09/01/07 18:06:16
質問です。

コードの中で計算したものを
エクセルに表示したいのですが、どのようにすればいいですか？

483:デフォルトの名無しさん
09/01/07 18:21:45
VB/VBAに限らない簡単なFAQのほうだけ

>>482
Excel側のドキュメント読んで、サンプル探すといい
どのみち、慣れるまではExcel側のドキュメントを読み漁ることになる

484:デフォルトの名無しさん
09/01/08 10:27:19
>>482
URLﾘﾝｸ(chaichan.web.infoseek.co.jp)
このへんで

485:デフォルトの名無しさん
09/01/08 11:05:24
低レベルの質問ですいません。クラスとか、オブジェクト、
インスタンスなどと言う用語の意味が良くわからない
のですが下のような解釈でいい？

Step 1 私のﾀｺ焼き(ｵﾌﾞｼﾞｪｸﾄ：器)の用意をする
Dim 私のﾀｺ焼き(ｵﾌﾞｼﾞｪｸﾄ：器)　As ﾀｺ焼き(ｸﾗｽ：器と具の仕様書)

Step 2　私のﾀｺ焼き（器）に具(ｲﾝｽﾀﾝｽ)を入れ焼く
Set 私のﾀｺたこ焼き(ｵﾌﾞｼﾞｪｸﾄ：器) = New　ﾀｺたこ焼き(ｸﾗｽ：器と具の仕様書)

Step 3 私のﾀｺ焼きに仕事をさせる
私のﾀｺ焼き(ｵﾌﾞｼﾞｪｸﾄ：具の入った器).私に食われる

あと、Step 1～Step 3 において、物理メモリー上で何が起きてん？
領域の確保とか、コピーとか、値の代入とか起きてるような気が
するんですがどうなんでしょう？　それと、各領域の先頭部分
にはヘッダーみたいなのが存在するはずだと思うのですが。

486:デフォルトの名無しさん
09/01/08 12:10:20
すいません、間違えました。
ﾀｺたこ　->　ﾀｺ

487:デフォルトの名無しさん
09/01/08 18:31:21
クラスモジュールひとつ書いてみればいいんじゃね

488:デフォルトの名無しさん
09/01/08 19:43:19
>>485
知能指数が余程高い人は別として、普通の頭の人間がまず抽象的な概念を
先に完全に理解しようとするのは無理がある。

↓辺りの文章をさらっと読んで、とにかく実際にクラスモジュールを使ってみる方がずっと理解が早い。
抽象的な概念はあとから自ずと分かってくるから。
URLﾘﾝｸ(homepage1.nifty.com)

489:485
09/01/08 20:46:44
>>487 >>488
やはり、複雑なことを一足飛びに抽象的に
理解しようとするのには無理があるって事ですね。
紹介していただいたWebページを参考に一つ一つ理解して
いこうと思います。感謝です。

490:デフォルトの名無しさん
09/01/09 15:50:10
ボタンを1回クリックで１増える処理があるとして
ボタンを長く押していると連続して1が増えていくような
処理ってどうやったらできるのでしょうか？
クリックイベントだといったん離さないと次のクリック
イベントが発生してくれませんでした。

491:デフォルトの名無しさん
09/01/09 16:52:09
MouseDown, MouseUpイベント＋Timerとか

492:デフォルトの名無しさん
09/01/09 17:14:07
>>491
やはりTimerですかorz

493:デフォルトの名無しさん
09/01/09 17:38:19
>>483
>>484

ありがとうございます！
早速試したのですが、最初の参照設定からうまくできず、
Excel.Applicationは宣言されていませんとエラーが出てしまいます。

VB2008なのですが…

494:デフォルトの名無しさん
09/01/09 19:16:58
>>493
スレタイ嫁

495:デフォルトの名無しさん
09/01/18 11:01:05
Excelとかの他のオブジェクトを使うことを何て言葉で表現したらいいのか。
「ライブラリを使う」っていうのか、「オートメーションを使う」って言えばいいのか、
そして、あれもCOMと言えるのかな。「COMを使う」って言えばいいのかな。

今は、その適切な言葉の使い方で説明できなくてもどかしいが、VB6のソースはなぜか遅延
バインディング多いみたいだな。何で事前バインディングにしないのか疑問だが。遅延でしか
対応不可能な特別な場合を除いて、原則として事前にしない意味がわからん。単に知識が無い
だけなのか？
理解不能でないように補足しておくと、遅延とは、CreateObjectのことで、事前は参照設定して
専用のデータ型で宣言してNewでオブジェクトを作ることだ。

496:デフォルトの名無しさん
09/01/18 11:30:54
参照設定するのが面倒くさいんじゃないの？知らんけど。

497:デフォルトの名無しさん
09/01/18 12:20:47
>>495
クライアント環境のOfficeがバージョン不定の場合なんかは遅延にせざるをえない



498:デフォルトの名無しさん
09/01/18 12:31:48
まあ理屈としては497の言うとおりなんだけど、
実際は97-2007でほとんどのメソッドは互換性があるんだけどね。

一部動かないメソッドを使うところだけ部分的に遅延バインド（といっても
WorksheetとかWorkbookのインスタンスをObject型の変数にぶち込むだけだが）
するように作った方が、最初から全部遅延バインドで作るより開発効率がいい。

499:デフォルトの名無しさん
09/01/18 12:37:43
遅延バインドだと、動かないメソッドが使えるようになるのか？

500:デフォルトの名無しさん
09/01/18 13:22:44
>>499
愚問過ぎる。

501:デフォルトの名無しさん
09/01/18 14:09:23
>>499
お前勉強しろよ・・・
インテリセンスくらいの差しかない

502:デフォルトの名無しさん
09/01/18 16:51:35
開発時は参照設定してインテリセンスに助けてもらって、最後に直すとかよくやった。

503:デフォルトの名無しさん
09/01/20 13:48:59
この流れだといまさら聞けないんだが、くだすれだから投げてみる
事前バインドっていうのは、いうなれば、コード生成の時点で、
(たとえば、inprocserverなら)vtable呼び出しになっている。みたいなイメージでおｋ？
んで、実行時バインドってのは、typelibみにいって呼ぶみたいな。
だから、実行時バインドなら、理論上、タイプライブラリが替えられちゃっても動く？
(そんなことしょっちゅうあってほしくないけど、まあ、理論上な)

504:デフォルトの名無しさん
09/01/20 14:40:44
ググレカス

505:デフォルトの名無しさん
09/01/22 10:13:58
つれないなあｗ

投稿前にぐぐって、かわりに知ったのは、VBどとねと移行ツールが、
事前バインドになってない個所を指摘してくれるらしい？ってことだった
どとねとは食わず嫌いだが、これはたまに使えるかもしれん

506:デフォルトの名無しさん
09/01/22 19:25:24
VB6のソースをダウンロードして見てみたのですが、
グローバル変数とローカル変数に同じ名前をつけたり、
ループの中にDimで変数を宣言するのって普通のことですか？
URLﾘﾝｸ(www.pccard.co.uk)


507:デフォルトの名無しさん
09/01/22 19:38:27
「シンタックスエラー」以外は普通。

508:デフォルトの名無しさん
09/01/22 19:40:36
ループなどブロック内での変数宣言は禁止にしてることが多いな。
嵌ることがある。VB.NETから意味が変わったし。

509:デフォルトの名無しさん
09/01/23 00:49:38
ｵﾚもブロック内での宣言は絶対しない。
宣言は冒頭にまとめてする事にしている。

510:デフォルトの名無しさん
09/01/23 01:01:38
BASICじゃあるまいしｗｗｗｗ

しまった、VBはBASICか

511:デフォルトの名無しさん
09/01/23 01:10:59
基本的には使う直前に定義すべきだと俺は思うけどね。

「嵌る」というのはループ内の定義箇所で変数の値がデフォルト値に初期化されると
（誤って）期待した場合だと思うけど、それはむしろきちんと明示的に初期化しない
ことの方に問題がある。

あとVB6だと見た目ブロック内スコープに見えても実際のスコープは関数内、
っていうのも仕様としてはいやらしいけど、あまり問題にならんと思う。

512:デフォルトの名無しさん
09/01/23 06:58:10
>>509
こういう頭の固い奴たまに見るけど、何言語出身なの？

513:デフォルトの名無しさん
09/01/23 07:44:10
K&R CかCOBOLだろ

514:デフォルトの名無しさん
09/01/23 08:06:27
goto使う奴は、とか

しまった、VBはBASICか

515:デフォルトの名無しさん
09/01/23 10:49:54
gotoは使わざるえないだろｗ

516:デフォルトの名無しさん
09/01/23 11:40:26
>>511　が全部書いているが、
同じ理由で関数/サブルーチン内の一番外側のブロックでDimすることにしてる。
やらん方がいいのはブロックの中の宣言したものを外で使うこと。
If　...　Then
　　　Dim　x　as　...
End　If
print　x
ブロックの中で配列の宣言やDim　x　As　New　,,,　でオブジェクト宣言はしないこと。
前者はVB.NETでコンパイルエラーになるが、後者はコンパイルは通るが動作が異なる。

517:デフォルトの名無しさん
09/01/23 16:34:27
VB5とVB6の違いは大きいですか？　中古で5の入門書のほうが安かったので。

518:デフォルトの名無しさん
09/01/23 16:49:37
5でも6でも80過ぎの借金だらけのババアと結婚するようなもんだ

519:デフォルトの名無しさん
09/01/23 17:10:44
VB6を持っているならMSDN LibraryにVB6の新機能といった項目がある
一番大きい違いはDB(DAO->ADO)関係かな

520:デフォルトの名無しさん
09/01/23 17:52:44
入門するならﾀｰｹﾞｯﾄに出来るだけ近いものがいい
書いてあることと同じ結果が出ないと無駄な時間を費やすことに　なったりならなかったり


521:デフォルトの名無しさん
09/01/24 00:21:20
>>515
お前エラートラップ限定で使わざるを得ないっていってんだよな？
そうだよな？そうだと言えよ！！！


522:515
09/01/24 00:46:30
>>521
それ以外になにがあるｗ

523:デフォルトの名無しさん
09/01/24 00:53:47
N-88BASIC

524:デフォルトの名無しさん
09/01/24 04:24:35
MS-DOS版N88日本語BASIC(86)

525:デフォルトの名無しさん
09/01/24 12:24:07
VBってなんでエラートラップでon goto にしたんだろうな？
あれさえなければ

526:デフォルトの名無しさん
09/01/24 16:34:01
vb6.0を使用しています。
1つのformに、数値が入力されたtextboxとlabelを複数配置してｔｘｔまたはcsvに保存するものを作っています。
そこで値の入っていないboxを飛ばして保存したいのですが可能ですか？
よろしければヒントお願いします。




527:デフォルトの名無しさん
09/01/24 16:41:00
>>526
そういう風に作ればいいでない？
やりたいことが伝わってこないな。

528:526
09/01/24 17:38:48
言葉足らずで申し訳ないです。
取得してきた数値を表示させるtextboxとlabelのセットが、縦横５×６ぐらいで並んでおり、
フォームデザイン上、表示させる順番が飛び空白ができてしまいます。
そのため保存したものが
　　　　　　　"123","00","","","567","00","",""・・・・
のように間延びするので、どうにかできないかと思い聞きました。

529:デフォルトの名無しさん
09/01/24 17:57:29
>>526
Option Explisit
Dim iFileNo As Integer

Private Sub Command1_Click()'保存ボタン
Dim i As Integer

iFileNo= FreeFile
Open CurDir & "\test.csv" For Append As #iFileNo
For i = 0 To 10 'テキストボックスのコントロール配列が増減の場合は10の値を変更
call check_Hozon(i)
Next i
Close #iFileNo

End Sub

Private Sub check_Hozon(ctlIndex As Integer)’入力チェックと出力
If Text1(ctlIndex),text <> "" Then ’空白の場合は書き込み
Print #iFileNo,Label1(ctlIndex).Caption & "," & Text1(ctlIndex),text
End if
End sub

530:デフォルトの名無しさん
09/01/24 19:23:53
>>529
ありがとうございます。
勉強し直してきます。

531:デフォルトの名無しさん
09/01/24 20:03:17
あ誤字訂正
×Option Explisit
○Option Explicit

×空白の場合は書き込み
○空白じゃない場合は書き込み

似たようなコントロールが並ぶ場合は
コントロール配列を応用してインデックスで関数化する
改行要らなくて横にずーっと列挙するんであれば
Printする前に空白判定してstring型の変数かなんかにくっつける


532:デフォルトの名無しさん
09/01/24 23:50:55
VB6でドットインパクトプリンタで納品書を印字するような用途の場合、
レポート印字につかうActiveXコンポーネントで定番と呼べるものはなんでしょうか？

533:デフォルトの名無しさん
09/01/24 23:53:35
くりりぽ、ActiveReports あたり

534:デフォルトの名無しさん
09/01/25 14:35:17
何でVB6はいつもIntegerで、LongやVbMsgBoxResultなどを使わないソースが蔓延してるのか？

535:デフォルトの名無しさん
09/01/25 14:50:33
>>534
なに？integerだとまずいのか？
コントロール配列で上限超えるような事ないから
integerにしたまでだけど

536:デフォルトの名無しさん
09/01/25 15:18:14
まあそれだったらByteでいいだろうな。

537:デフォルトの名無しさん
09/01/25 15:20:26
.netや他の言語ならIntegerでいいけど。

538:デフォルトの名無しさん
09/01/25 16:35:37
VB６．０詳しい人に質問

form内でのみ（project内ではない）グローバル変数を使いたい場合どうすればいいですか？

539:デフォルトの名無しさん
09/01/25 16:41:24
Cはint型ＯＳに依存するからlong使えって昔習った気がするが

540:デフォルトの名無しさん
09/01/25 16:43:10
>>538
フォームのソースコード1番上にDim ～って宣言すりゃいいんじゃね？

541:デフォルトの名無しさん
09/01/25 16:46:23
>>540
さんくす

542:デフォルトの名無しさん
09/01/25 17:03:36
>>539
それはchar系以外全部同じ。longだって、ところによっては8バイトのものもある。
必要ならint32_tのような型を使う。

543:デフォルトの名無しさん
09/01/25 17:17:20
>int型ＯＳ
意味するところが不明

544:デフォルトの名無しさん
09/01/25 18:08:26
Integerを使う＝VBを理解していない

545:デフォルトの名無しさん
09/01/25 18:40:36
16bitと32bitのOSでintは2バイトと4バイト、longは両方4バイトなのがあったからそれじゃない？

546:デフォルトの名無しさん
09/01/25 18:43:32
64bit　CPUの普及で状況は混沌としてきた

547:デフォルトの名無しさん
09/01/25 19:53:21
違う。もっと簡単なことだ。
Longを返すものをIntegerで受け取ってるものが多い。
それはあまり推奨できないということだ。

548:デフォルトの名無しさん
09/01/25 20:01:22
今、CとVBが混在してない？

549:デフォルトの名無しさん
09/01/25 20:37:47
>>542
なるほどな思わぬところで勉強になったわサンクスコ

550:デフォルトの名無しさん
09/01/25 22:01:15
本当はchar型の大きさも環境に依存するけどな

551:デフォルトの名無しさん
09/01/26 00:05:11
>>533
ありがとう。その二つをチェックしてみる。

552:デフォルトの名無しさん
09/01/26 07:35:09
>>547
確かに
呼び出し時の参照渡しでは型が違うとエラーになるが
戻り値の代入では型が違っても自動変換されるから
気付いてないっぽいのを結構見かけるね

553:デフォルトの名無しさん
09/01/26 12:32:18
俺は変数の最初に型名を入れるように習った
グローバルならPublicのPをつけるように（今思うとPrivateもPだから紛らわしいが）

554:デフォルトの名無しさん
09/01/26 12:59:00
ポーランド記法は今や嫌われるようになってしまった

555:デフォルトの名無しさん
09/01/26 12:59:51
ハンガリアン記法だった。すまそ

556:デフォルトの名無しさん
09/01/26 13:01:31
>>555
モンゴリアンチョップは今でも俺の必殺技！

557:デフォルトの名無しさん
09/01/26 14:42:08
ハンガリー記法って今は嫌われてたんだ

558:デフォルトの名無しさん
09/01/26 22:04:23
>>553
そういう記法でのグローバルはgだろ

というか批判されてるのはシステムハンガリアンだけだよ
アプリケーションハンガリアンは特別には批判されても嫌われてもいない
もちろん否定的意見は存在するが、それはどの記法にも見られるレベルのもの

しかし型付けが弱いVB6や型付けが無いVBSでは
システムハンガリアンだってそれなりに利点があるんだよな

頭の悪い奴は、批判されてる理由も正しく理解しないうちから
周りに載せられて全て一緒くたにして批判するが、
システムハンガリアンも全く利点のない記法ではないからな

559:デフォルトの名無しさん
09/01/26 23:18:30
>538
遅レスだがDimはやめてPrivateにしなされ

560:デフォルトの名無しさん
09/01/27 19:01:52
VisualBasic.5.0　で実行できたプログラムが突然実行できなくなり、実行すると以下のようなエラーメッセージ
が表示されてしまいます。

”0x77fcc7a8"の命令が”0x317e4ebb"のメモリを参照しました。メモリが”written”になることはできませんでした。

プログラムを終了するには[OK]をクリックしてください。
プログラムをデバックするには[キャンセル]をクリックしてください。

と表示されます。


これを改善するにはどのようにすればよいのでしょうか？？

561:デフォルトの名無しさん
09/01/27 19:20:28
>>560
他のPCで試してみて、動かなかったら作った奴に聞けばいい

562:デフォルトの名無しさん
09/01/27 20:09:42
すみません、VBとDLLのインタフェースについて教えてくださいませ。

対象のDLL側の実装は、こんな感じです。

int functionA(unsigned long param1 , int* param2)

param1 は、param2 に指定した int 配列の数をあらわし、関数を動かすと、
param2 で指定したところに数字の配列を入れてくれるようになってます。

んで、VBから、こんな風に定義したんですけど・・・

declare function functionA lib "hogehoge.dll" _
( param1 as long , param2() as long) as long

実行時に「DLLが正しく呼び出せません」でエラーになってしまいます。
DLLのファイル名と、関数のExport名は dumpbin で調べたので合ってるかと。

declare function functionA lib "hogehoge.dll" _
( param1 as long , param2 as long) as long
dim param1 as long
dim param2(10) as long
dim ret as long
param1 = 10
ret = functionA(param1 , varptr(param2(0)))

なんてやっても同じエラーでした。

なんか根本的なところで勘違いしているような気もします。

ご親切な方いましたら教えてくださいませ。

環境は、VB5.0、VB6.0でしか使えない機能が必要ならVB6.0も入れてみようと思って待つ。

563:デフォルトの名無しさん
09/01/27 20:33:34
(BYVAL　param1　as　long　,　param2()　as　long)　as　long　
　~~~~~~~
じゃね？

564:デフォルトの名無しさん
09/01/27 20:47:49
すみません、説明不足でした（＞＜）

declare function functionA lib "hogehoge.dll" _
(byval param1 as long , byref param2() as long) as long

というのと、

declare function functionA lib "hogehoge.dll" _
(byval param1 as long ,byval param2 as long) as long

というのを試して両方とも同じく「DLLが正しく呼び出せません」
というエラーメッセージでした。

565:デフォルトの名無しさん
09/01/27 20:48:05
defファイルでexportしてるか？

566:デフォルトの名無しさん
09/01/27 21:09:51
dumpbinで調べてどう？VB5,　6だと正確にあってないとだめだぞ。
これだと前ハイフンも@8も必要になる。

　1　　　　0　00001000　_functionA@8


567:デフォルトの名無しさん
09/01/27 21:10:06
export 名は、dumpbin ､Dependency walker で確認してますし、
同じDLLの他の関数は使えているので、問題ないとおもいます。

568:562
09/01/27 21:11:23
そういえばここ、書き込みIDないんですね。

564、567は俺の書き込みです

569:デフォルトの名無しさん
09/01/27 21:14:46
VB6だとDLLが見つからないのと、エントリが見つからないのは
それと分かるメッセージになるのだが、VB5でその辺の切り分けはできますか？
両方とも当てはまらないなら、
DLLがさらに別のDLLを必要としていてそれがないということもありえる。

570:565
09/01/27 21:17:32
無視されちった

571:デフォルトの名無しさん
09/01/27 21:19:48
違うdll見てるんだろ、どうせ

572:デフォルトの名無しさん
09/01/27 21:19:51
>>570
それは問題ないです（＞＜）すみません

>>569
そう思って、出鱈目な関数名を alias で指定
したのですが、その場合は「ｴﾝﾄﾘ hoge がDLLファイル
C:\hoge.dll 内に見つかりません。」というエラー
になるので、ｴﾝﾄﾘまでは問題ないかと思います。

573:デフォルトの名無しさん
09/01/27 21:26:10
＞ret　=　functionA(param1　,　varptr(param2(0)))
普通にこれでよくね？
ret　=　functionA(param1　,　param2)

574:デフォルトの名無しさん
09/01/27 21:27:27
__stdcallにしてるだろうな？

575:デフォルトの名無しさん
09/01/27 21:37:50
>>560
COMやVBXの登録がおかしくなってる。
互換のないdllに置き換わってしまった。
などなどのdll　Hellの症状が見受けられます。
再インストールがんばって。

576:デフォルトの名無しさん
09/01/27 21:53:35
PATHが通ってないとか

hogehoge.dllをsystem32に置いてみて

577:デフォルトの名無しさん
09/01/27 22:17:56
pathが通ってなかったらdllが見つからんってエラーになるはず

578:デフォルトの名無しさん
09/01/27 23:20:25
>>534
VB2のサンプルソースをコピペして使うからですよ。
VBMsgBoxResult といえば、プロシージャの成功失敗を
vbOKとvbCabcelで返してるコードも見たことがあります。
みんな意味も分からずカッチョイイから使ってるだけ。
Longなら安心だけどIntegerでもたぶん平気、ちゃんと入力の有効範囲を
意識して型を使い分ける俺って渋いじゃん？ｗみたいな人もいるかもしれません。
そういう人に限って、「500件のレコード処理の進捗率を表示」するのに、
進捗率 = 完了件数 * 100 / 総件数　みたいな阿呆な式を書くんですよ。
もちろん全部最大500だからIntegerで宣言。
せめて割ってからかけろと・・・

579:562
09/01/27 23:25:01
みなさん、ありがとうございます！

__stdcall していなかったのが原因でした（＞＜）
VB.net を導入したところ、当たり前のように動きました。

vb5でのテストで、他の関数で処理が通ったのは、引数
がない関数で試したからのようです。引数のある関数は
vb5 ではダメでしたが、vb.net では動きました。

お騒がせしました。ありがとうございます！

580:デフォルトの名無しさん
09/01/28 00:58:48
まあVB.NETならcdeclでも受け付けるだろうし、間違っていてもある程度何とかしてくれそうだなし。

581:デフォルトの名無しさん
09/01/28 22:53:57
VB6でIE7+activeXのソフトを作成しました
IE側にボタンを設置し、そのボタンを押されたらraiseイベントで
別のhoge.ASPなどを呼び出したりしたいのですが、
OCXをダウンロードした１回目に限りraiseイベントが起こらない
（2回目以降というかC:\WINDOWS\Downloaded Program Filesにファイルがダウンロード済なら問題なし）
様のですがIEの仕様なのでしょうか？


582:デフォルトの名無しさん
09/01/28 22:58:21
なんか KB でそんなんを見た気がする・・・

583:デフォルトの名無しさん
09/01/28 23:26:44
引数や戻り値の型を合わせるためでもなく、オーバーフローの心配が無くても
原則Longがいいだろう。リテラルには&付けることだな。

584:デフォルトの名無しさん
09/01/28 23:29:59
えええ？

585:デフォルトの名無しさん
09/01/28 23:34:58
>>525
MS-BASIC(N-BASIC)時代の名残。何げに30年の歴史がある。
でもON GOSUBに相当する機能ってVBにはないよね？Tryは微妙に違うし。

586:デフォルトの名無しさん
09/01/31 14:28:18
VB6の本には、なぜMS-DOSプロンプトの代わりにDebug.Printでプログラム技術を
教える本が無いのか。

587:デフォルトの名無しさん
09/01/31 18:22:01
意味がわかりません

588:デフォルトの名無しさん
09/01/31 18:34:26
前提（Debug.Printでプログラム技術を教える本が無い）が間違ってるので意味が伝わらない

589:デフォルトの名無しさん
09/01/31 19:29:57
VB6とコマンドプロンプトとプログラム技術の関連性がまったくわからない。

590:デフォルトの名無しさん
09/02/01 15:57:03
エスパー頼む

591:デフォルトの名無しさん
09/02/01 16:13:57
ハードディスクが壊れたので、俺が２年前に作った数キロバイトのコードを
思い出す方法を誰か教えてください。

ネット上のサーバー履歴も、机の上のパソコンの中の履歴も、ちょうど同じ
日に消えてしまいました。

592:デフォルトの名無しさん
09/02/01 16:19:31
面白いと思って書いてるのか知らんが、まったくつまらないから。
もっと他にやることないのかよ惨めな奴だな

593:デフォルトの名無しさん
09/02/01 20:54:02
スレで信頼できるヤツを探して、逆汗してもらうこった
つまり、そんなヤツを探す方法に、この問題は行き着くわけだが
そうすると、VB6の問題じゃないなこれは

594:デフォルトの名無しさん
09/02/01 20:57:29
ハードディスクの内容を復元してくれる業者に頼め。

595:デフォルトの名無しさん
09/02/02 02:03:56
>>593
逆汗って何か分かって言ってんのか？
意味もよく分かってないくせに使うんじゃねえよ

596:デフォルトの名無しさん
09/02/02 07:35:02
ん。exeは残ってるけど、ソースないよ。って話ちがうんか。まあいいか

597:デフォルトの名無しさん
09/02/03 10:38:05
VB6+Microsoft SoapToolkit 3.0でプログラムをしているんだが、
処理中に実行時エラーが発生してしまうんだが、どうしたら出なくなるのか知ってる奴いない？

　実行時エラー '-2147221504(80040000)':
　Connector:Connection time out.

一応、ConnectorProperty("Timeout")は設定している。

598:デフォルトの名無しさん
09/02/03 14:30:47
エラーが出る場合は、再現する最小限のコードを貼れ
話はそれからだ

599:デフォルトの名無しさん
09/02/03 15:09:19
ｿｰｽ編集のｳｨﾝﾄﾞｳでﾏｳｽのｽｸﾛｰﾙをしても画面が動かないのはなぜ？


600:デフォルトの名無しさん
09/02/03 15:17:53
仕様。

601:597
09/02/03 15:31:09
>>598
最低限のコードか・・・
結構長くなりそうだけどいい？

602:デフォルトの名無しさん
09/02/03 16:24:31
>>599
エレコムのマウスユーティリティ（エレコムマウスじゃなくても使える）
をインスコするとVB6のソース画面もスクロールできる
これ豆ｒｙ

603:デフォルトの名無しさん
09/02/03 17:11:37
>>599
>>602でもできるのかもしれないけどこれでも出来る
Visual Basic 6.0 IDE でマウス ホイール イベントが機能しない
URLﾘﾝｸ(support.microsoft.com)

604:デフォルトの名無しさん
09/02/03 17:47:10
>>603
ﾄﾝｸｽです

605:デフォルトの名無しさん
09/02/03 21:08:18
>>603
うおースクロール出来るー、嬉しい ^^
ありがとさんです

606:デフォルトの名無しさん
09/02/06 00:48:14
>>585
ON...GOSUBは6.0まで残されてたね。あくまでレガシー活用目的で、
Select Case に書き換えろ、ってQuickBASICの頃から言われてます。
N(N88)-BASICの頃はON ERROR GOTO のほかにもON KEY(n) GOSUB やON STOP GOSUB
やらがあって、それぞれ3単語で1ステートメント扱いでリファレンスにも載ってた。
QBで数が増えすぎてON EVENT GOSUBと一緒くたに説明されるようになった。
どうしてON ERROR GOSUBにしなかったかというと、GOSUBはRETURNでもどるが
ご存じの通りエラーの時はRESUMEで戻るから「GOSUB」を使いたくなかった。
On Error Resume NextができたのはVBから。以前は10 ON ERROR GOTO 60000
60000 RESUME NEXTと書くしかなかった。
考えたら、あの当時にはエラー処理用ステートメントが用意されていたのは
進んでいたのかもしれない。

607:デフォルトの名無しさん
09/02/06 00:55:14
ちなみに蛇足しておくと
ON KEY(n) GOSUB はファンクションキーn番が押されたらGOSUB
ON STOP GOSUB はPC-9800等過去のPCに付いていたSTOPキーが押されたらGOSUB
Stopステートメントとは無関係ですよ。今ならDoEvents+KeyDownイベントに近いのかなあ。
ほかにも音楽演奏バッファが空いてきたらGOSUBする ON PLAY GOSUBとか
いろいろあった。

608:デフォルトの名無しさん
09/02/06 00:58:43
>>591
大型のハンマーで頭を後ろから思いっきりたたく。
目から壁にソースコードが映写されますよ。

609:デフォルトの名無しさん
09/02/06 01:38:31
自然科学系の出版社勤務ですが、次のアマゾンのレヴューがさっぱり解読できません。
どなたか教えてください。
URLﾘﾝｸ(www.amazon.co.jp)

610:デフォルトの名無しさん
09/02/06 08:04:22
URLﾘﾝｸ(www.amazon.co.jp)
宣伝乙。と思ったら、なんかおもしろそうな文字化けしてるなｗ

でも、VB6はたぶん関係ﾅｶｯﾀ

611:デフォルトの名無しさん
09/02/06 08:15:27
>>601 ナイス回答がある保証はないが、本気なら、うｐすればいいｗ

612:デフォルトの名無しさん
09/02/06 23:47:21
>>601
とりあえずファンクション単位でもいいから
貼れや

613:デフォルトの名無しさん
09/02/07 03:01:22
そこらじゅうにDebug.Print入れて変数の値を調べろ

614:デフォルトの名無しさん
09/02/07 08:26:04
>>597
これ？
URLﾘﾝｸ(www-01.ibm.com)

615:デフォルトの名無しさん
09/02/08 03:22:44
>>587-590
たとえばCならprintf、C#ならConsole.WriteLineやDebug.WriteLineで
コンソールやデバッグに出力するところから基礎を始めることがあるけど、
VBではテキストボックスに出すようなのが多い。それだとコントロール周りの
余計な（そのときの本題と関係ない）知識が必要だし、実業務でも
デバッグをMsgBoxでやっちゃってフォーカスがらみのコード追跡ができないと
嘆くような駄目プログラマが育ってしまう。Debug.PrintやPrint#を使う
習慣を身につけさせるべきだ。

と言いたいんじゃないかと思う。

616:デフォルトの名無しさん
09/02/08 10:17:15
そもそもVB6じゃ標準出力に何か出力できたっけ？

617:デフォルトの名無しさん
09/02/08 14:04:09
デバッグモードで起動すればコンソールに出せるだろ・・・

618:デフォルトの名無しさん
09/02/08 14:44:41
FSOのGetStandardStream使ってもできるし、ほかにも

619:デフォルトの名無しさん
09/02/08 17:05:59
初出の、教えるという観点なら、WScriptオブジェクトとかもいいかもしれん
つかできるかな、できるはずだけど あとでやってみよ

620:デフォルトの名無しさん
09/02/08 18:47:17
editbin　/subsystem:console　hoge.exe
とりあえず野望への一歩。

621:デフォルトの名無しさん
09/02/09 17:54:24
質問です。

ADOとMs標準のDataGridで一覧表を作ってるんですが、
どうしても分割ペイン追加出来ないように出来ないんです。
MSDNには.SplitsのAllowReSizeにfalseセットすれば追加出来なくなる
みたいに書いてあるんですが、サイズ調整が出来ないだけで、
追加されてしまいます。

何か良い方法をご存じの方いらっしゃいませんか？

622:621
09/02/09 18:22:41
自己解決しました・・・

AllowSizingだけじゃなく、SizeModeの設定も必要なんですね・・・


623:デフォルトの名無しさん
09/02/09 19:55:39
乙

624:デフォルトの名無しさん
09/02/10 00:16:22
>>617
具体的な方法を教えてください。

625:デフォルトの名無しさん
09/02/10 02:46:33
参照設定　Windows　Script　Host　Object　Model　(wshom.ocx)

Dim　fso　As　New　FileSystemObject
Dim　txtstm　As　TextStream
Set　txtstm　=　fso.GetStandardStream(StdOut)
txtstm.WriteLine　"helloあいうえお"
txtstm.Close

editbin　/subsystem:console　vbxxx.exe


626:624
09/02/10 10:06:24
>>625
すみません、その方法ではなく>>617の方法が知りたいのです。

627:デフォルトの名無しさん
09/02/10 12:14:19
Debug.PrintはOutputDebugStringとは異なる仕掛けなのでデバッガには出ない。
さらにEXEにする段階でDebug.PrintとDebug.Assertは取り除かれる。

知ったかもあれだが粘着もそれだ、
>>617　は単純にVB6のIDEで動かせばいいといってるだけかもしれんよ。

628:624
09/02/10 12:51:10
つまり、デバッグモードではコンソールに出力できないということでしょうか。

629:デフォルトの名無しさん
09/02/10 13:03:18
VB6のアプリやIDEはコンソールを持ってないから普通は出来ない。
普通じゃなければAPIつかって、AllocConsole/GetStdHandle/WriteConsoleの
流れでできるっちゃできる。

630:デフォルトの名無しさん
09/02/10 20:31:04
VBではやったことないが、AllocConsole,GetStdHandle(API)すごい便利だよ
思ったより簡潔に書ける いっぺんつかってみるべき

631:デフォルトの名無しさん
09/02/10 20:35:23
いい加減、うぜーぞ

632:デフォルトの名無しさん
09/02/10 21:34:43
>>631
>>617さん、ごきげんよう

633:デフォルトの名無しさん
09/02/10 21:45:34
コンソールが何かわかってなかった馬鹿

634:デフォルトの名無しさん
09/02/10 21:49:57
617涙目

635:デフォルトの名無しさん
09/02/10 22:23:54
コンソールに出すくらいなら、ファイルに落とすわ

636:デフォルトの名無しさん
09/02/10 22:26:08
今更になって「printfデバッグってすげーな」と声高に主張しているようで恥ずかしい。

637:デフォルトの名無しさん
09/02/10 22:29:40
実際に適してるかどうかってのは今回あまり関係ない
技術的に可能かどうかって話だから

638:615
09/02/12 00:25:11
すまん、俺がエスパーだったばかりに・・・

639:デフォルトの名無しさん
09/02/12 07:54:34
は？お前のレスなど糞の役にも立ってないわ

640:デフォルトの名無しさん
09/02/12 15:37:44
TextWidthを使ってぴったりに文字幅設定するのって難しいんですかね？
どうしても表示幅が狭くなってしまいます
（とりあえずダミーの空白とか入れてごまかしてはいますが…）

641:デフォルトの名無しさん
09/02/12 19:06:45
>>638
後半は認める

642:デフォルトの名無しさん
09/02/12 22:15:13
質問です
複数のテキストボックスに入力した内容を
ひとつのファイルに入出力させようと思っているのですが
どのような方法でやればいいのか見当付きません
ご教授願います

643:デフォルトの名無しさん
09/02/12 22:33:37
入力と出力を決めないとこっちも困る

644:デフォルトの名無しさん
09/02/12 22:45:39
>>643
すみません…
ええと複数のテキストボックスに入力した内容をひとつのファイルに出力させて
その後そのファイルを読み込んだら複数のテキストボックスが出力した前と同じ内容になるプログラムでした

645:デフォルトの名無しさん
09/02/12 22:53:13
そんなことはわかってる
もう面倒だからXMLにしちゃえよ

646:デフォルトの名無しさん
09/02/12 23:00:50
テキストボックスの内容を後で識別できるように区切り記号(例えばTabとかCrLfとか)を付けて一つの変数にぶち込む
その変数をファイルに書き込む

ファイルを開いて全て一つの変数にぶち込む
変数の最初から区切り記号の一つ前までをテキストボックスにぶち込む
変数の内容を最初の区切り記号+1にして変数が空っぽになるまでループ

ちゃんとやらないと無限ループするから他の方法の方がいいかもしれないが目的は達するからこれでいいんじゃね？
もしかしてコードがほしかった？

次ページ
最新レス表示
スレッドの検索
類似スレ一覧
話題のニュース
おまかせリスト
▼オプションを表示
暇つぶし2ch
4113日前に更新/174 KB
担当:undef