VBプログラマ質問スレ(6.0以前) Part51
■ このスレッドは過去ログ倉庫に格納されています
0001デフォルトの名無しさん
2007/01/28(日) 10:57:31質問者は使用しているOS、VBのバージョン、サービスパックのバージョン、
「何がしたくて、どうしたけど、どう困っているのか」を明確に書きましょう。
VB.NETは別物なので専門スレで、VBA、APIの質問もそれぞれのスレで。
○ 質問者の心得
一.質問する前にMSDNやGoogle、過去ログにも目を通してみる。
二.VBScript、インストーラーなどはこのスレでOK。
三.質問は第三者にもわかりやすいよう簡潔かつ具体的に。
四.荒らしは相手しない。
○ 回答者の心得
一.答えられない質問は無駄に罵倒せずスルー。無理するな。
二.代用法を強制しない。
三.回答する上で必須ではない情報をむやみに聞き返さない。
四.荒らしは相手しない。
五.VB情報募集中。
六.回答は質問者が理解できるよう具体的に。
MSDN Online Japan ホーム
http://www.microsoft.com/japan/msdn/default.asp
Visual Studio 6.0 Service Pack 6
http://msdn.microsoft.com/vstudio/downloads/updates/sp/vs6/sp6/default.aspx
http://www.google.co.jp/
※「まず自分で調べる」クセを身につけよう。
0002デフォルトの名無しさん
2007/01/28(日) 10:58:14Part 1 http://piza2.2ch.net/tech/kako/968/968328471.html
Part 2 http://piza2.2ch.net/tech/kako/990/990793224.html
Part 3 http://piza2.2ch.net/tech/kako/1000/10005/1000523122.html
Part 4 http://pc.2ch.net/tech/kako/1006/10069/1006922992.html
Part 5 http://pc.2ch.net/tech/kako/1010/10106/1010624646.html
Part 6 http://pc.2ch.net/tech/kako/1013/10138/1013844542.html
Part 7 http://pc.2ch.net/tech/kako/1015/10158/1015836357.html
Part 8 http://pc.2ch.net/tech/kako/1018/10187/1018794901.html
Part 9 http://pc.2ch.net/tech/kako/1020/10208/1020830472.html
Part10 http://pc.2ch.net/tech/kako/1022/10221/1022127528.html
Part11 http://pc.2ch.net/tech/kako/1024/10243/1024380249.html
Part12 http://pc3.2ch.net/tech/kako/1026/10266/1026642565.html
Part13 http://pc3.2ch.net/tech/kako/1029/10292/1029241786.html
Part14 http://pc3.2ch.net/tech/kako/1030/10309/1030947162.html
Part15 http://pc3.2ch.net/tech/kako/1032/10327/1032706491.html
0003デフォルトの名無しさん
2007/01/28(日) 10:58:54Part17 http://pc3.2ch.net/tech/kako/1036/10361/1036154952.html
Part18 http://pc3.2ch.net/tech/kako/1038/10381/1038103769.html
Part19 http://pc3.2ch.net/tech/kako/1039/10398/1039859691.html
Part20 http://pc5.2ch.net/tech/kako/1041/10418/1041879465.html
Part21 http://pc5.2ch.net/tech/kako/1044/10440/1044028945.html
Part22 http://pc5.2ch.net/tech/kako/1046/10463/1046354784.html
Part23 http://pc5.2ch.net/tech/kako/1047/10477/1047743187.html
Part24 http://pc5.2ch.net/tech/kako/1050/10501/1050151126.html
Part25 http://pc5.2ch.net/tech/kako/1052/10526/1052627913.html
Part26 http://pc5.2ch.net/tech/kako/1055/10551/1055145106.html
Part27 http://pc5.2ch.net/tech/kako/1058/10586/1058674927.html
Part28 http://pc5.2ch.net/tech/kako/1061/10612/1061296197.html
Part29 http://pc5.2ch.net/tech/kako/1065/10654/1065446334.html
Part30 http://pc5.2ch.net/test/read.cgi/tech/1069160036/
0004デフォルトの名無しさん
2007/01/28(日) 10:59:34Part32 http://pc5.2ch.net/test/read.cgi/tech/1077216109/
Part33 http://pc5.2ch.net/test/read.cgi/tech/1080606445/
Part34 http://pc5.2ch.net/test/read.cgi/tech/1084544243/
Part35 http://pc5.2ch.net/test/read.cgi/tech/1087519251/
Part36 http://pc5.2ch.net/test/read.cgi/tech/1092906058/
Part37 http://pc5.2ch.net/test/read.cgi/tech/1090286450/
Part38 http://pc5.2ch.net/test/read.cgi/tech/1095673000/
Part39 http://pc5.2ch.net/test/read.cgi/tech/1099737063/
Part40 http://pc5.2ch.net/test/read.cgi/tech/1106748775/
Part41 http://pc8.2ch.net/test/read.cgi/tech/1112414085/
Part42 http://pc8.2ch.net/test/read.cgi/tech/1116924129/
Part43 http://pc8.2ch.net/test/read.cgi/tech/1123952677/
Part44 http://pc8.2ch.net/test/read.cgi/tech/1130231657/
Part45 http://pc8.2ch.net/test/read.cgi/tech/1133977286/
0005デフォルトの名無しさん
2007/01/28(日) 11:00:27Part47 http://pc8.2ch.net/test/read.cgi/tech/1141320612/
Part48 http://pc8.2ch.net/test/read.cgi/tech/1146678926/
Part49 http://pc8.2ch.net/test/read.cgi/tech/1152667953/
Part50 http://pc10.2ch.net/test/read.cgi/tech/1161517193/
0006デフォルトの名無しさん
2007/01/28(日) 11:42:12以下プログラムに間違いがありましたら教えてください。
@アクセスを開こうとすると「安全でない式がブロックされます」とでるのですが
マクロセキュリティを低にする以外にメッセージを出なくする方法はないのでしょうか?
VB:6.0SP6
DB:Access2003
' 概 要:テーブル追加
Private Sub pMakeTableMstABC()
Dim wrstwrk As Recordset
Dim wstrsql As String
On Error Resume Next
wstrsql = "SELECT * FROM MSTABC"
Set wrstwrk = gConnDB.OpenRecordset(wstrsql, dbOpenDynaset)
If Err.Number <> 0 Then
wstrsql = ""
wstrsql = wstrsql & "CREATE TABLE MSTABC ("
wstrsql = wstrsql & "NUMBER INTEGER NOT NULL,"
wstrsql = wstrsql & "NAME TEXT(60),"
wstrsql = wstrsql & "BIKOU TEXT(100))"
gConnDB.Execute wstrsql
0007デフォルトの名無しさん
2007/01/28(日) 11:43:37'主キー設定
wstrsql = ""
wstrsql = wstrsql & "ALTER TABLE MSTSENSYU ADD "
wstrsql = wstrsql & "CONSTRAINT PKEY_MSTABC PRIMARY KEY (NUMBER)"
gConnDB.Execute wstrsql
End If
wrstwrk.Close
' 概 要:データベースを開く
gOpenDatabase = False
Set gConnDB = OpenDatabase(App.Path & "\AAA.mdb")
gOpenDatabase = True
Exit Function
End Sub
0008デフォルトの名無しさん
2007/01/29(月) 04:20:24aaa.exe bbb ccc
の様なVB6.0で出来るのでしょうか?
あるのなら、やり方のってるホームページ等を紹介して欲しいのですが
00098
2007/01/29(月) 07:04:23初心者の質問ですみません
0010デフォルトの名無しさん
2007/01/29(月) 17:19:44複数VB6が入ってるPCがあります。その中の1台だけバージョン情報のウィンドウで一番下に出ている
virsion:8988 VBA: Retail 6.0.8964 は他のPCと同じなんですが
Forms3: のみ他のPCと異なっています。 1台だけ2.01と表示され他のPCは11.0.58XXとなっています。
全てXP ProにSP5を同じように適用しているのですが・・・
Forms3の項目は一体何でしょうか?インストールされているofficeによって違ってきてる気もします。
また、これが違うとフォームでのキーイベントの挙動が他と異なることはありますか?
0011デフォルトの名無しさん
2007/01/29(月) 21:01:54答は自分で分かってるじゃん。
0012デフォルトの名無しさん
2007/01/30(火) 09:11:00何かコンポーネントとかCOMとかありますでしょうか?
0013デフォルトの名無しさん
2007/01/30(火) 10:42:52VB.NETでWEBサービスを呼び出すクラスを書きそれをCOMとして登録する。
それをVB6から呼び出す。
0014デフォルトの名無しさん
2007/01/30(火) 10:48:340015デフォルトの名無しさん
2007/01/30(火) 22:04:13画像そのものを表示しないで行う方法はあるでしょうか。
非表示のPictureBoxにこの画像を読み込んで
Pointメソッドで取得しようとしても、Pointは非表示だと-1しか返さないし、
目立たないくらい小さく表示しても、表示してる部分の領域以外は-1を
返すので使い物になりません。
0016デフォルトの名無しさん
2007/01/30(火) 23:04:15オートリドローだかなんだかのプロパティで表示しなくてもできた気がするがしばらく触ってないからなあ
まあなんいじればうごくよ
BMPならファイル操作でも難しくないけどさ
0017デフォルトの名無しさん
2007/01/31(水) 00:44:35前スレの>>372-373か>>381-386が
使いたいのですが、どうすれば使えるようになりますか?
教えてください。
0018デフォルトの名無しさん
2007/01/31(水) 05:17:39オプションボタンを何個か配置して、その一つを選んでからコマンドボタンを押すと
リストボックスにテキストファイルが表示されるようなプログラムを作ったのですが、
そのリストボックスに表示されているテキストファイルを、
ダブルクリックしてテキストボックスに中身を表示させたいのですが、
どうすればいいでしょうか?
0019デフォルトの名無しさん
2007/01/31(水) 08:29:19プログラムの仕様を書いてるだけじゃない、どこがわからないんだい?
0020デフォルトの名無しさん
2007/01/31(水) 10:46:540021デフォルトの名無しさん
2007/01/31(水) 11:54:53ダブルクリックしたファイル名の取得とか
そのファイルのオープンからテキストBOXへの展開とかの話じゃないやね?
0022デフォルトの名無しさん
2007/01/31(水) 12:06:29あるんですが、、実行すると、、色んなDLLをロードしてるようです。。
実行ファイルの.idataセクションを見ると実行ファイル自体は、VBのランタイムDLL
しかロードしてないようなのですが、他のDLLはVBのランタイムDLLからロードしている
という解釈でいいでしょうか?
VBの実行環境についての資料を色々探しているのですが、見つからないのです、、、
0023デフォルトの名無しさん
2007/01/31(水) 20:57:07ランタイム以外から呼び出すDLLがあるかはプログラムによる。
Declareは確か実行時に参照したはずだし、
LoadLibraryやら使って参照するような事もあるだろうし。
つまり作った奴に聞いたほうが早いということです。
002422
2007/02/01(木) 11:59:40作った人辞めちゃったんですよね、、ソースも当然無いと、、、
だから困ってるわけです。参照してるDLLのバージョンが古くて動かないので何とか
ならないものかと四苦八苦してるわけです。
0025デフォルトの名無しさん
2007/02/01(木) 12:06:55会社として土下座するかばっくれるか決めるのが普通。
0026デフォルトの名無しさん
2007/02/01(木) 12:22:100027デフォルトの名無しさん
2007/02/01(木) 12:49:32世の中おかしい会社は一杯アル。
0028デフォルトの名無しさん
2007/02/01(木) 12:51:440029デフォルトの名無しさん
2007/02/01(木) 12:53:56DLLにしてくれ
0030デフォルトの名無しさん
2007/02/01(木) 13:46:200031デフォルトの名無しさん
2007/02/01(木) 13:50:37ネイティブコンパイルにしてもリンクはいじれないし。
0032デフォルトの名無しさん
2007/02/01(木) 13:54:110033デフォルトの名無しさん
2007/02/01(木) 13:59:33http://msdn.microsoft.com/library/ja/default.asp?url=/library/ja/vccore/html/_core_linker_reference.asp
VB6のlink.exeも同じだろ、きっと
0034デフォルトの名無しさん
2007/02/01(木) 14:03:440035デフォルトの名無しさん
2007/02/01(木) 14:06:03そんなするぐらいならそのLIBをラップするDLLを書くほうが30分作業。
0036デフォルトの名無しさん
2007/02/01(木) 17:05:540037デフォルトの名無しさん
2007/02/01(木) 17:26:460038デフォルトの名無しさん
2007/02/02(金) 11:34:30そこをクリックするとブラウザが立ち上がり、そのURLのページが表示されると
いう機能がありますが、ブラウザを立ち上げ、URLを指定するのはどのように
すればよいのでしょうか。
イベントは、ボタンのクリックでもよいのですが、利用者が使用しているブラウザ
を立ち上げる方法が…。
どなたかご存じありませんか?
0039デフォルトの名無しさん
2007/02/02(金) 12:14:430040デフォルトの名無しさん
2007/02/02(金) 12:33:34どうも、ありがとうございます。
実は、
Dim Ret As Long
Ret = ShellExecute(Me.hWnd, "Open", "EXPLORER.EXE", "http://www.yahoo.co.jp/", " ", SW_SHOW)
とかやってみたんですが、これだとIE限定になってしまうので困っていたんです。
IE以外でも立ち上がる方法を検索してみます。
0041デフォルトの名無しさん
2007/02/02(金) 12:41:310042デフォルトの名無しさん
2007/02/02(金) 12:58:450043デフォルトの名無しさん
2007/02/02(金) 13:22:050044デフォルトの名無しさん
2007/02/03(土) 03:12:17遅くなってすみません。
ありがとうございます。
41、42さんありがとうございます。皆さん、プロの方でしょうか。それとも学生さんでしょうか。
いろいろ、試してみることが大切ですね。
また、43 さんの、そのままをプログラムに入れましたら起動しました。
とても、有り難く、また恐縮します。
出来たら、私も人の役に立てるように、TIPSみたいな形で残せれば…と思いますが、
だた、私のスキルではないのでつらいところです。
これから、また、前進します。
ありがとうございました。
0045デフォルトの名無しさん
2007/02/03(土) 03:20:07進む道を間違えてる
0046デフォルトの名無しさん
2007/02/03(土) 09:17:33そのTIPSはきっちりMSDNに載っているし、あらゆるリファレンスに
載っている話だからお前はそんな心配せんでもいい。
0047デフォルトの名無しさん
2007/02/04(日) 05:29:38これならC#に切り替えた方がいいかな・・・
0048デフォルトの名無しさん
2007/02/04(日) 10:08:040049デフォルトの名無しさん
2007/02/04(日) 10:08:41110,000,000円でした
0050デフォルトの名無しさん
2007/02/04(日) 11:15:560051デフォルトの名無しさん
2007/02/04(日) 12:39:15金額を表示するものは、3桁毎に ,打ったスタンダードの表示方法の方が
後々良いと思うがな
0052デフォルトの名無しさん
2007/02/04(日) 12:42:34一.答えられない質問は無駄に罵倒せずスルー。無理するな。
二.代用法を強制しない。
三.回答する上で必須ではない情報をむやみに聞き返さない。
0053デフォルトの名無しさん
2007/02/04(日) 12:49:020054デフォルトの名無しさん
2007/02/04(日) 13:13:111は心得であり守るルールだ
従え
0055デフォルトの名無しさん
2007/02/04(日) 13:20:31だが俺はやなこった
0056デフォルトの名無しさん
2007/02/04(日) 14:00:09単なるサジェスチョンでしょ?ちなみに>48については
お手軽な方法はない、自分で地道に実装するしかない、が回答。
005748
2007/02/04(日) 14:13:349999万以上の数字を左から桁数とって億単位の場所に移すという形にしました。
0058デフォルトの名無しさん
2007/02/04(日) 15:14:400059IISがありません
2007/02/04(日) 16:38:31おいらの「windows xp professional 再インストール用cd service pack 1a同封」というやつには、
iisが入っていません。
professionalなのにホントに入っていないんでしょうかね?それともおいらの探しかたがおかしいのでしょうか?
.net frameworkというのははいっています。
どなたか教えてくださいませ!!!
0060デフォルトの名無しさん
2007/02/04(日) 16:42:47Windowsコンポーネントの追加と削除にIISの選択肢がある。
0061IISがありません
2007/02/04(日) 16:47:41それが、選択肢に無いんですよ。。。
なんで?????
再インストールcdだから?
ちなみにOSインストール済みのデルパソコンを買ったんですが。。。
激しくすれ違いなんですが、どこのスレに行けばいいのかもわからなくて。。。
0062デフォルトの名無しさん
2007/02/04(日) 17:12:04[Windowsコンポーネントウィザード]のアクセサリとユーティリティの次にない?
あとマルチいくない。
0063デフォルトの名無しさん
2007/02/04(日) 18:23:110064IISがありません
2007/02/04(日) 19:35:39>62
だからないっちゅってるやろ!!
0065デフォルトの名無しさん
2007/02/04(日) 20:24:11>>52みたいな奴に限って、>>64みたいの絡みだす自分棚上げ野郎ぶりを発揮するんだよねw
0066デフォルトの名無しさん
2007/02/04(日) 20:53:28つ メアド
006762
2007/02/05(月) 00:02:17>64
デルのサポートに電凸が最善。向こうのスレでも同じ反応でしょ?
0068デフォルトの名無しさん
2007/02/05(月) 10:53:53テキストやラベルなどものすごい数がある場合
オブジェクト名ってどうされてますか?
すべて手直しして分かりやすいように変えてます?
0069デフォルトの名無しさん
2007/02/05(月) 11:18:04>>ttp://www.cisco.com/japanese/warp/public/3/jp/service/tac/788/AVVID/oem-guided-instal-util-j.html
0070デフォルトの名無しさん
2007/02/05(月) 11:20:31配列
0071デフォルトの名無しさん
2007/02/05(月) 16:37:570072デフォルトの名無しさん
2007/02/05(月) 16:38:41ありがとうございます
勉強しなおしてできました
0073デフォルトの名無しさん
2007/02/05(月) 16:44:54君をひよっこマスターに認定。
0074デフォルトの名無しさん
2007/02/05(月) 16:49:27探して見つけては、なんどもDLしてるんですが・・
インストールがうまくいかなかったり・・とりあいず教えてください。!
0075デフォルトの名無しさん
2007/02/05(月) 16:56:15ダウンロード元のサイトに問い合わせてください
0076デフォルトの名無しさん
2007/02/05(月) 17:01:18はい。
0077デフォルトの名無しさん
2007/02/05(月) 17:24:02'ランダム値
wsrand = Int((70 - 51 + 1) * Rnd + 51)
MSGBOX("wsrand")
Next k
この場合ですが、ループしている間
同じ数値を出さない方法というのはありますでしょうか?
0078デフォルトの名無しさん
2007/02/05(月) 17:26:440079デフォルトの名無しさん
2007/02/05(月) 17:50:0351〜70までのランダムな数字を
15個取ってるって感じか?
MSGBOX("wsrand")
これが理解不能・・・
なんで値じゃなくて
String型の文字列を
表示させてるんだ・・・?
0080デフォルトの名無しさん
2007/02/05(月) 18:49:290081デフォルトの名無しさん
2007/02/05(月) 18:53:29http://f8.aaa.livedoor.jp/~spring/up/img/089.jpg
http://f8.aaa.livedoor.jp/~spring/up/img/088.jpg
やろうとしていることは、File1で表示されている名前をtxtFileNameに表示させて、
ファイル名を変更して上書きしたいのですが、実行すると、エラーで「ファイルがみつかりません」
となってしまいます。
プログラムをどのように変更したらいいのか、教えてください。
0082デフォルトの名無しさん
2007/02/05(月) 19:12:07てか、そもそも変更の元になるVBのソースはどこだよwww
↓と言う事でエスパーヨロwww
0083デフォルトの名無しさん
2007/02/05(月) 19:37:58Nameのファイル名のところ、なんでダブルコーテーションで囲ってるの?
0084デフォルトの名無しさん
2007/02/05(月) 19:47:010085デフォルトの名無しさん
2007/02/05(月) 20:45:13VBAならオフィス持ってれば無料で手に入るw
0086デフォルトの名無しさん
2007/02/05(月) 20:46:32開いたときに、ときどきフォームの高さが変わるんですけど
原因はなにがかんがえられますでしょうか?
008786
2007/02/05(月) 21:04:12008886
2007/02/05(月) 21:34:490089デフォルトの名無しさん
2007/02/05(月) 22:55:37そうなる事がある
VBの統合環境のバグっぽい
0091デフォルトの名無しさん
2007/02/06(火) 05:48:20VFAT初期化エラだ氏ねw
レジ復帰させて戻したが
あークリーンインスコしないとだめぽいメンドクサ
やめたw
0092デフォルトの名無しさん
2007/02/06(火) 09:00:040093デフォルトの名無しさん
2007/02/06(火) 11:16:02Do
DoEvents
処理A
Do
処理B
Loop
Loop
というコードがある場合、処理Bのループ中にもDoEventsの効果は働くのでしょうか?
また次の場合はどうですか?
Do
DoEvents
Call SHORI
Loop
Sub SHORI
Do
処理
Loop
End Sub
0094デフォルトの名無しさん
2007/02/06(火) 11:26:17DoEventsは、その実行時に溜まってたイベントキューを処理してお終い。一期一会なの。
0095デフォルトの名無しさん
2007/02/06(火) 11:49:52大変よく分かりました!ありがとうございました。
0096デフォルトの名無しさん
2007/02/07(水) 11:29:11受信データ(OutlookExpress)は、問題なく取り出せるのですが、
次の2点で苦慮しています。
�@受信トレイの内容は取り出せるが、受信トレイ下のサブフォルダは何もしてくれない。
�A取り出すと全て、既読になってしまう。
サブフォルダの指定はあるのでしょうか、そして既読・未読を変更することなく
処理できないものでしょうか?
0097デフォルトの名無しさん
2007/02/07(水) 12:48:55自動でドキュメントを作成するツールで
皆様のお薦めはないでしょうか?
A HotDocumentは体験版がないし、
Vα体験版だとドキュメント生成中に
「オーバーフローしました」なんてエラーで
まともにドキュメントが生成されないので、
他の選択肢を探しています。
0098デフォルトの名無しさん
2007/02/08(木) 15:28:19俺もかじった事しかないけど
受信フォルダ限定で既読になりますよ
って制限してたきがする
結局大人しくBASP21つかってガリガリ自作したけど(;´∀`)
0099デフォルトの名無しさん
2007/02/08(木) 15:49:520100デフォルトの名無しさん
2007/02/08(木) 15:54:28そんな事より・・・
やらないか?
0101デフォルトの名無しさん
2007/02/08(木) 16:13:11■ このスレッドは過去ログ倉庫に格納されています