くだすれVB6.0以前（超初心者向け）

1 名前：d mailto:age [2008/03/30(日) 09:01:59 ] このスレッドはVBについて、 他のスレッドでは書き込めない超低レベル、 もしくは質問者自身何が何だか分からない質問を勇気を持って書き込むスレッドです。 VB使いが優しくコメントを返しますが、 お礼はVBの布教はしなくてよいので、初心者の救済をお願いします 前スレ くだすれVB6.0以前（超初心者向け） pc11.2ch.net/test/read.cgi/tech/1165574205/ 267 名前：260 mailto:sage [2008/10/22(水) 23:11:45 ] レス有難う 大幅な仕様変更でシビアなタイミングが求められてきて タイマで誤魔化しきれなくなってきました 2005のC#なら少し使ったことあるので、そっちに移行出来るよう勉強します といっても納期は来週頭なんですが・・・ハハハ orz 268 名前：デフォルトの名無しさん mailto:sage [2008/10/22(水) 23:36:38 ] C#なら解決するとでも思ってるんだろうか 269 名前：デフォルトの名無しさん mailto:sage [2008/10/22(水) 23:42:27 ] 解決するんじゃないあるいは？ 例えば通信とか、機器の制御なんかだとワーカースレッドが使えるかどうかは 雌雄を決する場合があるよ。 270 名前：デフォルトの名無しさん mailto:sage [2008/10/23(木) 22:19:52 ] VB6でまともなマルチスレッドがやりたければ、別スレッドの処理をCで書いたDLL関数からCreateThreadするのが常道。 VBとのスレッド間通信もDLL関数でできる。 Cの知識がなければ無理だが、職業プログラマでまさかCが書けないなんてことはないよな？ 271 名前：デフォルトの名無しさん mailto:sage [2008/10/24(金) 00:16:50 ] などと意味不明なことを口走っており 272 名前：デフォルトの名無しさん mailto:sage [2008/10/24(金) 08:57:00 ] 奥多摩方面に逃走している模様です 273 名前：デフォルトの名無しさん [2008/10/24(金) 11:17:11 ] >>270 時代はJavaだと言うに 274 名前：デフォルトの名無しさん [2008/10/24(金) 11:18:35 ] 軽く1000回以上は説得したけど無駄でした。 275 名前：デフォルトの名無しさん [2008/10/25(土) 23:10:41 ] web情報を一行ずつテキストに取り込む方法教えてください 276 名前：デフォルトの名無しさん mailto:sage [2008/10/25(土) 23:13:02 ] web情報って何ですか？ 277 名前：デフォルトの名無しさん [2008/10/25(土) 23:18:39 ] 馬鹿は黙っててください 278 名前：デフォルトの名無しさん [2008/10/25(土) 23:30:37 ] web情報ってのはブラウザーに表示されている、web内容の意味で使いました。 279 名前：デフォルトの名無しさん [2008/10/26(日) 06:31:55 ] 目覚まし時計を作ってます 現在 dim aa zikoku = Time aa = DateAdd("m", 10, zikoku) Dateaddで正確に時刻が入りません、timeを直接引数にしたりもしましたがダメでした 固定された時間しか無理なのですか？ If aa = Time Then MMControl1.Command = "play" 数時間前はaaに時間が入力できる時がありましたが 同じ時刻のはずなのにif文が反応しませんでした。 マウスをあててみるとaa = "5:30:00" time = 5:30:00とダブルコーテーションのくくりなかったのでこれかなとも思ってます 280 名前：デフォルトの名無しさん [2008/10/26(日) 06:33:03 ] 誰か解決法いただけませんか 281 名前：デフォルトの名無しさん [2008/10/26(日) 06:38:30 ] 時間を=で比べるな 282 名前：デフォルトの名無しさん [2008/10/26(日) 06:48:51 ] いや、分を”ｍ”にしてたこととスピーカのボリュームが０になったました。 すいません、自己解決しました 283 名前：260 mailto:sage [2008/10/26(日) 23:54:30 ] >>270 残念ながら職業プログラマじゃないのです 学生の時ちょこっと齧っただけです 会社に適任者がおらん為、仕事を投げられました まともにプログラムの勉強したいです 284 名前：デフォルトの名無しさん mailto:sage [2008/10/27(月) 00:18:20 ] そのレベルなら外注するか専任にさせてもらうか、また今後どういう方向性で プログラムを扱っていくのか、そのコストは見合うのか、など、言語とかそういうこととは 違うレベルで調整が必要だと思う。頑張ってどうにかしたのはいいけど、評価が 下がるんじゃ嬉しくないっしょ？ 285 名前：デフォルトの名無しさん mailto:sage [2008/10/27(月) 00:43:15 ] 自分も外注に投げたいんですよ本当は だけど計画性０の会社で5秒後に仕様変更発生みたいな感じなので 社内で作れと・・・ 使う機器が1号機ってせいもあるんですが 仕様が全く固まってないので、当面は私が作ることになりそうです しかもそのソフトを100万で売るっつってるんだから始末に終えない・・・ はぁ・・・こんな仕事やりたくねぇ・・・ 286 名前：デフォルトの名無しさん mailto:sage [2008/10/27(月) 01:40:59 ] お前な、成功させようとするからおかしな方向に進んでいくんだよ ばっさりと動かなくさせれば他の道ができていくんだ やれることをやってからぼやけ 287 名前：デフォルトの名無しさん [2008/10/29(水) 00:53:25 ] VB6.0でListView（詳細）についてですが、 ListView1.ListItems.Add のように、行を追加した後で、 ListView1.ListItems(0).Text = "hoge" のように、やってみると、「インデックスが範囲を超えています」 というエラーが出て、文字の値の変更ができません。 本当に初心者の質問ですみません。悩んでいます。 288 名前：デフォルトの名無しさん mailto:sage [2008/10/29(水) 01:08:18 ] >>287 インデックスが１からってことはない？ 289 名前：デフォルトの名無しさん [2008/10/29(水) 01:17:01 ] >>288 できました！インデックスが１からでした！！ 有難うございます。しょうもない（？）ところで2〜3時間食っていて悩んでました！ 290 名前：デフォルトの名無しさん [2008/10/31(金) 00:25:17 ] スロー再生や倍速ができるアプリを作りたいんですがまるでわかりません なんかヒントいただけませんか 291 名前：デフォルトの名無しさん mailto:sage [2008/10/31(金) 12:03:30 ] >>285 どこの田舎の零細企業？ 会社はソフト産業とは無縁でしょ。 よくいるんだよね。 そういうこと言い出す馬鹿。 292 名前：デフォルトの名無しさん mailto:sage [2008/10/31(金) 12:06:42 ] >>290 まずは自分で再生するソフトを作ってみような。 もちろんデータを読み込んで１コマ１コマ表示する処理を自分で書くんだ。 それが出来てから倍速とか考えるべき。 データフォーマットをいじって30fpsってのを60fpsに変更してWindowsMediaPlayerで再生すれば倍速になるけど 音声も調整しないといけなくて、しかも音程が狂うんじゃなかったっけな。 293 名前：デフォルトの名無しさん mailto:sage [2008/11/05(水) 17:13:16 ] VBで何かシステム作って卒業研究にしたいんですがいいアイデアありませんかね？ 294 名前：デフォルトの名無しさん mailto:sage [2008/11/05(水) 17:18:16 ] あるよ！ 295 名前：デフォルトの名無しさん mailto:sage [2008/11/05(水) 21:00:07 ] >>294 教えてくれこのとおりだ or2 296 名前：デフォルトの名無しさん mailto:sage [2008/11/05(水) 23:09:39 ] なんで今からVB6なんだよ？そもそもライセンスが（ｒｙ 297 名前：デフォルトの名無しさん mailto:sage [2008/11/05(水) 23:20:00 ] ライセンスがどうかしたのか？ サポートの話ならわかるが 298 名前：293 mailto:sage [2008/11/06(木) 02:55:47 ] すまんスレタイの超初心者ってのみてここで相談しちまった 299 名前：デフォルトの名無しさん [2008/11/06(木) 22:02:06 ] フォームサイズの最大値が画面の解像度に依存しないようにする方法ってありますか？ 15インチ幅の用紙に印刷する為に印刷内容を載せるフォームを作ったのですが 解像度が低いマシンだとフォームのサイズを小さくされてしまい、 印刷内容が途中で切れてしまいます。 300 名前：デフォルトの名無しさん [2008/11/07(金) 00:34:34 ] VBscriptをつかってHTA上で実行した結果をHTMLへ動的に表示させたいのですがうまく出来ずに悩んでおります。一応VBの部分はちゃんと出来ていることは確認していますが表示が全くダメです。 どなたか教えて下さい。 Option Explicit Dim objAccess Dim objDB Dim objRS Set objAccess = CreateObject("Access.Application") objAccess.Visible = True objAccess.OpenCurrentDatabase("c:\happy\island.mdb") Set objDB = objAccess.CurrentDb Set objRS = objDB.OpenRecordset("SELECT COUNT(*) AS 件 FROM 住所録テーブル") WScript.echo "件数=" & objRS("件数") objRS.Close Set objRS = Nothing Set objDB = Nothing Set objAccess = Nothing 件数をWScript.echoではなくinnerhtmlで表示したいです。 またSQLを("SELECT * FROM 住所録テーブル")にした場合データをレコードセットで抽出し必要なデータを表にして表示をしたいのですが・・・（これもinnerhtmlを使いたい） 301 名前：デフォルトの名無しさん mailto:sage [2008/11/07(金) 00:43:19 ] >>300 www.google.co.jp/search?q=innerHTML 302 名前：デフォルトの名無しさん mailto:sage [2008/11/07(金) 23:12:41 ] パラメータって引数とは違うの？ 303 名前：デフォルトの名無しさん mailto:sage [2008/11/07(金) 23:34:17 ] 時と場合による 304 名前：デフォルトの名無しさん mailto:sage [2008/11/07(金) 23:39:49 ] サンクス 305 名前：デフォルトの名無しさん mailto:sage [2008/11/08(土) 03:06:03 ] おならﾌﾟｰ 306 名前：デフォルトの名無しさん mailto:sage [2008/11/09(日) 12:19:50 ] >>299 ピクセル数が少ないところに全体を表示するなら 縮小しないと出せませぬ。 Imageコントロールはビットマップを縮小表示できます。 FormやPictureBoxにLineやPrintで書いている場合は、 書いたものをビットマップ(IPicture)として取得してImageに出すか、 こんなときのためのScaleWidthやScaleHeightなので、これらを常に 同じ値にして、Twip単位でLineやPrintを使いましょう。 307 名前：デフォルトの名無しさん mailto:sage [2008/11/12(水) 11:09:45 ] Visual Basics 6 Portable めっけた www.plunder.com/Visual-Basics-6-Portable-download-69648.htm makeもできるんですけど 308 名前：デフォルトの名無しさん mailto:sage [2008/11/12(水) 14:27:23 ] >>307 ぷぷｗ 309 名前：デフォルトの名無しさん mailto:sage [2008/11/12(水) 15:55:59 ] >>307 コメント欄が荒れすぎなのでウィルスかなんかかと思ったけど、結局これ何なの？ 310 名前：デフォルトの名無しさん mailto:sage [2008/11/12(水) 16:01:33 ] >>309 ウイルスに決まってんじゃんｗ 311 名前：デフォルトの名無しさん mailto:sage [2008/11/12(水) 16:51:54 ] AVGは反応しなかった。 普通に起動した。 何かが起きたかどうかは知らん。 312 名前：デフォルトの名無しさん mailto:sage [2008/11/13(木) 10:54:38 ] US評価版だろ｡ USBメモリ起動に割ったやつ 313 名前：デフォルトの名無しさん mailto:sage [2008/11/14(金) 16:07:09 ] ベーシックス 314 名前：デフォルトの名無しさん mailto:sage [2008/11/15(土) 18:20:55 ] 社内の情報システム部のようなところで勤務していますが、プログラマーではありません。 そんな私が最近、VB6のコードを調べる必要がありました。 .NETのC++やC#のコードとよく似てるように見えるのですが VB6はオブジェクト指向ではないという理解で正しいでしょうか。 315 名前：デフォルトの名無しさん mailto:sage [2008/11/15(土) 18:29:54 ] 何を持ってオブジェクト指向と定義するかで変わってくるが オブジェクト指向に必要な要素は持っている。 ただ一般的に社内システムレベルのソースがオブジェクト指向ではない可能性は高い。 316 名前：デフォルトの名無しさん mailto:sage [2008/11/15(土) 19:02:54 ] VB6はオブジェクト指向の要素のうちカプセル化を不完全な形で持っているだけで、 継承、多態といった要素を持ちません。つまり>314の認識でほぼ合っていると思われます。 317 名前：デフォルトの名無しさん mailto:sage [2008/11/15(土) 19:11:03 ] オブジェクト指向なんて考え方。Java使ったコボラーの プログラムなどをオブジェクト指向などと呼びたくない。 318 名前：デフォルトの名無しさん mailto:sage [2008/11/15(土) 19:18:37 ] 委譲、包含、インターフェイスといった要素ではダメですか＞OOP 一口でオブジェクト指向といっても、オブジェクト指向プログラミングの他に オブジェクト指向デザイン、オブジェクト指向ユーザーインターフェイス、 オブジェクト指向開発などなどさまざまな概念がそろっております。 319 名前：デフォルトの名無しさん mailto:sage [2008/11/15(土) 19:26:44 ] > 委譲、包含、インターフェイスといった要素ではダメですか＞OOP だめじゃね？ 全部 VB6 でできる。 320 名前：デフォルトの名無しさん mailto:sage [2008/11/15(土) 19:28:07 ] とりあえず、VB6は、Cの構造的プログラミング＋モジュール分割　の書かれ方が多い。 が、フォームのコントローラ関係は、普通にOOだな。 あ、そうそう、下手にOOしてるVB6ひいちゃったら、しねるぞ。 321 名前：デフォルトの名無しさん mailto:sage [2008/11/15(土) 20:10:59 ] OOの定義の問題は置くとしても愚問だね。 仮に結論が出たとして、それを>>314が知ったところでなんの意味があるんだろう。 322 名前：314 mailto:sage [2008/11/15(土) 21:13:10 ] 質問の仕方が下手ですみません。 VB6の言語使用を習得すれば、「オブジェクト指向も知ってます」と いえるのかどうかを知りたかったです。 オブジェクト指向についてはまた別に学習することを考えます。 しかし、オブジェクト指向とは何たるかについては、 本職ではない私にはちょっと難しそうですね・・・ とても参考になりました。 みなさん、ありがとうございました。 323 名前：デフォルトの名無しさん mailto:sage [2008/11/15(土) 21:29:29 ] >>322 > VB6の言語使用を習得すれば、「オブジェクト指向も知ってます」と > いえるのかどうかを知りたかったです。 いえません 324 名前：デフォルトの名無しさん mailto:sage [2008/11/15(土) 21:59:27 ] いくらOOが考え方だとはいえ、さすがにVB6でOO知ってますは無理があるだろ・・・。 VB6なんて最悪言語の代名詞なのに・・・。 325 名前：デフォルトの名無しさん mailto:sage [2008/11/15(土) 22:05:14 ] かといって、Javaも不完全なんだよなー 326 名前：デフォルトの名無しさん mailto:sage [2008/11/15(土) 22:43:44 ] >322 実装重視であれこれつまみ食いするのが結局一番いいんじゃね？ アカデミックに勉強してたらそれだけで一生終わる 327 名前：デフォルトの名無しさん mailto:sage [2008/11/18(火) 13:17:41 ] なるほどオブジェクト指向を学ぶにはVBが最高なんですねー 328 名前：デフォルトの名無しさん mailto:sage [2008/11/18(火) 20:02:59 ] 反面教師としてはいいんじゃね？ 329 名前：デフォルトの名無しさん [2008/11/19(水) 14:51:36 ] はじめまして 早速ですが、現在、VB6.0でAccess97のmdbを使うプログラムを作成しているのですが、 実行時エラー　2147023170（800706be）オートメーションエラーです。リモートプロシャジーコールに失敗しました。 のエラーが、稀に発生します。 プログラムの一部 Public wrkJet As Workspace Public Rundb As Database Set wrkJet = CreateWorkspace("", "admin", "", dbUseJet) Set Rundb = wrkJet.OpenDatabase("c:\xxxxx\xxxxxx.mdb", False) strSql = "" strSql = "Select * From 送信状況マスタ;" Set RecSet = Rundb.OpenRecordset(strSql, dbOpenDynaset) Call CloseRecSet(RecSet) ---------------------------------------------------------------------------------------------------------------------------- Public Sub CloseRecSet(ByRef RecSet As Recordset) On Error Resume Next If Not RecSet Is Nothing Then RecSet.Close <<<<<<<<<<<<<<<<<< この変でエラーになります。 Set RecSet = Nothing End If End Sub ライブラリにMicrosoft DAO 3.6 Object Library を使用しています。 support.microsoft.com/kb/825796/ja に、Access97は、DAO 3.5を推奨とあったのですが、上位互換で問題無いと思っていたのですが、 やはり、DAO 3.5を使用した方が良いのでしょうか？ ご指導をお願い致します。 330 名前：デフォルトの名無しさん mailto:sage [2008/11/19(水) 15:30:25 ] >>329 3.6で出なくなるの？　試すのはわけないと思うが・・・ closeを別ﾙｰﾁﾝにせず同一ﾙｰﾁﾝにしてみるとか 試せることはいろいろあるよね。 331 名前：329 [2008/11/19(水) 16:05:05 ] 説明が少なく申し訳ありません。 現在までの流れは、 �@VB6.0 + DAO3.5 で新規開発 >>> スキャナやFAXソフトを使用でタッチパネルの反応が遅い現象発生 �AEXEを分割して、ActiveX.EXEを導入 >>> タッチパネルの件は解決。mdbが頻繁に壊れる現象発生 �BDAO3.6を導入 >>> mdb破損回数が軽減。エラーを吐いてEXEが落ちる現象発生 となっています。 332 名前：デフォルトの名無しさん mailto:sage [2008/11/19(水) 19:01:55 ] On Error Resume Nextでごまかすのをやめたほうがいいと思うぞね 333 名前：デフォルトの名無しさん [2008/11/19(水) 23:15:35 ] すんません。 VB2008で教えて下さい。 ソリューションエクスプローラーのタブに 「データソース」が表示されなくなっちゃったんだけど どう設定すれば、また表示されますか？ 334 名前：デフォルトの名無しさん mailto:sage [2008/11/19(水) 23:16:58 ] >>333 スレタイ100回読み直せ 335 名前：デフォルトの名無しさん mailto:sage [2008/11/22(土) 21:25:45 ] >>331 じゃあ次はADO導入だな 336 名前：デフォルトの名無しさん mailto:sage [2008/11/23(日) 00:26:37 ] >331 ネットワークドライブにmdb置いて複数クライアントからアクセスしたりしてない? あとリンクテーブルとか。 337 名前：デフォルトの名無しさん [2008/11/24(月) 19:17:31 ] 質問です。 VB6.0でParadoxと言うデータベースを開きたいのですが、 エラーが出て開きません。 Private Sub Form_Load() Dim cn As New ADODB.Connection Dim rs As New ADODB.Recordset cn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\;Extended Properties=Paradox 5.x;Persist Security Info=False" cn.Open rs.Open "ABC", cn, adOpenDynamic, adLockOptimistic, adCmdTableDirect rs.AddNew rs.Close cn.Close End Sub 上記のコードを書いたんですが、rs.Openの行で 「外部テーブルのフォーマットが正しくありません。」 というエラーが出ます。 何が悪いのでしょうか？ よろしくお願いします。 338 名前：デフォルトの名無しさん mailto:sage [2008/11/24(月) 20:22:21 ] Data Sourceがディレクトリに見えるけど、 そういう話ではない？ 339 名前：３３７ [2008/11/24(月) 21:56:14 ] 返信ありがとうございます。 cn.Open までは進んでいるし、ファイル名まで指定すると 「パスが間違っています」と言うエラーが出るので、 Data Sourceはこれであっていると思われます。 340 名前：デフォルトの名無しさん mailto:sage [2008/11/24(月) 22:08:22 ] C:\で接続できる方が不思議じゃね？ 「Paradox　ConnectionString」で検索しる 341 名前：デフォルトの名無しさん mailto:sage [2008/11/24(月) 23:32:52 ] > rs.Open "ABC", cn, adOpenDynamic, adLockOptimistic, adCmdTableDirect これを rs.Open "select * from ABC", cn みたいにシンプルにしてみたら？ 342 名前：３３７ [2008/11/25(火) 00:28:03 ] >>340 今回はC:\の直下にファイルをおいてあるので、これで いいと思います。 Paradoxは１ファイル１テーブルなので、こうしないと 接続出来ません。 >>341 試してみましたが、やはり「外部テーブルのフォーマットが正しくありません。」 のエラーが出てしまいます。 343 名前：デフォルトの名無しさん mailto:sage [2008/11/25(火) 08:50:02 ] 断言できるのか？ ネットの事例じゃ軒並みファイルしていしてるぞ？ 344 名前：デフォルトの名無しさん mailto:sage [2008/11/25(火) 09:03:22 ] 1ﾌｧｲﾙ1ﾃｰﾌﾞﾙと　ﾙｰﾄ指定とは次元が違いすぎるわな どのﾌｧｲﾙかを選択するのかは超能力的なﾊﾟﾜｰが必要なのかも試練 345 名前：329,331 [2008/11/25(火) 16:56:58 ] 回答有難う御座います。 返答が遅れた事をお詫び致します。 >>335 確かにADOは考えました。しかし、大きな修正はしないでとの営業の意向がありまして。 断念致しました。 >>336 ネットワークドライブは使用していません。 ｍｄｂのリンクは行っています。 346 名前：デフォルトの名無しさん mailto:sage [2008/11/25(火) 17:08:56 ] >>340 そのワードでググったらTOPのページにこんな記載が。 >Please note that you should only specify the folder where the database resides. >Not the database name itself. ttp://www.connectionstrings.com/?carrier=paradox >>337 Paradoxのバージョン5までしか読めないらしいけどそこは大丈夫？ 347 名前：デフォルトの名無しさん mailto:sage [2008/11/25(火) 17:24:07 ] >>346 へぇそうなんだ　ためになるねぇ　つかうことないだろうけど・・・ 348 名前：デフォルトの名無しさん mailto:sage [2008/11/25(火) 21:08:19 ] すみません、こちらで質問させて下さい Exceｌ VBAでwebページをIEオブジェクトで操作して、リンクをクリックさせると別窓でリンク先が表示されます 今後この別窓のIEオブジェクトを掴んでアクティブにして操作するにはどうすればいいのでしょうか？ 独学文系のなけなしの知識にて、ウィンドウハンドルを取得すればいいと思い当たり For Eachで各ウィンドウのそれの取得だけはできました(たぶん)が、使い方というかセオリーが全く分かりません… Private Declare Function SetForegroundWindow Lib "user32.dll" (ByVal hWnd As Long) Private Declare Function GetForegroundWindow Lib "user32.dll" () As Long (中略) hWnd = GetForegroundWindow Set objShell = CreateObject("Shell.Application") 　For Each objIE In objShell.Windows 　　Debug.Print objIE.hWnd 　Next ウィンドウハンドルの値は取得できても、アクティブにしたい(操作したい)ウィンドウのそれだと判別する 方法が解らないので、どなたかご教示＆ご解説お願いします 349 名前：デフォルトの名無しさん mailto:sage [2008/11/26(水) 21:43:48 ] >>348 ウィンドウの区別は基本的にはタイトル(タイトルバー)の文字列で行う。 同じアプリを複数開いて同じファイルを開くとタイトルバーの文字列がまったく同じになってしまうが、 この場合はウィンドウを区別するのは、不可能ではないが非常に難しい。 俺の知識で答えられるのはここまで。 350 名前：デフォルトの名無しさん mailto:sage [2008/11/26(水) 21:55:08 ] つか、LocationUrl でいいだろ？ その InternetExplorer の hWnd で、 SetForegroundWindow() すれ。 って、それだけだとアクティブにはならんけど。 351 名前：348 mailto:sage [2008/11/26(水) 22:12:32 ] >>349 ご回答ありがとうございます！となると、思いつきでは 1).新しいIE窓を開く前に全部のIE窓のタイトル又はハンドルを取得 2)上記を配列にでも入れる 3)新しいIE窓が開かれる 4)2で取得した配列の添え字と比較、大きかったらダウト 　(同じ内容であってもこちらを弄るようにする) 4の配列の添え字の比較って出来るのかな？ド素人なもので… って、窓数の増加だけならインデックスの上限値を見ればいいのか …こんな感じで行けるのかな？ 汎用化するにはIEのイベントを監視しなくちゃならなそうですが(;´Д｀) しかし用途を限定すれば何とかできる…と思いたいです 352 名前：デフォルトの名無しさん mailto:sage [2008/11/26(水) 22:23:49 ] 最初に聞いたExcelVBAスレの質問取り下げてないのでマルチだし しかもExcel総合スレにまでリンク形式でマルチしてる > ExcelやExcel VBAからは外れる質問とは承知しているのですが、 > 文系独学なうえ近くに教えを請える人も居ないので、 > 何方か親切な方、ご回答お願いします…(;´Д｀) > > ttp://pc11.2ch.net/test/read.cgi/tech/1206835319/348 もう、この子は放置の方向で 353 名前：デフォルトの名無しさん mailto:sage [2008/11/26(水) 22:29:05 ] >>352 取り下げも何も、誘導も無しにスレ違いの一言で一蹴されましたが… ご回答下さいました方々には改めてお礼申し上げます 354 名前：デフォルトの名無しさん mailto:sage [2008/11/26(水) 22:29:58 ] まだマルチが悪いとか思ってるウブな奴っているんだなw 俺的に言えばそんな奴こそいらん。 マルチが悪いって、それって他でもないお前が「人に感謝されたい威張りたがり屋」 なだけじゃんw むしろそのお前の幼児性こそ問題だよ。 普通は掲示板のやり取りなんて答える方も自分のためにやってるわけで、 その上回答者に感謝されたいなんて図々しいこと思わねえよ。 355 名前：デフォルトの名無しさん [2008/11/27(木) 01:17:14 ] ユーザー定義型の質問なのですが、 Public Type AAA b as Long c as Long End Type Public A(0 To 99) As AAA といったようなのをモジュールに書き、フォーム1でA(0).b = 100と書いたとします しかし、それをフォーム2で参照したところA(0).b = 0となっていました 配列化しなければ問題は起こらなかったのですが、原因は何なのでしょうか？ 356 名前：デフォルトの名無しさん mailto:sage [2008/11/27(木) 02:22:28 ] ふつうに動いてるが？ 357 名前：デフォルトの名無しさん mailto:sage [2008/11/27(木) 09:07:18 ] >>354 ボク、何か嫌なことでもあったの？ 358 名前：デフォルトの名無しさん mailto:sage [2008/11/27(木) 11:14:38 ] 使用するosをXPからVistaに移行したところ、矢印の「dumst」部分で インデックスが有効範囲にない、というエラーが出てしまいます。 アドバイスお願いします。 Private Sub Form_Load() Const DataFile1 As String = "emadr.txt" noTA = 0: noID = 0: noFA = 0: noSMTP = 0 fileNum = FreeFile Open DataFile1 For Input As #fileNum Do Until EOF(fileNum) Line Input #fileNum, dummy → dumst = Split(dummy, ",") If (dumst(0) = "TA") Then noTA = noTA + 1 emTA(noTA) = dumst(1) End If Loop Close #fileNum 359 名前：デフォルトの名無しさん [2008/11/27(木) 18:13:33 ] >>356 普通にいけました… 消したと思っていた変数定義が消えておらず、変数がリセットされていただけでした お騒がせしました 360 名前：デフォルトの名無しさん [2008/11/28(金) 22:55:15 ] VB6でFTPでの転送結果（スループット等）を取得する関数とかあるのでしょうか？ 361 名前：デフォルトの名無しさん mailto:sage [2008/11/28(金) 23:27:26 ] あると思うほうが不思議だが？ 362 名前：デフォルトの名無しさん mailto:sage [2008/11/28(金) 23:32:46 ] 絶対に無いと確信するほうが不思議 363 名前：360 mailto:sage [2008/11/28(金) 23:50:40 ] >>361-362 回答ありがとうございます。 やはり無いんですね・・・ ファイル転送量/時間で出そうと思います。 ありがとうございました。 364 名前：デフォルトの名無しさん mailto:sage [2008/11/29(土) 12:43:32 ] >362 んなこたぁない。FTP(クライアント)はVBの機能じゃないんだぜ？エスパーすればINet系関数だろうが、 あれは腐ってるからな。 365 名前：デフォルトの名無しさん mailto:sage [2008/11/29(土) 14:59:29 ] VB用のコンポーネントにあったって不思議じゃない 366 名前：デフォルトの名無しさん mailto:sage [2008/11/29(土) 17:01:16 ] コンポーネントなら関数とかいわんだろ。 367 名前：デフォルトの名無しさん [2008/11/29(土) 18:20:45 ] お願いします。 構造体の入れ子を作りたいのですが、下記ではエラーになってしまいます。 Private Type ABC i As Integer j() As ABC End Type 動的なツリー構造を作りたいのですが、可能でしょうか。

---

---

[ 続きを読む ] / [ 携帯版 ]

read.cgi ver5.27 [feat.BBS2 +1.6] / e.0.2 (02/09/03) / eucaly.net products.
担当:undef