v（･∀-）b VBプログラマ質問スレ(6.0以前) Part25
■ このスレッドは過去ログ倉庫に格納されています
0001デフォルトの名無しさん
NGNG前スレはこちら
Part16 http://pc3.2ch.net/tech/kako/1034/10343/1034302532.html
Part17 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://pc2.2ch.net/tech/kako/1041/10418/1041879465.html
Part21 http://pc2.2ch.net/tech/kako/1044/10440/1044028945.html
Part22 http://pc2.2ch.net/tech/kako/1046/10463/1046354784.html
Part23 http://pc2.2ch.net/tech/kako/1047/10477/1047743187.html
Part24 http://pc2.2ch.net/test/read.cgi/tech/1050151126/
VB.net関連スレ
【老若】VB.net質問ｽﾚ【男女】 (Part2)
http://pc2.2ch.net/test/read.cgi/tech/1043629429/
Win32 API関連スレ
Win32API 質問箱 Build10 (979)
http://pc2.2ch.net/test/read.cgi/tech/1047819779/
心得
壱．質問する前に過去ログにも目を通してみる。
弐．質問する前に MSDN などで調べてみる。
参．VBScript もこのスレでＯＫ。
四．インストーラーなどの質問もＯＫ。
五．荒らしは相手しない。
六. VB情報募集中。
七. VB.NETはスレ違い
0233224
NGNGこれだと、エンターを押した場合は画像開けるのですが、
タブの場合だと、開くボタンにカーソルが移るだけになってしまうんですが、どうすれば
タブキーでも画像を開けるようになるんですか？
0234デフォルトの名無しさん
NGNG「>>230」！！！！！！！！
0235あ
NGNGCase vbKeyTab, vbKeyReturn
なのにエンターキーだと
Call OPEN_BTN_Click
が呼ばれてタブキーだと呼ばれない？
そんなはずはない。
もう一度よく確認。
フォーカスが移動するのは別問題。
テキストボックスのExitイベントで抑止できる。
0236あ
NGNG0237デフォルトの名無しさん
NGNGこれを使って株の自動注文システムみたの
くめないでしょうか？
具体的にはIEの注文画面のある特定の数字を拾い
この数字が既定の値、または変位がいくつになった時に
自動で株注文をボタンをクリックし自動で買う数量
や損切りの額などを入力し注文をだすというものです。
じつは今結構勝っていまして、この手法を是非自動化したい
と思いまして聞いたのです。
もねがいします。
0240デフォルトの名無しさん
NGNGがんがってプログラムを作ってウプしてください
それでこのスレのみんながお金持ちになれば
あなたは英雄です
0241あ
NGNG漏れが作ってみて大丈夫だったのでソースうぷした。
試してみてくれ。
http://www.puchikomi.net/php-bin/uploader/datafile/puchikomi441.zip
0242２３７
NGNGレスありがとう。
ではVB4.0で自動注文は可能とみてよろしいですか？
プログラムさえ出来れば言語は簡単なほうがいいと思ったのと
今手元にある言語はそれしか無かったもので
質問しました。
しかし仮に出来るとしても、説明書ないから難儀しそう・・
0243224
NGNGありがとうございます〜。
それを作りたかったんです〜。
ただ、スクロールバーを付けると、やはりタブでは開けなくなってしまいます。
かといって、TabStopをFalseにするわけにもいかないので・・・。
（教授のexeはきちんとタブで開く＆移動する）
もう少し、頑張ってみます。
0244あ
NGNGすまん、わからん。
サブクラス化しかないと思う、、が、
>198いわく、他に方法がらしい。
気になるので方法希望！
おなじこと考えている人がいてびっくりしました。
しかも私もちょうどＶＢ４を持っています。
もし良かったら一緒に開発しません？
連絡下さい[email protected]
↓これ私ｗ
>>http://pc2.2ch.net/test/read.cgi/tech/1051882835/606
0246デフォルトの名無しさん
NGNG0247デフォルトの名無しさん
NGNG>>245
VB4 には、インターネット関連の機能は含まれていなかったはず。
となると、Winsock やら Inet やらの API を使うか、その辺のコンポーネントを
探してこなくちゃならない。
あと、当然 https になるんだろうけど、その辺の実装が↑でできるのか
わからん。
0248デフォルトの名無しさん
NGNGプログラム売買？
禁止されてなかったっけ？
0249248
NGNGプログラム売買
様々な投資基準を基にした一定の条件で、
売り買いの判断をするようにプログラムを組んだコンピューターで株式を運用することをいい、
東証は｢一度に行う25銘柄以上の売買｣に報告義務を課している。
この売買を行う際に、コンピューターから一度に多数の銘柄が発注されることが多いので、
単純なコンピューターによる売買と同一視されることがあるが必ずしもそうではない。
また、同じ意味で｢システム売買｣という言葉を使う向きもあるが適当ではない。
0250224
NGNGあまりにもわからんから、教授にメールしたところ
「TextBox の LostFocus イベントハンドラを作成します。その中味は『開く』
ボタンがクリックされた」時の動作をする（呼び出す）だけ。」
と返信が来たんだが、さらにわからんようになっちまった・・・。
0251
NGNGげ、そうなんですか・・・。
ではＶＢのバージョンいくつからなら、インターネット対応してるのでしょうか？
>>237のようなことが出来るのはバージョンいくつからでしょうか？
>>248
いや、禁止されてなかった・・・はず・・・なような・・・・。
0252デフォルトの名無しさん
NGNG0253デフォルトの名無しさん
NGNGあー、なるほど。
tabキーを押すとフォーカスが移り、LostFocusイベントが発生する。
そのイベントプロシージャを作って
そのプロシージャ内にファイルのロードの処理しろって事。
フォーカスとか分からんかったら自分で調べれ。すぐ分かるだろうから。
0254デフォルトの名無しさん
NGNGフォームのほうでタブを横取りして適当なメッセージをTextBoxに投げれば？
0255デフォルトの名無しさん
NGNGフラグ立てるのかもしれないけど汚いなあ。
0256デフォルトの名無しさん
NGNGまぁ宿題だしな。
作成じゃなくてプログラムを考えるのが主目的な訳で。
0257デフォルトの名無しさん
NGNG0258デフォルトの名無しさん
NGNG0259デフォルトの名無しさん
NGNGそう思いたいんだよねｗ
0260あ
NGNGなーんだ。
LostFocusでいいのか。
>254
Tabキーが押された時はそもそも押されたということ自体通知されない。
>255
試してみたけど、
MouseDownや、押されたボタン等のイベントよりも先に、
LostFocusが発生するのでフラグの立てようが無いのでは？
ボタンをクリックした時、フォームでMouseDownを先に
とらえることもできなかった。
>256
事実教授もそういう考えでこんな問題考えたんでしょうねぇ。
真剣に考えてものすごくあほらしく思えます。
0261224
NGNG明日学校休むか・・・。
0262あ
NGNG教授はこうさせたいんでしょうねぇ。。
Private Sub TEST_TXT_LostFocus()
Call OPEN_BTN_Click
End Sub
0263あ
NGNG自己レス。
でもそれなら開くボタン自体
必要なくなるような気もする。。
ファイルオープンダイアログみたいな
パスを読み出して表示されるボタン等が
あるとも考えにくいし。。
0264デフォルトの名無しさん
NGNG0265デフォルトの名無しさん
NGNG0266224
NGNGいくらテキスト読んでもわかんねえ・・・。
明日は学校休みます。
0267デフォルトの名無しさん
NGNG0268デフォルトの名無しさん
NGNGでも、フックでやるような内容じゃないと思うよ。
0269デフォルトの名無しさん
NGNG0270デフォルトの名無しさん
NGNGクラスはオートメーションまたは予測したインターフェースをサポートしていませんというエラーが出てしまいます。
前はできていたのになぜでしょうか？
0271デフォルトの名無しさん
NGNG0272デフォルトの名無しさん
NGNG0273Defaultの名無しさん
NGNGCommandのGotFocusにピクチャー開く処理を記述するとか。
0274デフォルトの名無しさん
NGNG0275デフォルトの名無しさん
NGNG0276デフォルトの名無しさん
NGNG漏れも糞仕様だと思うけどね。
0277194
NGNGわかる人が居ないのか、どちらでしょうか？(´･ω･｀)
前者なら、追い出して下さい。
0278デフォルトの名無しさん
NGNG年齢計算のコードを書いているんですが、
どうもうまくいきません。
知り合いから、365.25で割る方法とかも聞いたのですが、
これだといわゆる「●年目」の値が表示されてしまい
満年齢の計算が出来ません。
何かいい方法があれば教えてください。
よろしくお願いします。
0279デフォルトの名無しさん
NGNGDateDiffとか？
0280278
NGNG式をみたら、Ｉｎｔ関数使うはずが,間違えてＣｉｎｔ関数使っていました（死
癖って怖いですね・・・
というわけで、お騒がせしました。
>>279
お答えありがとうございます。
Datediffですね。
この関数も別の方法として調べてみます。
0281デフォルトの名無しさん
NGNGi-mode って VBScript 使えないんですか？
aspとVBScriptのセットで画面作成を行うつもりだったのですが・・・
0282デフォルトの名無しさん
NGNG0283デフォルトの名無しさん
NGNGはい、if文駆使した場合分けとか、エラーハンドリングもVBScriptだし。
レジストリ情報取得DLLなど使う場面がありまして、どうしても必要なんです。
0284デフォルトの名無しさん
NGNG0285デフォルトの名無しさん
NGNGそれはサーバー側の話じゃないんか？それともネタか？
0286デフォルトの名無しさん
NGNG0287283
NGNGすみません。なにしろVBScriptを扱うのもi-modeも初めてでして、手探り状態なんです。
しかし、みなさんの意見をみてるとi-modeで表示するhtmlやaspではVBScriptソースは利用できないと考えてよろしいのでしょうか？
0288デフォルトの名無しさん
NGNGレスの催促は慎みましょう。ここは解答スレではありません。よって全ての質問に
答える義務はありません。
0289デフォルトの名無しさん
NGNGどうしてもレスが欲しい質問はこちらへ
VB超初心者スレ
http://pc2.2ch.net/test/read.cgi/tech/1047222540/
ただし書き込みは必ずsageですること
0290デフォルトの名無しさん
NGNGi-modeの仕様くらい、探して読もうよ。
どこにあるんですかなんて言わないでくれよ？
0291デフォルトの名無しさん
NGNGで、どこにあるの？
0292デフォルトの名無しさん
NGNGASPはサーバー側で動くものだから見るほうがimodeだろうがPCだろうが
関係ないよ。よってVBScriptでもOK。
そのVBScriptで吐き出すHTMLがimode用のchtmlという規格に
あったものじゃなきゃだめだよ。
0293デフォルトの名無しさん
NGNGネタなのか？それともi-modeはWindowsで動いてるとでも思っているのか？
0294283
NGNGなるほど。そういう事だったのですか、初心者にご丁寧に教えていただきありがとうございました。
0295デフォルトの名無しさん
NGNG292は間違ってるよ。VBScriptっていえば普通はクライアント側で動かすことだ。
0296デフォルトの名無しさん
NGNG0297デフォルトの名無しさん
NGNG0298デフォルトの名無しさん
NGNGASP触った事無いんだったら素直にそう言えばいいのに・・・
0299デフォルトの名無しさん
NGNG0300デフォルトの名無しさん
NGNGVB6で下記のロジックを動かすと
year は2002のまま
year2は2004となってしまうのですけど何故かわかりません
どなたかご教授願えませんでしょうか？
dim year as integer
dim year2 as integer
year = 2002
year2 = 2003
yaer = year + 0.5
year2 = year2 + 0.5
0301デフォルトの名無しさん
NGNG小数部の.5を整数に丸めるときに、最も近い「偶数」にするらしい。
(なぜこういう仕様なのかは不明)
Int関数を使えば、小数部切捨てになるよ。
0302300
NGNGありがとうございます。
私も調べてみましたところFix関数を使うのがベターだということが
わかりました
http://www.gwork.com/magazine/issue/vb0007.htm
もうすぐ海が見える寂しがり屋達の伝説さワンナイトカーニバルファンファン
0303300
NGNG失礼しました。
0304デフォルトの名無しさん
NGNG0305
NGNG以下のようなプログラムを組みたいのです。ＶＢ６で可能でしょうか？
あるアプリケーションの特定の数字を拾い、この数字が既定の値、
または変位がいくつになった時に、ＩＥなどのブラウザで自動で
株注文を出す（ボタンをクリックし自動で買う数量や損切りの額
などを入力する）。
よろしくお願いします。
0306デフォルトの名無しさん
NGNGあるアプリケーションによる
0307 305
NGNGレスありがとうございます。
アプリケーションによるとのことですが、どんなアプリなら可能でしょうか？
私が予定しているアプリケーションはマーケットスピードというものですが、
大丈夫でしょうか。
0308デフォルトの名無しさん
NGNG可能な可能性は高いが今すぐ君ができるレベルではないと思われる。
0309 305
NGNGどのようなやり方をすればいいのでしょうか？
軽くやり方のヒントだけでも教えてもらえると助かるのですが。
0310デフォルトの名無しさん
NGNG0311デフォルトの名無しさん
NGNGなかなか参考になるようなサンプルソースが見つかりません。
どなたかご存知の方がいらっしゃいましたら
ＵＲＬを教えていただけませんでしょうか？
よろしくお願いいたします。
0312デフォルトの名無しさん
NGNG0313デフォルトの名無しさん
NGNG別アプリの複数の特定座標をクリックする、というものなのですが、ポインタの移動が上手く行きません。過去ログのpart19の>450近辺を参考にしているのですが、クリックは出来ましたがポインタが動かないんです。
ウィンドウハンドル取得->SendMessage(ウィンドハンドル, WM_LBUTTONDOWN, 0, 座標)
というステップだけでは駄目なのでしょうか?
0315デフォルトの名無しさん
NGNG>>312、それとも、自分で登録した Hotkey？ 後者なら、WM_HOTKEY を
サブクラス化したウィンドウプロシージャで取ることになるね。
>>313
そのメッセージは、押したということを示すだけで、マウスカーソルが移動するわけ
ではないよ。ということで、置換できないね。
>>314
QRコードってことは2次元バーコードか。ってことは、その仕様を調べて実装
するしかないんじゃないかな。結構簡単そうに見えるけど、きちんと読み込める奴
を作るのは面倒だと思う。コンポーネントを探したほうがいいんじゃない？
031617
NGNGどうも！そうですデ○ソーが作った二次元バーコードのことです
オレも簡単だと思ってたが実際は数学の専門的な知識が必要なのよ
やってやれんことはないと思うがそこまで時間をかけられん
フリーの DLL なんかもあるがバイナリデータを扱えるものとなると高額でな
ソースどっかにありゃそれ参考にしてと考えていたんだが。。。
0318311
NGNGﾖﾛｼｸ!!
ちんこぉぉぉぉーーーーーーーーーーーーーーっ
ちんっっこっっっっっっっっっっっっっっっっっっっっっっっっっっっっっっっっっっっっっっっっっっっっっっっっっっっっっっっっっっっっっっっっっっっっっっっっっっっっｘっっっっっっっっっっっっっっっっっｃ
0319デフォルトの名無しさん
NGNG死ね
0320313
NGNGΣ(´く_｀ ) ﾅﾝﾄ!!
それではSetCursorPos+mouse_event->SetCursorPos+SendMessageにするしか無い、といことですか?
SendMessageの第4引数の座標というのは何を示しているのでしょうか?
0321デフォルトの名無しさん
NGNGクリックされた位置でしょ？
// horizontal and vertical position
って、ヘルプに書いてあるよ。
0322デフォルトの名無しさん
NGNGいっそのこと一思いに向こうのスレ削除依頼出すか。
0323デフォルトの名無しさん
NGNG他の簡単なヤツにかえるっていうオプションはなし？
0324狂信的アﾊｧ信者
NGNG(彡ﾉり／ﾘﾉ" ﾐ;;;;;;,,,.. ゝ ） あ （
);;; ヾ､;;;;...__,, ）;;;;;;;; ヾ ） お （
i:::) ` ;;ー--､` 〈;;;;;;;::;;; i ） お （
i i::/ ^:::::::.. i ,ll/ﾆi ;; l ） / （
i l ヾヽ'' ﾟ )）ﾉ;; / ） っ （
i | | iにﾆ`i, (_／i;;; | ） !! （
| | ! ｀ｰ‐'" ／ ゞ:l つ (⌒
i l| ! "￣ ,,,. ／,; ﾐi |l
| |i ヾ二--;‐' ,;; ,; ﾐ ||i il i|
| ll ＿|彡" ,' ; ／'￣＾￣''''＼ ||
l ,..-'" 〈 ; ／ ヽ
／ ､, ＼) ,,.-/ `i
` ﾐｰ,;;' ,l l
/ ;; / .| |
ヾ/ ,i' ﾄ |
'i ' /ﾞ` イ !
,;;|o; i| / ヲ /
,;;人,,_ ﾊ / , / ﾘ
‐''"⌒ヾ:;' /'ﾞ i / /ﾐ ﾐ!
＼ ,/ '';; ／ ゞ i
ヽ , ,ﾉ _,,;:' ,i
/ Y ＼ ' ,;;/ _,.;:' l
;;' l :. ＼ / /
i :: i ''::. ＼ / ,;;ｲ
;; . l `'::. ヾ, ';/ |
0325デフォルトの名無しさん
NGNG0326デフォルトの名無しさん
NGNG#Constディレクティブを、モジュール内だけでなく、プロジェクト全体でパブリックな値として
宣言したいのですが、方法がわかりません。
「VB public コンパイル定数」「VB public ディレクティブ」などで検索してみたのですが、
モジュール内での定義しか見つかりませんでした。
プロジェクト全体でパブリックなコンパイル定数はどうやって定義するのでしょうか？
0327デフォルトの名無しさん
NGNGプロジェクトの情報はもちろんプロジェクトにある。
「プロジェクトのプロパティ」→「実行可能ファイルの作成」→「条件付コンパイル引数」
コマンドラインからコンパイルするときは/dオプション
0328デフォルトの名無しさん
NGNGプロジェクト->Project1
から「実行可能ファイルの作成」タブいって条件付コンパイル引数で
bDebugMode = -1
のように記述する
0329デフォルトの名無しさん
NGNGsendinputの使い方がよくわかりません
サンプル等を検索してみたのですが
それでも、ピンときませんでした。
たとえば、ハンドルの取得は無視して座標10，20を左クリックする場合は
どのよーなコードになるのでしょうか？
よろしくお願いします。
0330デフォルトの名無しさん
NGNGこんなんどう？
ttp://www.bcap.co.jp/hanafusa/VBHLP/SendInput.htm
■ このスレッドは過去ログ倉庫に格納されています