(*´д`*)ウッ… VB初心者質問スレ Part15

[0001 エロチカセブン NG NG]

　　Part 1 http://piza.2ch.net/tech/kako/968/968328471.html
　　Part 2 http://piza.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/test/read.cgi/tech/1026642565/
　　Part13 http://pc3.2ch.net/test/read.cgi/tech/1029241786/l50
Win32 API関連スレ
　　Win32API 質問箱 Build4
　　http://pc.2ch.net/test/read.cgi/tech/1023361418/
心得
壱．質問する前に過去ログにも目を通してみる。
弐．質問する前に MSDN などで調べてみる。
参．VBScript もこのスレでOK。
４．インストーラーなどの質問もOK。
五．下ネタもたまにならOK

[0198 デフォルトの名無しさん NG NG]

>>197
VBはUnicodeで文字を管理しているので半角も2バイトです。

[0199 デフォルトの名無しさん NG NG]

>>188
どうでもいいことだが、strという変数名はいやだなあ。

[0200 デフォルトの名無しさん NG NG]

>>197
FAQだけど
LenB(StrConv(文字列, vbFromUnicode))

[0201 デフォルトの名無しさん NG NG]

>>197
普通は LenB(StrConv("hogeほげ",vbFromUnicode)) かな。
他に方法あったかな？

[0202 NG NG]

ＡｃｔｉｖｅＸＤＬＬ側で、そのＤＬＬを呼び出した側のウィンドウのハンドルを
取得できるのでしょうか？

[0203 デフォルトの名無しさん NG NG]

スタンダード版を買ってきてインストールしようとしたのですが、
最初の方のコンポーネントチェックでIE6でなと駄目と言われて
無理矢理インストールされそうになります。

2chのAAの関係でどうしても今使ってるIE5.01を残したいのですが、
IE6を入れてからIE5.01に戻すなんてことはできるのでしょうか？
ひょっとしてIE6を入れなくてもインストールできる方法があったりします？

[0204 デフォルトの名無しさん NG NG]

>>203
VMwareで解決!

[0205 デフォルトの名無しさん NG NG]

>>203
.NET?

[0206 デフォルトの名無しさん NG NG]

>>204
何のことか分からないので検索してみます。

>>205
はい、VisualBasic.net　Standard　です　

[0207 デフォルトの名無しさん NG NG]

>>203
.NETって事は、OSは2000かXP使うんだろ？
だったらIE6でも何もせずにフォント設定できるからAA問題なしじゃん。

仮に9x系でもズレを直すパッチってあるぞ。

つうわけで、IE6いれなされ。

[0208 203 NG NG]

え、IE6でもずれないんですか？
OSはWindows2000の英語版使ってます。
とりあえず試してみますね。
駄目だったらそれまでということで(^^;
みなさんありがとうございました。

[0209 みやさん NG NG]

ＶＢ（Access）ではNULLと空の文字列（""）って同じですか？

[0210 デフォルトの名無しさん NG NG]

･ｵ･ﾖ･ﾍ･ﾃ･ﾈ･ﾞ･ｹ･ｯ､�ｼ霹ﾀ､ｹ､�､ﾋ､ﾏ､ﾉ､ｦ､ｷ､ｿ､鬢､､､､ﾎ､ﾇ､ｷ､遉ｦ､ｫ｡｣

[0211 デフォルトの名無しさん NG NG]

>>209
　「ＶＢ（Access）では」っていう書き方が気になるが
　違うものだろ　普通　＜NULLと空の文字列（""）

[0212 ふぅ NG NG]

VBで、FlashGetや、Irvineにあるような
分割ダウンロードを実装するにはどうしたらいい？
ちなみにもう普通のダウンロード部分は出来てるんですが・・・。

[0213 デフォルトの名無しさん NG NG]

まず最初に普通にGET投げてContent-Lengthを得る。
その値を分割数で割り、
それぞれRangeヘッダ付けて分割数ぶんだけコネクション張りってな感じでは。

[0214 ふぅ NG NG]

>>213
あんたデキるナ？

[0215 デフォルトの名無しさん NG NG]

サブネットマスクを得るにはどうしたらよいのでしょうか。

[0216 デフォルトの名無しさん NG NG]

そりゃやろう思えばできるんじゃないかな。
でも既存のソフトに対抗できるクラスのものをVBで作ろうとしたら、
無謀とういうもので、やろうとは思わん。

[0217 ふぅ NG NG]

>>213
どうもです。
＞Rangeヘッダ付けて分割数ぶんだけコネクション張り
ここが私が知りたかった核心部分でした。助かります。

ちなみに、こんなことしてる理由はといいますと、実は
ダウンロードツールを作ろうとしているのでは無いです。
とあるオンラインゲームを作ってるんですが、そういうのってソフト側から
自動でパッチ落としてきて適用しますよね。
そのパッチを落とすときに必要っぽいんですわ。

[0218 216 NG NG]

あ、>>214は「あんたデキるナ？」って書いてあったのか。
「あんたデキる？」って聞かれたのかとｵﾓﾀ。

[0219 デフォルトの名無しさん NG NG]

>>217
なあVB初心者スレだぜ。

[0220 デフォルトの名無しさん NG NG]

>>219
だからなに？

[0221 デフォルトの名無しさん NG NG]

>>220
人工無能ですか？

[0222 デフォルトの名無しさん NG NG]

>>221
質問に答えるのを拒絶したか。答えられないなら別にそれでいいがね。

[0223 デフォルトの名無しさん NG NG]

>>222
コマンドまたはファイル名が違います．

C:\>

[0224 デフォルトの名無しさん NG NG]

VisualBasic6.0でｸﾗｽにMultiUseﾌﾟﾛﾊﾟﾃｨを定義してActiveXDLL
を作っています。

おもに、IIS上のASPからCreateObjectで関数を呼び出して使うた
めです。その関数は、別のWebｻｰﾊﾞへHTTP通信をして値を取得
するという動作をします。

HTTP通信をするためにWinsockｺﾝﾄﾛｰﾙを使用しました。開発環境
(Windows2000)では動作しましたが、それをWindows2000Server上
で動かそうとするとWinsockのConnectでｺｹてしまうんです。

ｾｯﾄｱｯﾌﾟ媒体を作成したり、ocx周りの不足は散々確認したのですが
どうしても動きません。同じｿｰｽをNT4.0Server上で展開してｽﾃｯﾌﾟ
実行して確認すると動作します。pingも通ります。他のｺﾝﾄﾛｰﾙは
使っていません。

なにか考えられることはありませんか・・・。

[0225 224 NG NG]

ｺｹるというのは、間髪入れずに、接続ｴﾗｰ番号9を受信して
しまうと言うことです。

[0226 NG NG]

プログラムは ベテランですが ＶＢは 最近、始めたので
初心者ですが、何か？

[0227 デフォルトの名無しさん NG NG]

>>226
お前、ふぅ？

[0228 FIGHT NG NG]

現在VB6.0SP5.0を使用しております。TreeViewコントロールでエクスプローラのような階層の
表示をさせております。
例）
＋神奈川県
　＋蒲生町
　＋米五町
＋東京都
　＋安芸町
　＋三輪町
のように上記のようなデータがあるとします。（１００件ほど上記のデータが続きます）そこで検索
の画面をだして該当する場所を指定したいのです（カーソルが移る）「神奈川県」の「米五町」を指定
させた場合そこの階層が開いてわかるようにしたのです。何かよい方法はないでしょうか？
サンプルなどがあればそこのHPなども紹介して欲しいのですが・・・。
よろしくおねがいします。

[0229 NG NG]

>>228

町名が 複数ある場合は、どうするんだ？

[0230 FIGHT NG NG]

＞229
ユーザー側に検索させる時は、「県」と「町名」を必ず指定させます。
町名の重複はあっても県名の重複はないですよね。

[0231 NG NG]

県のすぐ下が町ってのも変だに。

東京は
東京都なんとか区なんとか １−１−１
というふうに 町名がつかない場合がある。
神奈川県なんとか市なんとか町 なんとか １−１−１
というパターンもある。
また、田舎だと
なんとか県なんとか郡なんとか町なんとか大字なんとか小字なんとか １
とかいうのもある。
つーか
配列に 階層に入ってるもの（入れるときに）別に入れてやって
その配列で、何番目か調べて 開けばいいじゃん。

っーか TreeViewの何番目を開けってのは知らん（爆）

[0232 ？ NG NG]

>>230
ツリービューにノードを追加する時にキーを設定する。
キーは検索入力させるデータ（"神奈川県米五町"など）と同じにする。
あとは検索画面（テキスト検索ならInputBoxでいいんじゃない）を表示して
その返り値をtre.SelectedItem = tre.Nodes("神奈川県米五町")って感じにすれば出来上がり。

[0233 デフォルトの名無しさん NG NG]

>>228は中島みゆきオタ

[0234 FIGHT NG NG]

＞231
＞232
なるほどそういう手もありますね。
早速参考にさせていただきます
ご教授ありがとうございます。
＞233
えっと、中島みゆきの歌の「ファイト」ですかね？
ギリギリわかりました。ちょっとかんがえてしまいました。
結構古い歌ですね。なつかしい。ちなみにオタではありませんyo。

[0235 ？ NG NG]

232補足
存在しないキーを指定した場合はエラーになるのでその対応も忘れずに。

[0236 デフォルトの名無しさん NG NG]

>>235に補足
キー文字列には罠があるので注意。勝手に文字の同一視したりする。
できればHexエンコードなどを行った方が安心。

[0237 ？ NG NG]

＞TreeViewの何番目を開け
TreeViewを追加すると自動的に追加された順番でインデックスが付加されます。
後は同様にtre.SelectedItem = tre.Nodes(インデックス)って感じです。

[0238 ？ NG NG]

237訂正　TreeViewを追加→TreeViewにノードを追加

[0239 NG NG]

ループ処理で ＬｉｓｔＢｏｘにアイテムを追加しているんですが、
追加する件数が多いので、ＬｉｓｔＢｏｘの表面に出てる部分の数を追加した
時点で、一旦表示したいんですが、可能でしょうか？

なお、表示後、listbox1.AddItemを 続けます。

[0240 224 NG NG]

>>225の続きです・・・。

同じクラスをPrivateにしてexeを作成したら
ｱｯｻﾘ動作しました。ActiveXDLLではダメな
ようです・・・。

[0241 デフォルトの名無しさん NG NG]

VB6.0でWebBrowserを使いVBのフォームの中にページを表示させるようにしました。
それでなんですが表示されたページの懸賞などの入力フォームなんかに自動入力させたいのですが
教えてください、お願いします

[0242 デフォルトの名無しさん NG NG]

VisualBasic6での質問です。

コモンダイアログで選択した複数のファイルを、
1つずつ取り出したいのですが、うまくいきません。
実際、選択したファイル群は、

"パス ファイル名1 ファイル名2 ･･･"

のようにスペースで区切られた形で取れるのですが、
Split関数を使って以下のようにしたいのですが、だめでした。
(1番目の配列にすべて入っています･･･)

F() : 配列
Files : ファイル群

F=Split(Files," ")

Split関数の使い方の間違い、またはその他のよい方法がありましたら
お教え願います。

[0243 デフォルトの名無しさん NG NG]

>>242
それホントに半角スペース区切り？ NULLだったりしない？
コモンダイアログコントロールは使ったこと無いから知らないけど、
APIならNULL区切りだから、Split(Files,vbNullChar)ってやらなと
駄目だと思うが。

[0244 NG NG]

>>242
スペース区切りだったら C:\My Documents や C:\Program Filesは
どうなる？

[0245 デフォルトの名無しさん NG NG]

>241
君の文章には「何を」という言葉がぬけているぞ。

[0246 デフォルトの名無しさん NG NG]

>>242
ロングファイル名を有効にするフラグを立てた場合はNULL区切り、
無効にする場合はスペース区切りだな。
ちゃんとコモンダイアログのヘルプ(Flags プロパティ)に載ってるよ。
APIの場合でも同様だな。

[0247 241 NG NG]

あ、すいません。
自動入力させたいのは、iniファイルから読み込んだデータです。
懸賞なんかであれば名前や住所などです。
では改めてお願いいたします。

>245さん、ご指摘ありがとうございます。今自分で文章読んでみてアホだなと思いました。

[0248 242 NG NG]

MSDNより
---
[ファイル名]ボックスで複数のファイルを選択できるようにします。
ユーザーは、実行時に Shift キーと上下の方向キーを使って複数の
ファイルを選択できます。
複数のファイルが選択されると、選択されたすべてのファイルの名前を
含む文字列が FileName プロパティに設定されます。
FileName プロパティの文字列内のファイル名は、スペースで区切られます。
---
のようになっています。
特にスペースとしかかかれていません。一応全角、半角、space(1)で
確認しましたがだめでした。

実際の戻り値は、debug.printしたところ、
C:\Documents and Settings test.txt test2.txt
のようになっています。

C:\Documents and Settingsの部分はどうなるんでしょう？

[0249 242 NG NG]

>>243 さん
>>246 さん

cdlOFNLongNamesを設定して、vbNullCharでSplitできました。
ありがとうございます。

>>244 さん

実際上記の方法で取得したときには、
1番目の配列 "C:\Document and Settings"
2番目の配列 test1.txt
・・・
となりました。

[0250 デフォルトの名無しさん NG NG]

>>249
>>248のMSDN、下の方の「解説」の部分にちゃんと書いてあるので読んでおくよーに。

もしかしたら、OSのバージョンなどでcdlOFNLongNamesかcdlOFNExplorer
あたりが勝手に立ってしまうことがあるのかもしれない。無いかもしれないが。

[0251 ？ NG NG]

>>239
Refresh(かDoEvents)すればいいんじゃないかな。
でもひとつ追加するたびにRefreshするととても遅くなるので
ループカウンタがいくつになった時、とかにすればいい。
もしくはループを分割してしまえばループ内で分岐判定する必要も無くなる。
コード汚くなるけど。

[0252 NG NG]

>>251

そのボックスに表示できる数にいったら、一旦 Ｒｅｆｒｅｓｈさせてるけど
ダメなようです。
その後は、Ｒｅｆｒｅｓｈさせてませんが。

[0253 デフォルトの名無しさん NG NG]

DoEventsはよ。

[0254 NG NG]

>>253
ああ なるほど！

DoEventsでｏｋだ。
さんくすこ

[0255 NG NG]

>>251
Refresh(かDoEvents)って 書いてあったらから 同じもんかと
思っちゃったヨ！

Delphiだったら どうやったらいいか知ってたんだけどね。
ＶＢは あんましやってなかったからさ。
おかげで 表示が 速くなったヨ。

[0256 デフォルトの名無しさん NG NG]

Winsockコントロール使って、サーバアプリケーションを作っています。

ConnectionRequestイベントの中で、acceptしたあと、
すぐにErrorイベントが2回続けて発生することがあるんですけど。

エラーの内容は、エラーコード=10053 「ﾀｲﾑｱｳﾄまたは他の問題によって、接続が中断されます」。

具体的になにが原因なのでしょうか？

[0257 デフォルトの名無しさん NG NG]

LAN上にあるVB製exeを起動したら、
ランタイムやコンポーネント(ocx）などは、
そのLAN上のマシンから読みとられるんですか？
それとも起動したマシンから読みとられるんですか？

[0258 NG NG]

Dim lRtn As Long
lRtn = SetWindowPos(form1.hWnd, -1, 0, 0, 0, 0, &H40)

これで 最前面に表示させようとしてますが、
実行すると タスクバーにもうひとつバーが表示されて
ほかの画面をクリックすると それが 最前面になってしまいます。

常に 最前面にするには どうしたらいいのでしょうか？

[0259 デフォルトの名無しさん NG NG]

>>257
よみとられません。

[0260 デフォルトの名無しさん NG NG]

>>256
サーバーアプリはVBじゃないほうがいいと思う

[0261 デフォルトの名無しさん NG NG]

>>258
Private Const HWND_TOPMOST = -1
Private Const SWP_SHOWWINDOW = &H40
Private Const SWP_NOACTIVATE = &H10
Private Const SWP_NOMOVE = &H2
Private Const SWP_NOSIZE = &H1
SetWindowPos hWnd, HWND_TOPMOST, 0, 0, 0, 0, SWP_NOACTIVATE Or SWP_NOMOVE Or SWP_NOSIZE

多分、SWP_NOMOVEとSWP_NOSIZEを入れてないせいでしょう。

[0262 258 NG NG]

lRtn = SetWindowPos(Me.hWnd, -1, 0, 0, 0, 0, &H43)
とやったら ＯＫでした〜〜

ＡｃｔｉｖｅＸ ＤＬＬだと Ｆｏｒｍ1のハンドルという取得の仕方ができないらしい

[0263 秋山蓮 NG NG]

>>262
はしゃぐな！！

[0264 デフォルトの名無しさん NG NG]

VB画面(frmAA)上からコマンドボタンを押したら
MDBへのデータ登録を行い、
登録が上手く行ったら
その画面(frmAA)のForm_Load処理を通すようにしたいんですけど、
その場合、

unload me
frmAA.show

と書く以外に良い方法ありますか？

[0265 デフォルトの名無しさん NG NG]

>>264
単純にForm_Load呼び出したら？って言うかその仕様妙かも。

[0266 デフォルトの名無しさん NG NG]

VB6+ADOでアプリを組んでいます。

あるレコードのフィールドAが更新されたら、その値に応じてフィールドBを更新しようと、
FieldChangeComplete イベント内に
pRecordset.files("B").Value=hoge
と言うコードを書いたのですが、「コンシューマのイベントハンドラはプロバイダの再
入不可能なメソッドを呼び出しました」となりうまくいきません。WillChangeFieldイベ
ントでも同様でした。

いい解決方法があれば教えていただけませんか。

OLD DB Provider は ODBC 、サーバはPostgreSQLを使用しています。

[0267 デフォルトの名無しさん NG NG]

>>241
無視されてかわいそうだから教えてあげる。
でもその手の垢取りツールまがいのものはあんまり好まれないから
こういう場で堂々と質問するのはちょっとマズったね。

それで、質問についての回答だけど。
ずばり、良い方法は無いと思って良い。俺も前やったことあるので。
無理矢理やるなら、WebBrowserコントロールにフォーカスを当てて
SendKeysでTabキーを送ってやれば、WebBrowser内で次のフォームか何かにフォーカスが移る。
そうして{TAB}{TAB}{TAB}{TAB}とやっていって、入力欄にフォーカスが行ったら
これもスマートな方法じゃないが、一旦入力したい文字列をクリップボードにコピーし
SendkeysでCtrl+Vを送る。（貼り付け）
こうすることでWebBrowserのフォーカスのある項目に文字列をセットできる。
次の項目にまた文字列を入れたい場合は、一旦クリップボードの内容をClearしてから
その項目に入れたい文字列をクリップボードにまたコピー、SendKeysでCtrl+V。

[0268 デフォルトの名無しさん NG NG]

みんなよけろ あきやまれん だけは ゆるせない！

[0269 デフォルトの名無しさん NG NG]

VBでシステム時刻（通算秒）を取りたいのですがどうしたら良いでしょうか？
わかる方教えてください。お願いします。

[0270 デフォルトの名無しさん NG NG]

Time関数ちゃうのン？

[0271 デフォルトの名無しさん NG NG]

>>241
受け取ったHTMLのStringを解析し、
input タグ内の value プロパティを任意の文字列に入れかえたHTMLを表示ってのが好きそうなやりかただけど。

何に使うのかわからないけど、決まりきったフォーム内容なら
最初からPOSTメソッドを作成して送るほうが手っ取りばやいと思うけど。

その場で図書券のスリーマンモスの時はそれにしたなぁ（藁
クッキーデータも取得して作成しなければならなかったけけど。

[0272 デフォルトの名無しさん NG NG]

>>271
ユニックスタイムスタンプみたいに、
通算秒にできればいいんですけど。
TIME$ でふたつの時間さを求めるには、秒や分が60までしかなかったり、
23の次が0だったり、
2月が28や29だったり30や31の月があったりするところで大変なので。

[0273 271 NG NG]

つづき。
または、onLoad関数に、

document.forms[0].name.value='hoge'

とかいうのを付加してHTMLを表示させるとか。

[0274 デフォルトの名無しさん NG NG]

>>272
timerじゃだめなのか？

[0275 デフォルトの名無しさん NG NG]

ディスプレイの解像度を変更してフルスクリーン化するプログラムを作りたいです。
DirectXとか使わないと無理なんでしょうか？

[0276 デフォルトの名無しさん NG NG]

ChangeDisplaySettings？

[0277 241 NG NG]

>>267 >>271
お二方ありがとうございます！！
>でもその手の垢取りツールまがいのものはあんまり好まれないから
>こういう場で堂々と質問するのはちょっとマズったね。
なるほどそうだったんですか・・。大変勉強になりました。
では、早速両方の方法で試して見ます。本当にありがとうございました！！

[0278 デフォルトの名無しさん NG NG]

>>272
Time関数から時分秒がわかるから、後は掛け算足し算だけじゃん。

[0279 デフォルトの名無しさん NG NG]

サブネットマスクの取得はどうすればいいのでしょうか。

[0280 デフォルトの名無しさん NG NG]

サブネットマスクって洗濯機に入っているゴミを集めるあれですか？

[0281 NG NG]

>>280
煽りで程度がわかるな。

[0282 デフォルトの名無しさん NG NG]

ある絵の上にマウスポインタを持っていくと、別の画像に切り替えるようなことはできますか？

[0283 デフォルトの名無しさん NG NG]

>>282
できます。

[0284 初心者 NG NG]

質問させていただきます。

フォーム上にコントロールがいくつかある時、現在フォーカスを持っている
コントロールは Screen.ActiveControl で確認できますが、
「今現在の"一つ前"にアクティブだったコントロール」を取得するにはどうしたらよいですか？
グローバルな変数を用意して、全てのコントロールの LostFocus 時に
コントロール名を保存しておく……と、これくらいしか思い浮かびません。

よろしくお願いします。

[0285 デフォルトの名無しさん NG NG]

Window98なんだけど、どういうシリアルキーで登録したかみるにはどうしたらいいでしょうか？

[0286 デフォルトの名無しさん NG NG]

>>284
なんでそんなものを取得したいの？
何をやりたいのかわからんけど、
たぶん別のアプローチで解決できると思うよ。
どうしても！ってことなら、
サブクラス化とかで方法がない訳でもないだろうけど。(思いつき発言)

一つ前のアクティブコントロールなんて
普通必要がないから簡単に取得できないんだと思わない？

[0287 284 NG NG]

>>286
ありがとうございます。
一つ前のアクティブコントロールを取得したい訳は、
「あるボタンが押されるとある処理が走るが、それがエラーになった場合、
　フォーカスを元の位置（ボタンをクリックする前の位置）に戻したい」
という仕様にしたいのです。

別のアプローチとはどういうことでしょうか。

[0288 デフォルトの名無しさん NG NG]

>>287
「状態」を保存しておく変数をひとつ持ってそれをもとにアクティブにするコントロールを割り出すとか。
各コントロールの状態からアクティブにすべきコントロールを返す関数を用意しておくとか。
いろいろあるじゃん。

[0289 デフォルトの名無しさん NG NG]

>>287
タイマーコントロールでグローバル変数にアクティブコントロールを
保存しとくってのがVB房らしくていいぞ

[0290 デフォルトの名無しさん NG NG]

>>287
タイマーコントロールで1秒おきにグローバル変数にアクティブコントロールを
保存しとくってのがVB房らしくていいぞ

[0291 284 NG NG]

>>288
ありがとうございます。

>「状態」を保存しておく変数をひとつ持って〜
つまり、状態Ａならこれ、状態Ｂならこれ……という感じですかね。
その状態の"変化"を感知するにはやはりすべてのコントロールのイベントプロシージャが
必要になってくるのかな、と思いますが、どうでしょうか。

>各コントロールの状態から〜関数を用意しておく
その関数内ですべてのコントロールを調べて該当のものを返す、と。
つまりコントロールになにかしらの目印(フラグ)が必要になってきますね。(Tagプロパティを使ったり)
だとするとやはり、各コントロールのイベントプロシージャを記述する必要が……(?)。

[0292 284 NG NG]

>>289 >>290
ありがとうございます。
タイマーを使うとは考えつかなかったです。
確かにこれで要件は満たせそうですが、極力無駄なイベントを発生させたくないのと、
タイマーコントロールは規約で使用不可だった気が……ｽｲﾏｾﾝ。

[0293 デフォルトの名無しさん NG NG]

>>292
タイマーはおそらくネタだから無視しろ。

[0294 284 NG NG]

>>293
あっ、そうなんですか（笑）
失礼しました。
「そういう方法もあるな」とマジメに思ってしまいました（笑）

[0295 デフォルトの名無しさん NG NG]

>>269
UNIX時間が欲しいなら、
UnixTime = DateDiff("s", #1/1/1970#, dateVB) - 32400 'JST-9
で取れる。

[0296 ？ NG NG]

>>291
フォーカスの移動自体を無くせばいいと思います。
イメージコントロールはフォーカスを取得しないので、
押されてない状態のボタンの絵と押された状態のボタンの絵を
イメージコントロールで切り替えてそれをコマンドボタンの代わりにすればよろしいかと。

[0297 デフォルトの名無しさん NG NG]

>>294
ネタじゃねーぞ