VBプログラマ質問スレ（6.0以前） Part55

1 名前：デフォルトの名無しさん [2009/07/13(月) 21:12:36 ] ここは Visual Basic 〜6.0 の質問スレです。 質問者は使用しているOS、VBのバージョン、サービスパックのバージョン、 「何がしたくて、どうしたけど、どう困っているのか」を明確に書きましょう。 VB.NETは別物なので専門スレで、VBA、APIの質問もそれぞれのスレで。 ○ 質問者の心得 　一．質問する前にMSDNやGoogle、過去ログにも目を通してみる。 　二．VBScript、インストーラーなどはこのスレでＯＫ。 　三．質問は第三者にもわかりやすいよう簡潔かつ具体的に。 　四．荒らしは相手しない。 ○ 回答者の心得 　一．答えられない質問は無駄に罵倒せずスルー。無理するな。 　二．代用法を強制しない。 　三．回答する上で必須ではない情報をむやみに聞き返さない。 　四．荒らしは相手しない。 　五．VB情報募集中。 　六．回答は質問者が理解できるよう具体的に。 MSDN Online Japan ホーム 　www.microsoft.com/japan/msdn/default.asp Visual Studio 6.0 Service Pack 6 　msdn.microsoft.com/vstudio/downloads/updates/sp/vs6/sp6/default.aspx Google 　www.google.co.jp/ ※「まず自分で調べる」クセを身につけよう。 2 名前：デフォルトの名無しさん mailto:sage [2009/07/13(月) 21:18:47 ] しかし会社のソースの保守くらいしか使ってる人いないんだろうな 新人で6を覚えなきゃいけない人っているの？ 3 名前：デフォルトの名無しさん mailto:sage [2009/07/13(月) 21:52:21 ] 半年前から使い始めた。苦痛だった。 もうつかわんけど。 4 名前：デフォルトの名無しさん mailto:sage [2009/07/13(月) 22:07:39 ] もったいない 5 名前：デフォルトの名無しさん mailto:sage [2009/07/13(月) 23:15:18 ] 厨房の時に英単語を覚えるためのプログラムとか作って遊んでたよ。 なつかしい。 6 名前：デフォルトの名無しさん mailto:sage [2009/07/13(月) 23:46:53 ] 行番号もしらない若造がなにお 7 名前：デフォルトの名無しさん mailto:sage [2009/07/13(月) 23:49:29 ] VB6ってたしか行番号つけられるんだっけ RENUMなどは無かった気がするけど 8 名前：デフォルトの名無しさん mailto:sage [2009/07/14(火) 13:49:32 ] Z 9 名前：デフォルトの名無しさん mailto:sage [2009/07/14(火) 22:25:50 ] いまだに.NET以降のよさがわからない 10 名前：デフォルトの名無しさん mailto:sage [2009/07/14(火) 22:28:41 ] 時代が変わっただけだ。 都合で他言語と統合しただけで良いとこなんてねぇよ。 11 名前：デフォルトの名無しさん [2009/07/15(水) 21:09:10 ] VB.NETは失敗作 過去にしがみついた奴らのせいだ 12 名前：デフォルトの名無しさん mailto:sage [2009/07/15(水) 21:46:36 ] ＶＢ６に変わるものってアルの？ ってかＶＢ６使わないとしたら何を使えばいいの？swing? 13 名前：デフォルトの名無しさん mailto:sage [2009/07/15(水) 21:51:25 ] ABかC#だろJK 14 名前：デフォルトの名無しさん [2009/07/15(水) 21:55:04 ] ＡＢってなにあぼーん？ 15 名前：デフォルトの名無しさん mailto:sage [2009/07/15(水) 22:15:43 ] ActiveBasicだろJK 16 名前：デフォルトの名無しさん mailto:sage [2009/07/15(水) 22:29:21 ] ABも終わった言語・・・ 17 名前：デフォルトの名無しさん mailto:sage [2009/07/15(水) 23:17:11 ] 始まってすらいないが 18 名前：デフォルトの名無しさん [2009/07/20(月) 00:37:44 ] VBスレも終わってしまいそうです・・・ 19 名前：デフォルトの名無しさん [2009/07/21(火) 17:01:14 ] >>9 ADO.NET はよくね？ 20 名前：デフォルトの名無しさん [2009/07/21(火) 18:40:07 ] VBScriptで質問があります。指定されたフォルダの中にある指定された拡張子のファイルのパスを取得する（１ファイル）処理を行いたいのですが、 ==VBSファイル記述開始== （略） TSSearchFolder = "D:\" （略） FileList = Fso.GetFolder(TSSearchFolder) For Each strFile In FileList.Files strName = strFile.Name outLogFile.WriteLine(Date&" "&Time&" "&strName&" をチェックしています") If UCase(Right(strName, 3)) = ".TS" Then SearchedTS = TSSearchFolder&strName outLogFile.WriteLine(Date&" "&Time&" フォルダ検索によりtsを捕捉しますた（・∀・）") outLogFile.WriteLine(Date&" "&Time&" 　→　"&SearchedTS) End If Next If SearchedTS = Nothing then outLogFile.WriteLine(Date&" "&Time&" tsを捕捉できなかったお・・・（´；ω；｀）ブワッ") outLogFile.WriteLine(Date&" "&Time&" プログラム終了") outLogFile.WriteLine("　") outLogFile.Close() WScript.Quit End If （略） ==VBSファイル記述終了== この作業でログファイルに書き込まれたのは、 2009/07/20 16:13:22 をチェックしています 2009/07/20 16:13:22 tsを捕捉できなかったお・・・（´；ω；｀）ブワッ 2009/07/20 16:13:22 プログラム終了 のみ・・・orz ttp://blog.livedoor.jp/akf0/archives/51369357.html　のページやその他サイトをぐぐっても見あたらず FileList = SearchFolder(TSSearchFolder)　 For Each strFile In FileList　としても同じ結果でしたorz どなたか解決策ご教授お願い致します・・・orz 21 名前：デフォルトの名無しさん mailto:sage [2009/07/21(火) 20:26:20 ] >>20　適当にレス。 突っ込み1　&strName&" をチェックしています" 　→「strName&」 は間違いかも(変数接辞や数値接辞の&はLong型の暗黙の宣言子)。正しくは「strName &」 突っ込み2　SearchedTS = Nothing then 　→上で文字列を代入しているか何も入っていないのでObject型にはならないと思う。(期待する値も文字列型でしょうからそもそも間違い) 　そのため比較式の答えは常にFalseになるでしょう。正しくは「SearchedTS = "" then」または「SearchedTS = vbNullString then」 突っ込み3　FileList = Fso.GetFolder(TSSearchFolder) 　→先頭にSetが抜けてます。これだとデフォルトのプロパティであるNameの値つまり文字列型の"D:\"が入る気がする。 突っ込み4 ひとつ見つかればいいなら見つかったあとループを中断すべき。 　→Exit For を追加。 22 名前：20 mailto:sage [2009/07/22(水) 18:30:28 ] >>21 ありがとうございます！！ 的確な即レス、痛み入ります。 ご指摘の通りでした。おかげで無事、人生初のプログラムが組むことがました。 初歩的な欠陥にもアドバイスいただけて感謝です。 23 名前：デフォルトの名無しさん mailto:sage [2009/07/22(水) 20:35:11 ] いえいえ。 つか初のプログラムだったの？ｗ ならレスの説明はちょっと省略しすぎてわかりにくかったね。 ごめんな。 24 名前：デフォルトの名無しさん mailto:sage [2009/08/08(土) 14:03:06 ] 酒井法子ファンの酒井法雄氏はどうしてるんでしょうか 25 名前：デフォルトの名無しさん [2009/08/09(日) 13:19:35 ] VBで質問なのですが、 文字コードの変換ツールをVB作成しているのですが。 その文字が改行コードであるかどうか、という判定文を作りたいのですが、 どのようにすればよろしいのでしょうか。 よろしくお願いします。 26 名前：デフォルトの名無しさん [2009/08/09(日) 14:08:45 ] 元のファイルの仕様によるけど、CRLFかCRかLFであれば改行コードでいいんじゃない？ アスキーモードで開けばCRLFとCRは自動で処理してくれるしLFの時だけバラせばOKかな 27 名前：デフォルトの名無しさん mailto:sage [2009/08/09(日) 16:16:20 ] >>25 何をどうしたいのかよくわからん。 対象の文字コードは何で、どこから持ってきてどうしたいんだ。 相手はファイルなのか？どっかから得たデータなのか？ >>26のレスで満足ならいいけど。 28 名前：デフォルトの名無しさん mailto:sage [2009/08/13(木) 19:31:30 ] 非アクティブの無題のメモ帳にコピーしたものを貼り付けるだけのスクリプト。 Set objWshShell = CreateObject("WScript.Shell") objWshShell.AppActivate "無題" objWshShell.SendKeys "^{V}",True objWshShell.SendKeys "{ENTER}",True たまに(5回に1回くらい)コピーされないことがあるんですが、 なんでかわかりますか？ ご教授願いますm(__)m 29 名前：デフォルトの名無しさん [2009/08/13(木) 20:24:32 ] 貼り付けタイミング間に合わないことある なんとかウエイトを入れて試すよろし 30 名前：28 mailto:sage [2009/08/13(木) 22:05:07 ] >>29 レスサンクス！ Sleep 10 をAppActivateとSendKeysの間に入れたら直りました！ AppActivateの検索が間に合ってなかったのかな？ ありがとうございましたm(__)m 31 名前：デフォルトの名無しさん mailto:sage [2009/08/14(金) 13:12:08 ] vb6でmicrosoft tablet dialog control 6.0を導入したいのですがどうすれば良いでしょうか？ SP6をインストールしたができませんでした 32 名前：デフォルトの名無しさん mailto:sage [2009/08/16(日) 01:39:57 ] 全部ここに書いてあるんじゃないのか？ ttp://msdn.microsoft.com/ja-jp/library/ms840462.aspx 33 名前：デフォルトの名無しさん mailto:sage [2009/08/16(日) 01:41:02 ] あとこのように書いてあるぞ。 ＞　注 Visual Basic 6 で PenInputPanel を参照して使用するには、 ＞　Microsoft Windows XP Tablet PC Edition がインストールされたコンピュータで開発を行う必要があります。 34 名前：デフォルトの名無しさん [2009/10/13(火) 01:38:08 ] ネタがねえなあ 35 名前：デフォルトの名無しさん mailto:sage [2009/10/13(火) 10:46:43 ] フォームの大きさをデスクトップのフォントサイズの倍率を変えても固定にするにはどうしたら良いんですか？ 36 名前：デフォルトの名無しさん mailto:sage [2009/10/13(火) 13:20:05 ] >>35 >デスクトップのフォントサイズの倍率を変えても ディスプレイの解像度を変えてもという事ですか？ なら元のフォームサイズ(最小の)に、 スクリーン毎の倍率を掛けたら良いと思います。 37 名前：デフォルトの名無しさん mailto:sage [2009/10/13(火) 15:01:36 ] デスクトップのフォントサイズの倍率は、ディスプレイの解像度とは別ですよ 38 名前：デフォルトの名無しさん mailto:sage [2009/10/13(火) 15:11:57 ] １倍時のサイズをコードに数値として埋め込んでおき、ForcCreate時にイメージを除く可視コントロール全てに倍率を掛ける。 forかwhileで可視コントロール総当たりでリサイズ。 で良いのかな。 本当はFormCreate部が勝手にリサイズするところをキャンセルさせるんだろうけど。 コードはよく判らない。 39 名前：デフォルトの名無しさん mailto:sage [2009/10/13(火) 20:06:18 ] 普通にScaleModeをpixelにしてデザインしたらダメだっけ？ まあそれでも自動スケーリングが働くなら、ScaleModeをpixelにしてさえいれば Formのサイズの単位はピクセルではあるはずだから、コードでサイズを強制すれば いいだけのはずだと思うが。 もうVB触らなくなって久しいから自信ないけど。 40 名前：デフォルトの名無しさん mailto:sage [2009/10/14(水) 11:15:42 ] ScaleModeを変えても設計の単位が変わるだけみたいですね 41 名前：デフォルトの名無しさん mailto:sage [2009/10/22(木) 20:28:33 ] ちょっくらVBの勉強を始めようかと思い立ち本屋を数軒回ったんだけど 以前は結構置いてあったはずのVB関係の書籍期がほとんど消えていた。 代わりにC++の本が増えていた。 もしかしてVBって無くなるとか？これから勉強してもムダになる？ 42 名前：デフォルトの名無しさん [2009/10/22(木) 20:33:34 ] VB6はいまさら覚えるものではない やるんだったらC#かVB.NET 43 名前：デフォルトの名無しさん mailto:sage [2009/10/22(木) 20:40:44 ] これを買おうかと思ってたんだけど、上の理由でちょっと？と思って帰ってきた。 ttp://ec.nikkeibp.co.jp/item/books/A00800.html 代わりにC++の本が増えていた。→C#？ >C#かVB.NET 入門から実用レベルまで勉強できそうなお勧めの参考書があれば教えてください。 44 名前：デフォルトの名無しさん mailto:sage [2009/10/22(木) 20:44:05 ] VB6って　Visual Basic 6.0のこと？ Visual Basic 2008はVB.NETでいいのかな？ ASP.NETをちょこっとかじったので、Visual Basic 2008をきっちり勉強しようかと思って居るんだけど C# 3.0をやった方が役に立つのかな？ 45 名前：デフォルトの名無しさん mailto:sage [2009/10/22(木) 21:20:03 ] VB6だったら古本屋をあたったほうが早い 46 名前：デフォルトの名無しさん mailto:sage [2009/10/22(木) 21:47:59 ] VB6ではなくて、Visual Basic 2008の勉強と言ってるのですが。 それで本屋さんを当たったら参考書が激減していたので、何か事情があるのかな？ と思ったわけですが・・・ 47 名前：デフォルトの名無しさん mailto:sage [2009/10/22(木) 21:53:21 ] Visual Basic 2008ならスレタイを良く見直そう。 48 名前：デフォルトの名無しさん mailto:sage [2009/10/22(木) 21:57:42 ] >>46 バカじゃねーの？ 49 名前：デフォルトの名無しさん mailto:sage [2009/10/22(木) 22:00:21 ] 6.0以前ガ━━━(　ﾟдﾟ ；)━━━ン 50 名前：デフォルトの名無しさん mailto:sage [2009/10/23(金) 01:11:42 ] msdn.microsoft.com/ja-jp/vbasic/cc707268.aspx Windows7でも一応VB6をサポートするんだな まぁ、VBAが繁殖し過ぎてしまって切るに切れないのかねぇ 51 名前：デフォルトの名無しさん mailto:sage [2009/10/23(金) 15:08:41 ] 初心者スレから、移動してきました。 リストビューのカラムヘッダの区切り部分を ダブルクリックすると、オートフィットしますが、 これをプログラムから行うにはどうすればいいのでしょうか？ HDN_ITEMDBLCLICK というのをを使うようですが、 それがなんなのか良くわかりません・・・。 52 名前：デフォルトの名無しさん mailto:sage [2009/10/23(金) 18:09:23 ] くだすれ >>991 >>994 ありがとうございます。 ようやく挙動の違いなどが理解できました。 53 名前：デフォルトの名無しさん mailto:sage [2009/10/23(金) 23:10:17 ] >51 つ LVM_SETCOLUMNWIDTH、LVSCW_AUTOSIZE 54 名前：デフォルトの名無しさん [2009/10/27(火) 21:21:51 ] Win7 pro 64bit版をインストールして色々VB6で作ったアプリを試していたのですが、 アプリAで「d:\test\」フォルダに大きいファイルを書き出し中に アプリBで一定間隔で「d:\test\」フォルダのサイズをfilesystemobjectまたはfilelenで 取得しようとしたところ、最新の正しいファイルサイズが取得できず困ってます。 アプリA・B実行中に「d:\test\」をエクスプローラで開き、F5を押すとその時だけ ファイルサイズが取得できました。 それとXPでは大丈夫でした。 何かいい方法ないでしょうか？ 55 名前：デフォルトの名無しさん mailto:sage [2009/10/27(火) 21:36:34 ] >>54 質問するときは情報は正確に書くのが基本。 問題が起こってるのは本当に"d:\test" ？ 違うでしょ？ 56 名前：54 mailto:sage [2009/10/27(火) 21:49:04 ] >>55 「d:\test」以外のフォルダ、ドライブでも同様の現象がおきます。 57 名前：デフォルトの名無しさん [2009/11/04(水) 15:30:29 ] 質問です。知恵を貸していただきたいです。 visual basic 6.0で作られているプログラムを海外でも使用する事になり その際に日本語と外国語、両方表示できるように改修する事になったのですが visual basic 6.0の標準のオブジェクトでは外国を表示できないという事がわかり microsoft forms 2.0 object libraryのコンポーネントを使用して外国語を表示する事になりました。 そこで実際に上記のコンポーネントを使用してラベルを貼り付けてAutoSizeをTrue、WordWrapをTrueにして 外国語を表示させてみたのですが、表示は出来るのですが元のラベルの大きさからはみ出る文字数を表示させようとした 場合に表示がおかしく(文字を縮小して全体を表示させている？)なってしまいます。 これをなんとかVB6標準のラベルと同じような動きにする方法はないでしょうか？ （はみ出る文字数が入力された場合は自動で横幅が増える） 58 名前：デフォルトの名無しさん mailto:sage [2009/11/12(木) 16:27:44 ] 質問です Commandボタンを押すとある作業を永遠にループするプログラムを 作ったのですがそのループをとめる方法が分かりません。 あるキー入力をする（例えばESCキー）を押すと作業を止めるように設定したいのですが 思いついたやり方がループの記述内にいくつもGETASYNCKEYSTATEで確認するという あまりにも汚いやり方だったので、別のやり方があるならば是非教えてください。 もちろんデバッグ中であればctrl+breakで止まりますがそれだとプログラムとしては全く 使い物にならないのでどなたかご教授お願いします。 59 名前：デフォルトの名無しさん mailto:sage [2009/11/13(金) 02:32:29 ] doeventを適当なところにはさんでおいて、cancelボタンが押されたかどうか調べる。 60 名前：デフォルトの名無しさん mailto:sage [2009/11/14(土) 18:58:30 ] >>59 ループが結構長いのですがそうするとかなり重くなってしまいませんか？ timerinterval1に設定してキー入力を確認させたりするよりはマシだとは思いますが 61 名前：デフォルトの名無しさん mailto:sage [2009/11/14(土) 22:08:45 ] 58ですが新たな問題が出ました フォームのkeydownでQuitChk = 1となるようにして ループのWait内にQuitChk = 1ならループを終了させるようにしたいのですが プロシージャーをまたいでEndSubに送る方法ってあるのでしょうか？ 通常ならループ内に If QuitChk = 1 then goto End1 ....... End1: End Sub でいいはずなのですが、Ifをループ内のあちこちに大量に記述するのが気がひけるので すでに大量にあるWaitの中にループからEnd Subに飛ばすイベントを作ろうと 思ったのですがやり方がわかりません 62 名前：デフォルトの名無しさん mailto:sage [2009/11/14(土) 22:15:32 ] あるわけねーだろﾊｹﾞ 63 名前：デフォルトの名無しさん mailto:sage [2009/11/14(土) 23:56:02 ] LabviewをVBに変換するソフトなどありませんか？ 64 名前：デフォルトの名無しさん mailto:sage [2009/11/16(月) 00:54:23 ] キー入力をフォームがアクティブウィンドウではないときでもフォームが 受け取ってくれるようにするにはどのように記述すればいいのでしょうか？ 65 名前：デフォルトの名無しさん mailto:sage [2009/11/16(月) 00:58:57 ] DXとかタイマー＆APIとかサブクラスとか 66 名前：デフォルトの名無しさん mailto:sage [2009/11/16(月) 01:28:42 ] ローレベルフック。って、VB6 でも使えたよな。 67 名前：デフォルトの名無しさん mailto:sage [2009/11/19(木) 02:37:56 ] >>65-66 分かりました 調べてみます 68 名前：デフォルトの名無しさん mailto:sage [2009/11/20(金) 00:45:17 ] WebBrowserでVB側からActiveXやスプリクトの実行を止めるの はやはり無理ですか。Webで検索しても成功例もなさそうですし。 もし可能ならヒントだけでもお願いします。 69 名前：デフォルトの名無しさん mailto:sage [2009/11/20(金) 01:34:15 ] にちゃんねるブラウザのように htmlを取ってくる->htmlを加工していらないとこは削除->WBで表示 って感じでできるんじゃない？ めんどくさそうだしやったことないけど 70 名前：デフォルトの名無しさん mailto:sage [2009/11/20(金) 01:48:26 ] Donut系のIEコンポブラウザは任意にスクリプトやActiveXコントロールの実行のオンオフを切り替える機能を持っている。 そいつらはC++製だけど、WebBrowserのインタフェースはC++にできてVBでできないことはないはずだから、可能だろうとは思う。 71 名前：68 mailto:sage [2009/11/20(金) 03:13:05 ] >>69>>70 VB6で遊んでるだけの素人には難しすぎるようですが、 参考にさせていただきます。ちなみにVB.NETでは codezine.jp/article/detail/246?p=2 というのがありました。 72 名前：デフォルトの名無しさん [2009/11/25(水) 00:01:40 ] 質問をお願いします。 Setup.Lstの中で [.tlb]ファイルに対する操作として ＞$(TLBRegister) とありますが、これを手動で行う場合 どうすればいいんでしょうか？ 配置先に配置して、レジストリに登録すればよい？ その場合、どのようなレジストリになるのでしょうか。 どなたかご教示願います。 73 名前：デフォルトの名無しさん mailto:sage [2009/11/28(土) 23:30:41 ] インストーラー相談室 pc12.2ch.net/test/read.cgi/tech/997727326/ 74 名前：デフォルトの名無しさん mailto:sage [2009/11/29(日) 11:22:35 ] regsvr32 tlbファイル名 75 名前：デフォルトの名無しさん [2009/11/30(月) 01:17:27 ] PCをWindows7に新調したんだがVB6（SP6）入れたら不可解な現象が。 コードエディタで特定のカタカナ入れると、勝手に削られる。 例 「フリガナ」→「フリガ」 「ナナナナ」→「ナナ」 なんだろう？ 一応、互換モードは全部試してみたが症状同じ。 新規のプロジェクトでも起こる。 他のアプリでは発生しない。 76 名前：デフォルトの名無しさん mailto:sage [2009/11/30(月) 01:22:59 ] XPモード使えよwww 77 名前：デフォルトの名無しさん mailto:sage [2009/11/30(月) 01:26:01 ] IDEはすでにサポート終わってるし。 78 名前：デフォルトの名無しさん mailto:sage [2009/11/30(月) 01:27:59 ] さすがに7までサポートしろと言うのは気が引ける 79 名前：75 mailto:sage [2009/11/30(月) 03:17:16 ] 互換性のトラシューいじくり倒したらなんか直った これでまた戦える･･･ 80 名前：デフォルトの名無しさん mailto:sage [2009/11/30(月) 08:20:59 ] vmware使えよ 81 名前：デフォルトの名無しさん mailto:sage [2009/11/30(月) 09:11:13 ] >>79 明確な原因と対処法が分かってないのにそのまま進めると後で痛い目を見るから怖いと思うんだが… 82 名前：デフォルトの名無しさん mailto:sage [2009/12/01(火) 23:20:49 ] VBってどこから開始するの？main()みたいな意味で。 自分が渡されたのってBASファイルしかないのです。 でも、インポートでDLL（画面らしい）を入れているので、 もしかするとそのDLLの画面の方にｴﾝﾄﾘﾎﾟｲﾝﾄがあって、そこからコールバックされる 部分のソースをわたされてるだけかしらん？ そんな事ってありえますか？？ んなわけないか。。EXEにしているはずだし。。 ？？？わからん、たすけて〜 83 名前：デフォルトの名無しさん mailto:sage [2009/12/01(火) 23:22:09 ] 設定があるでしょ？スタートの 84 名前：デフォルトの名無しさん mailto:sage [2009/12/01(火) 23:34:39 ] >>83 そうだったのかーーー ありがとうございます！！見てみますm(_ _)m 85 名前：デフォルトの名無しさん mailto:sage [2009/12/02(水) 09:29:43 ] VB6.0のWinSockコントロールでIISにアクセスしているのですが 統合Windows認証のためが返ってきます。 HTTP/1.1 401 Unauthorized Content-Length: 1600 Content-Type: text/html Server: Microsoft-IIS/6.0 WWW-Authenticate: Negotiate WWW-Authenticate: NTLM そこで、Authorizationヘッダをつけたいのですが Authorization: Negotiate <Base64 encoded SPNEGO token> <Base64 encoded SPNEGO token>の部分はどうやって 生成すればよいでしょうか？ よろしくお願いいたします。 86 名前：デフォルトの名無しさん mailto:sage [2009/12/02(水) 22:02:41 ] あきらめろよ。 WebBrowser 使え。 87 名前：デフォルトの名無しさん mailto:sage [2009/12/02(水) 22:28:32 ] あきらめて.net使います 88 名前：デフォルトの名無しさん mailto:sage [2009/12/04(金) 16:16:12 ] 質問です。 CreateObjectでIEのオブジェクトを作成して使用しているのですが、 IE6だったころは問題無く何年も動いていたソフトが、 先日IE8にしたところ、入れ替えの数日後から「オートメーションエラーです。」と エラーが発生するようになってしまいました。 IE6とIE8では何か使用方法が異なるのでしょうか？ ご存知の方が居られましたらご教示願います。 89 名前：デフォルトの名無しさん mailto:sage [2009/12/04(金) 16:37:44 ] テストはしたのかね 90 名前：デフォルトの名無しさん mailto:sage [2009/12/04(金) 20:29:05 ] セキュリティ関連でいろいろ違う。 91 名前：デフォルトの名無しさん mailto:age [2009/12/05(土) 14:56:27 ] すいません マクロ初心者です。 ここの質問スレでいいいんでしょうか？ 九九のマクロを組んだのですが、 バグがあるみたいです。 どこがおかしいのか教えていただけませんでしょうか？ .Cells 〜writeCol+1の間にバグがあるそうなのですが（汗）　 Sub macro1() Dim writeRow As Long: writeRow = 1 Dim writeCol As Long: writeCol = 1 With Worksheets("Sheet1") For writeRow = 1 To 9 writeCol = 1 Do While writeCol <= 9 .Cells(writeRow, writewCol).Value = writeRow * writeCol writeCol = writeCol + 1 Loop Next writeRow End With End Sub 92 名前：デフォルトの名無しさん mailto:sage [2009/12/05(土) 17:13:47 ] バグがあるみたいです、じゃなくて、どうなるのか書けよ。 93 名前：デフォルトの名無しさん mailto:sage [2009/12/05(土) 17:43:53 ] 単に、 .Cells(writeRow, writewCol).Value の2つ目の引数が打ち間違ってるだけじゃねえか 94 名前：デフォルトの名無しさん mailto:age [2009/12/05(土) 20:39:25 ] >>93 気付かなかった あいがとうございました 解決しました＞＜ 95 名前：デフォルトの名無しさん mailto:sage [2009/12/05(土) 21:05:07 ] option explicitをつけましょう 96 名前：デフォルトの名無しさん mailto:sage [2009/12/07(月) 10:08:06 ] >>88です。 >>89-90　レスありがとうございます。 私自身が管理しているものではないので詳しくはわからないのですが、 おそらくテストなしで入れ替えたのではと思います。 セキュリティ関連も含め、実機での再現試験を行いたいと思います。 ありがとうございました。 97 名前：デフォルトの名無しさん mailto:sage [2009/12/08(火) 03:04:28 ] VB6でAPIのMoveMemoryとCopyMemoryを使ったとき 引数で渡した変数をどう扱ってるのかさっぱりわからん コピー元の変数は中身をデータとして渡すのか中身のデータをコピーデータアドレスとして渡してるのか コピー先の変数の中身に直接データを書き込むのかコピーしたデータのアドレスを書き込むのか さっぱりわからん 98 名前：デフォルトの名無しさん mailto:sage [2009/12/08(火) 06:02:29 ] void CopyMemory( __in PVOID Destination, __in const VOID* Source, __in SIZE_T Length ); なんだから、アドレスにデータを書き込むんだろ？ 99 名前：デフォルトの名無しさん mailto:sage [2009/12/08(火) 12:52:38 ] つまり Dim a as Integer Dim b as Integer b=20 CopyMemory a,b,2 ってすると aに20がコピーされるの？ 100 名前：デフォルトの名無しさん mailto:sage [2009/12/08(火) 13:12:14 ] APIビューワそのままだとAnyだから使いにくいな。 Private Declare Sub CopyMemory Lib "kernel32" Alias "RtlMoveMemory"   (Destination As Any, Source As Any, ByVal Length As Long) Integerの例ならこう書き換えると動く。 Private Declare Sub CopyMemory Lib "kernel32" Alias "RtlMoveMemory"   (ByRef Destination As Integer, ByRef Source As Integer, ByVal Length As Long) ... CopyMemory a,b,2 101 名前：デフォルトの名無しさん mailto:sage [2009/12/08(火) 15:09:41 ] なるほど。ありがとう

---

---

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

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