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/ ※「まず自分で調べる」クセを身につけよう。 692 名前：デフォルトの名無しさん mailto:sage [2010/04/25(日) 02:47:09 ] >>680 行番号表示って、編集してるほうのカーソル位置とかスクロールに合わせてスクロールさせるんだよね？ RitchTextBoxのスクロール量の取得・設定てどうやるの？ 693 名前：デフォルトの名無しさん mailto:sage [2010/04/25(日) 02:52:34 ] VB6のIDEだと編集中の行は色づけが解除されるよね 694 名前：デフォルトの名無しさん mailto:sage [2010/04/25(日) 02:53:12 ] >>692 ↓の454のサンプルの方法で可能なはずだと思った。 もう長いことVB6使ってないんで記憶が確かなら、だけど。 web.archive.org/web/20030110071501/www.vbvbvb.com/jp/gtips/index0451.html 695 名前：デフォルトの名無しさん mailto:sage [2010/04/25(日) 02:53:44 ] 解除されるのでもいいから、リッチテキストでやってみろよ 696 名前：デフォルトの名無しさん mailto:sage [2010/04/25(日) 03:07:47 ] >>692 ごめん、君の文章を少し読み間違えてたようだ。 でも>>694のサンプルにはそれも一応載ってるな 697 名前：デフォルトの名無しさん mailto:sage [2010/04/25(日) 04:06:19 ] OS、Windows2000じゃないんですけど 698 名前：デフォルトの名無しさん mailto:sage [2010/04/25(日) 04:07:02 ] めちゃくちゃ重いサイトだな 699 名前：デフォルトの名無しさん mailto:sage [2010/04/25(日) 04:33:29 ] >>692 API 700 名前：デフォルトの名無しさん mailto:sage [2010/04/25(日) 07:27:25 ] GWはテキストエディタつくろーっと 701 名前：デフォルトの名無しさん mailto:sage [2010/04/25(日) 23:25:04 ] 別にあなたが何しようとどうでもいんですけど・・・＾＾； 702 名前：デフォルトの名無しさん mailto:sage [2010/04/25(日) 23:30:53 ] 気になるくせにーｗ 703 名前：デフォルトの名無しさん mailto:sage [2010/04/25(日) 23:44:19 ] 反応早すぎだろうｗ 気にしてるのがどっちか丸分かりじゃねーかｗ 704 名前：デフォルトの名無しさん mailto:sage [2010/04/25(日) 23:52:19 ] 一日中２ちゃんしてるからｗ 705 名前：デフォルトの名無しさん mailto:sage [2010/04/26(月) 14:15:51 ] VB6でデータベースの列を追加する方法か、その内容をひっかけられるMSDNの語句を教えていただけないでしょうか。 .NETやC#ならすんなり当たるのに…世の中つらい。 706 名前：デフォルトの名無しさん mailto:sage [2010/04/26(月) 14:17:14 ] alter tableするだけじゃねーの？ 707 名前：デフォルトの名無しさん mailto:sage [2010/04/26(月) 14:31:02 ] 扱いは追加じゃなくて変更なのか…�d。 ググるとそこそこあたるので探ってみる。 708 名前：デフォルトの名無しさん mailto:sage [2010/04/26(月) 17:31:07 ] つうか、SQLの知識のほうじゃねぇか… 709 名前：デフォルトの名無しさん mailto:sage [2010/04/26(月) 20:55:03 ] >>708 ああ、そうか…　って、VBでSQLなスレ見つけたけど、中身がわりと残念な進行してるねえ。 むこうで聞いて大丈夫だろうか？ 710 名前：デフォルトの名無しさん mailto:sage [2010/04/26(月) 21:29:41 ] DBはDB板へ 711 名前：デフォルトの名無しさん mailto:sage [2010/04/27(火) 02:33:05 ] >>705 まずどうやってデータベースに接続してるのか？ まあ、DAO.TableDefかADOXを調べてみろ つかここ見れば解決 msdn.microsoft.com/ja-jp/library/cc948693(v=msdn.10).aspx 712 名前：デフォルトの名無しさん mailto:sage [2010/04/27(火) 18:50:25 ] VB6付属のMSDNライブラリのVBのLogの項目で Static Function Log10(X) Log10 = Log(X) / Log(10#) End Function ってあったんだけど、これってStaticつけられてるけど何か意味があるの？ 713 名前：デフォルトの名無しさん mailto:sage [2010/04/28(水) 12:07:17 ] 実行速度が遅くなる以外は違いがない気がするな 714 名前：デフォルトの名無しさん mailto:sage [2010/04/28(水) 13:22:42 ] インスタンス無くてもアクセスできる 715 名前：デフォルトの名無しさん mailto:sage [2010/04/28(水) 14:01:46 ] なぜインスタンスが？ 716 名前：デフォルトの名無しさん mailto:sage [2010/04/28(水) 14:16:03 ] C++とは意味が違う 717 名前：デフォルトの名無しさん [2010/04/28(水) 19:20:06 ] Property Let　とか Property Set は斬新だった 718 名前：デフォルトの名無しさん mailto:sage [2010/04/29(木) 09:35:43 ] b() = Inet1.OpenURL(strURL, icByteArray) でバイト配列にデータを格納したら そのあとは どんなプログラムを書けばハードディスクに記憶できるのか 719 名前：デフォルトの名無しさん mailto:sage [2010/04/29(木) 10:30:15 ] ファイルを作って書き込めばいい。 720 名前：デフォルトの名無しさん [2010/04/29(木) 11:18:24 ] >>718 b = Inet1.OpenURL(strURL, icByteArray) fn=FreeFile() Open "File.txt" For Binary As #fn Put #fn, , b Close #fn 721 名前：デフォルトの名無しさん mailto:sage [2010/04/29(木) 11:32:29 ] ｻﾝｸｽ 722 名前：デフォルトの名無しさん mailto:sage [2010/04/30(金) 01:06:10 ] またVB厨か el.jibun.atmarkit.co.jp/minagawa/2010/04/post-ebc4.html 723 名前：デフォルトの名無しさん [2010/04/30(金) 02:19:34 ] >>720 この方法のヤバさと言ったら File.txtが既に存在していて 書き込むbのサイズよりファイルサイズが大きい場合だよね 超ヤバイ 724 名前：デフォルトの名無しさん mailto:sage [2010/04/30(金) 05:57:50 ] なにが? 725 名前：デフォルトの名無しさん mailto:sage [2010/04/30(金) 09:58:29 ] 引き出したい言葉を普通に質問すればいいのに 726 名前：デフォルトの名無しさん mailto:sage [2010/04/30(金) 15:25:44 ] >>723 サンプルにエラー処理の事でつっこむとかバカなの？ 727 名前：デフォルトの名無しさん mailto:sage [2010/04/30(金) 15:27:14 ] >>722 60年代前半生まれだしな つうかSAPて言語・・・なのか？ｗ 728 名前：デフォルトの名無しさん [2010/04/30(金) 17:33:14 ] >>726 エラー？ 729 名前：デフォルトの名無しさん [2010/05/04(火) 00:24:00 ] つい最近、Trueの値が-1である理由に気づいた。 もう１０年以上（まぁかなりの素人ではあるけれど）プログラミングに触れてきてるのにね。 ２の補数のビットで表現してたって本当つい３日前に気づいた Falseがビットが全部０に対してTrueはビットが全部１ ビットが全部１だと２の補数だと-1になるという・・・ ずっと昔から、何で1じゃなく-1なんだろうと思ってた・・・その疑問がやっと解決した・・・ 730 名前：デフォルトの名無しさん mailto:sage [2010/05/04(火) 00:39:23 ] 全部0とそれ以外 それだけだと思うんだ 731 名前：デフォルトの名無しさん mailto:sage [2010/05/04(火) 00:43:18 ] Debug.Print "True="; CInt(True) ' -1 Debug.Print "False="; CInt(False) '0 732 名前：デフォルトの名無しさん mailto:sage [2010/05/04(火) 00:44:56 ] CBool(1)　さて・・・どっち？ 733 名前：デフォルトの名無しさん mailto:sage [2010/05/04(火) 00:46:46 ] 誰もそんな話してないけどな。 734 名前：デフォルトの名無しさん mailto:sage [2010/05/04(火) 00:46:47 ] Dim a,b a=10 b=20 Debug.Print CInt(a < b) 735 名前：デフォルトの名無しさん mailto:sage [2010/05/04(火) 12:02:02 ] 宇宙線の影響を考えると１ビット反転でコンピュータ障害がおきかねないな 736 名前：デフォルトの名無しさん [2010/05/04(火) 23:28:37 ] 原因不明のエラーはWindowsMeのせいじゃなくて、宇宙線のせいだったんだな。それなら仕方ないな。 737 名前：デフォルトの名無しさん mailto:sage [2010/05/05(水) 00:40:56 ] ageてまで言うような事なのか? 738 名前：デフォルトの名無しさん mailto:sage [2010/05/05(水) 01:01:06 ] そこはスルーしとけ 739 名前：デフォルトの名無しさん mailto:sage [2010/05/05(水) 10:32:50 ] なんでもWindows Meのせいにするのは天江衣 740 名前：デフォルトの名無しさん mailto:sage [2010/05/06(木) 00:59:32 ] 顧客「おたくのアプリケーション、ちょくちょくエラーが出るんですけど 営業「宇宙線の影響なので仕方ありません 顧客「なんだ宇宙線のせいなのか。それならば仕方ないな。 使える！ 741 名前：デフォルトの名無しさん mailto:sage [2010/05/06(木) 10:00:50 ] ねーよｗｗｗｗ 742 名前：デフォルトの名無しさん mailto:sage [2010/05/07(金) 23:52:26 ] なんのためのECCか 743 名前：デフォルトの名無しさん [2010/05/08(土) 00:17:54 ] 英語塾？ 744 名前：デフォルトの名無しさん mailto:sage [2010/05/09(日) 00:23:58 ] ECCで訂正できるのって1bitのミスだけで2bit以上は検出だけじゃなかったっけ 745 名前：デフォルトの名無しさん mailto:sage [2010/05/09(日) 00:28:41 ] ミスるメモリだとわかる点だけでも価値はあったんだぜ 746 名前：デフォルトの名無しさん mailto:sage [2010/05/09(日) 00:31:56 ] エラー検出訂正 (error detection and correction)？ 747 名前：デフォルトの名無しさん mailto:sage [2010/05/09(日) 02:32:50 ] クラスモジュールでグローバルな変数・定数・メソッドを使うのに抵抗があります 748 名前：デフォルトの名無しさん mailto:sage [2010/05/10(月) 10:01:21 ] >>747 それは明らかにおかしい 必要ならば使うしかないだろ 749 名前：デフォルトの名無しさん mailto:sage [2010/05/10(月) 14:40:47 ] 俺は使いまくり。とても人に見せられるソースじゃない 750 名前：デフォルトの名無しさん mailto:sage [2010/05/10(月) 19:30:36 ] グローバル変数は害悪 定数やメソッドは問題ない 751 名前：デフォルトの名無しさん mailto:sage [2010/05/12(水) 14:03:49 ] >>750 そのへん含め.NETになったと聞いたけど、そうなのかしら？　.NET触ったことないからよくわかんないけど。 ところで。 Windows7でMSCommがマトモに動いてくれないのだが、なにか情報出てたりしますか？ MSComm使って無さそうなソフトだと(ActiveX？)普通に受信するのに MSComm32を使ったアプリだと、[ 通信ﾃﾞﾊﾞｲｽ読み取り時にｴﾗｰが発生しました(8020) ] を返してくる…。 USBtoシリアルとWindows7の組み合わせが悪いのか、Windows7だけの話なのか？ 752 名前：デフォルトの名無しさん mailto:sage [2010/05/12(水) 14:13:30 ] うちの環境で DELLノート　Win7+エレコムのUSBシリアル でソフト書いても問題なかったけどなぁ VB6でもC#でも 753 名前：デフォルトの名無しさん mailto:sage [2010/05/12(水) 14:21:08 ] APIで書き直せばおｋ 754 名前：デフォルトの名無しさん mailto:sage [2010/05/12(水) 14:36:04 ] >>752 マジカ おのれＩＯデータ とりあえず、受信バッファに何かあるときに MSComm.Inputすると出るの。 それ以外は出ないし送信もできるのに…。 >>753 それは最終手段にしたい…。 755 名前：デフォルトの名無しさん mailto:sage [2010/05/12(水) 19:53:45 ] まず本当にOSの問題かどうかの裏をとろうよ。 そんなこと言ってるからVB厨とか言われちゃうんだよ。 756 名前：デフォルトの名無しさん mailto:sage [2010/05/12(水) 20:03:34 ] ＩＯデータってOSなの？ 757 名前：デフォルトの名無しさん mailto:sage [2010/05/12(水) 20:09:54 ] おのれIOデータのUSBシリアルめ、という意味なんだろう 758 名前：754 mailto:sage [2010/05/12(水) 22:38:13 ] IOデータのサポートに言ったら、他にそういう報告はないとのこと。 とりあえず１世代前の製品の最新ドライバ入れてみてという変なこといわれた。 やったら治った。 なんぞーっ ドライバがこなれてないのかしら。 >>755 ＸＰで起こらないのは確認済み。 759 名前：デフォルトの名無しさん mailto:sage [2010/05/15(土) 01:44:06 ] 自分に限界を感じた データベースというのがさっぱり理解できない データベースそのものもわけわからんのだが それを扱うメソッドもよくわからん VisDataもヘルプ読みながら使ってみたがよくわからん これは もう完全にセンスの問題だと思う。俺のプログラミングに関するセンスがダメなんだと思う 家計簿的なもの作ってやろうじゃんと思ったけど さっぱりだ。 そもそもデータベースの入門書みたいな本とかもまったく理解できなかった これは致命的だろう ああ、くそだ 760 名前：デフォルトの名無しさん mailto:sage [2010/05/15(土) 02:30:57 ] バイナリアクセスモードでファイル開いて putやgetでstringの読み書きって半角や全角や制御コードとか全部２バイトデータかな dim s as string * 20 put #1, , s put #1, , n& ↓ get #1, , s get #1, , n& で取り出せるよね？ sの内容にかかわらず 761 名前：デフォルトの名無しさん mailto:sage [2010/05/15(土) 02:31:58 ] 回答待つより自分で試したほうが早いか・・・やってみるお 762 名前：デフォルトの名無しさん mailto:sage [2010/05/15(土) 08:23:17 ] >>759 こういう人が居ると安心する。 自分は頭がよくてよかった。 763 名前：デフォルトの名無しさん mailto:sage [2010/05/16(日) 12:49:35 ] >>759 マジレスしたら センスの有無はあるだろうけど 要は慣れだと思う 俺でもできるんだ 俺だって最初はまったく理解できなかった 764 名前：デフォルトの名無しさん mailto:sage [2010/05/16(日) 21:18:53 ] >759 DBを使わず、自分でファイルの読み書きするプログラムを書いたことはある？ まずはそれからだと思うが・・・」 765 名前：デフォルトの名無しさん mailto:sage [2010/05/17(月) 01:29:14 ] >>759 その「入門書」のタイトルを教えてくれれば、 何かアドバイスできるかも知れないな。 （もっと適切な入門書を紹介するとか） 766 名前：759 mailto:sage [2010/05/17(月) 01:47:04 ] なんかいっぱいレス下さって・・・意外です＾＾； >>762　士農工商より下の位がいるみたいな感じっすかね >>763　もう諦めの境地ですから、試行錯誤的にやってみてもエラーメッセージとか意味不明すぎて 　ＭＳＤＮの説明じゃ要領得なくて、ネット検索とかもう探すの面倒になりましたっす >>764　当初は、DB使わず、データをLongやStringの配列で自前でデータ管理しようと試みたんすけど 　データを表示する表みたいなコントロール？（DataGridとか）がイマイチ使い方が理解できなくって 　そのコントロールってデータベースのデータ使ったほうがいいのかなって思って 　データベースに挑んでみたですけど、まぁ忍耐の限界っす >>765 書籍タイトルはちょっと分からんです、図書館で立ち読みでしたので 　データベースの本はほとんどMicrosoftAccessの使い方の本ばっかでそれらは読んでないです 　大学時代に一応データベースの授業受けたんですけど、ちんぷんかんぷんで、出席点だけで単位を貰った感じっす まぁ趣味でやってる程度なんで、どうしても出来る必要ってないんで でもみなさんの気持ちには感謝っす 　 767 名前：デフォルトの名無しさん mailto:sage [2010/05/17(月) 02:00:26 ] あきらめろよ。 768 名前：759 mailto:sage [2010/05/17(月) 02:08:47 ] >>767 書き損ねましたっすが、はい、あきらめてます 769 名前：デフォルトの名無しさん mailto:sage [2010/05/17(月) 02:27:49 ] 愚痴るだけとか士ねよ 770 名前：デフォルトの名無しさん mailto:sage [2010/05/17(月) 02:33:17 ] 家計簿程度ならエクセルで十分なキガス 771 名前：デフォルトの名無しさん mailto:sage [2010/05/17(月) 15:42:08 ] 初心者ならVBAでいいな 772 名前：デフォルトの名無しさん mailto:sage [2010/05/17(月) 17:51:52 ] でもまぁ、集計とかその辺が入るしなぁ どうせやるならDBだろ　と思うんだが 773 名前：デフォルトの名無しさん mailto:sage [2010/05/17(月) 18:03:02 ] 趣味で古いVB使うってどんな状況なんだ？ 774 名前：デフォルトの名無しさん mailto:sage [2010/05/17(月) 20:02:03 ] >>773 使わなくなったＶＢを貰ったとかいうのはどうか。 あとは昔からのＢＡＳＩＣはよく知ってるんだが、.NETの具合にクラクラしたとかどうか。 775 名前：デフォルトの名無しさん mailto:sage [2010/05/17(月) 20:35:32 ] >>576 >>579 776 名前：デフォルトの名無しさん [2010/05/17(月) 21:29:52 ] 質問させて下さい。 VBScriptを使用して開発を行う際、 何のエディタを使っていらっしゃいますか。 ASP(VBScript+HTML)で開発することになったのですが、 使用するエディタを何にしようか迷っています。 詳しい方がいらっしゃいましたら教えていただきたいです。 ※候補としてはVisual web developer 2008 expressを考えています。 777 名前：デフォルトの名無しさん mailto:sage [2010/05/17(月) 22:12:39 ] 趣味で家計簿みたいなのを作るならExcelVBAがいいと思うよ。 表みたいなやつはもともとデフォルトでついてるし(Excelだから) 結構いろんなこともできる。 VBで画面作ってデータベースに接続して・・・・となるとそりゃ 趣味の範囲としては難しいよ。 778 名前：デフォルトの名無しさん [2010/05/19(水) 01:33:39 ] 複数のテキストボックスをテキスト形式で保存するプログラムを作成しています。 なんとか「保存」「読み込み」のボタンを設置し異常なく作動しました。 ここまではいいのですが、よく考えたら起動時に自動で読み込んでくれると 便利だと思うのですが、検索してもなかなか出てきません。 お詳しい方ご教授頂けると嬉しいです。宜しくお願い致します。 779 名前：デフォルトの名無しさん mailto:sage [2010/05/19(水) 01:36:24 ] Form_Loadで処理すればいいんじゃないの？いや、俺も初心者レベルだけど 780 名前：デフォルトの名無しさん mailto:sage [2010/05/19(水) 01:47:47 ] Private Sub Form_Load() Dim f As New FileSystemObject Dim t As TextBox For Each t In Text1 t.Text = f.OpenTextStream("Data" & t.Index & ".txt").ReadAll() Next End Sub こんな感じ？ 781 名前：779 mailto:sage [2010/05/19(水) 01:55:47 ] >>780も俺のレスだけど、>>779,780は無かったことにして欲しい。俺の勘違いだった 782 名前：778 [2010/05/19(水) 09:47:49 ] すいません追加事項を 起動時に自動で読み込み、なおかつ参照ファイルが存在しなければ 作成する。を追加でお願いします。 783 名前：デフォルトの名無しさん mailto:sage [2010/05/19(水) 15:18:27 ] >>758 マジで？　おれも数ヶ月前に同じようなこと聞いて同じような回答をもらったが、あきらめて Ratocのやつに買い換えたよ。 もう一度試してみる価値ありかもな。 784 名前：デフォルトの名無しさん mailto:sage [2010/05/20(木) 00:30:58 ] >>782 よくわからんけど、どういうことなの？ 785 名前：デフォルトの名無しさん mailto:sage [2010/05/20(木) 00:38:19 ] 自分で考えるつもりはなくて 人に作って欲しいってことじゃね？ｗ 786 名前：デフォルトの名無しさん mailto:sage [2010/05/20(木) 00:46:35 ] MDIフォームで作ってんのか？ 787 名前：デフォルトの名無しさん mailto:sage [2010/05/20(木) 00:54:11 ] >>778の言いたいことを少しずつみんなで推理していこう まずこれ ＞複数のテキストボックスをテキスト形式で保存するプログラムを作成しています う〜ん・・・ 複数のテキストボックスをテキスト形式で保存？？？ これは・・・・テキストボックスの内容をテキスト形式のファイルに保存してるってことなのかな？ １つのテキストボックスに対してファイルを一つ用意するのかなぁ・・？ 788 名前：デフォルトの名無しさん [2010/05/20(木) 22:24:38 ] age 789 名前：デフォルトの名無しさん mailto:sage [2010/05/21(金) 00:50:30 ] フォームロード時にファイルシステムオブジェクト使えば簡単に処理できます 790 名前：デフォルトの名無しさん mailto:sage [2010/05/21(金) 16:01:21 ] strComputer = "." Set objWMIService = GetObject("winmgmts:" _ & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\wmi") Set colitem = objWMIService.ExecQuery _ ("Select * from WmiMonitorID") For Each objitem in colitem Wscript.Echo Wscript.Echo "シリアル: "& objitem.SerialNumberID[] Next win7ですが、シリアル採集できるはずですが、ステートメントの末尾が不正エラー出ます。 YearOfManufactureとかは採集できますが、[]のなかになにかいれないとだめなんでしょうか。 791 名前：デフォルトの名無しさん [2010/05/21(金) 17:03:55 ] 角かっこを私は知らない 792 名前：デフォルトの名無しさん mailto:sage [2010/05/21(金) 17:17:07 ] かっこわるい 793 名前：デフォルトの名無しさん mailto:sage [2010/05/21(金) 17:22:47 ] ひとまずwinmgmtsでググってみたよ おれには分からない

---

---

[ 新着レスの取得/表示 (agate) ] / [ 携帯版 ]

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