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

1 名前：デフォルトの名無しさん mailto:sage [2007/08/21(火) 12:40:16 ] ここは 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/ ※「まず自分で調べる」クセを身につけよう。 111 名前：デフォルトの名無しさん mailto:sage [2007/09/08(土) 10:56:35 ] 質問があります。 VBScriptで時刻を表示させる時に　午前１０時以前でも "9:xx:xx" ではなく "09:xx:xx" と、ゼロを入れて２桁で時間を表示したいのですが、なにか表示形式指定のオプションみたいなものがあるのでしょうか？ それとも時間、分、秒と別々に取得して自前の関数で補正しないとだめでしょうか？ 112 名前：デフォルトの名無しさん mailto:sage [2007/09/08(土) 11:03:56 ] >>109 その方法で、ビットマップに文字列が保存されるかなぁと疑問だったんだが出来るならいいけど 複数枚の写真が、動画のようなもので時間的に余裕が無いということだろうか？ それともバッチ処理のように、ファイルを連続でということなら>>110が書いているような方法で良い訳だが ちなみに時間短縮ならAPIを使って、DCを自分で作って(CreateCompatibleDCなど) そこにimage.picture.handleを選択して(SelectObject) 文字列を書き込んで(TextOut など) って事をすれば良い こうするととりあえず、DCを画像ごとに生成する必要が無いのでちょっとは早くなるかも 113 名前：デフォルトの名無しさん mailto:sage [2007/09/08(土) 11:15:17 ] >>111 VBSはformat使えないし、formatdatetimeがヘボだから 自分で関数作るのがいいかもね 114 名前：デフォルトの名無しさん mailto:sage [2007/09/08(土) 11:36:04 ] >>113 レスどうもありがとうございます。 なるほど〜そうですか。そしたらこんな感じで自分で作ってみました 今までは MsgBox ( Time ) で実行結果 "9:12:34"だったのを、 MsgBox( Right( "0" & Hour( time ) ) & ":" & Right( "0" & Minute( time ) ) & ":" & Right( "0" & Second( time ) ) ) として、実行結果"09:12:34"になるようにしました とりあえずこれで＾＾； どうもありがとうございました 115 名前：デフォルトの名無しさん mailto:sage [2007/09/08(土) 11:47:18 ] Right(xxx,2)では?と一応突っ込んでおくがw 116 名前：114 mailto:sage [2007/09/08(土) 11:57:16 ] あ〜　失礼しました＾＾； おっしゃるとおり MsgBox( Right( "0" & Hour( time ),2 ) & ":" & Right( "0" & Minute( time ),2 ) & ":" & Right( "0" & Second( time ),2 ) ) でした！ あとちなみに MsgBox FormatDateTime( Time, vbShortTime ) & ":" & Right( Minute( Time ), 2 ) でもなりました もう少し短くならないかな＾＾； 117 名前：デフォルトの名無しさん mailto:sage [2007/09/08(土) 12:05:23 ] >>116 Windowsの”地域と言語のオプション”で左右されそうな希ガス 118 名前：デフォルトの名無しさん mailto:sage [2007/09/08(土) 12:09:37 ] >>116 短くするよりも、精度上げた方がいいけどね time関数は一度しか使わないで、戻り値を変数に入れてからの方が良いよ 119 名前：114 mailto:sage [2007/09/08(土) 12:13:05 ] >>117-118 まじですか そしたら Dim aTime aTime = Time で、 MsgBox( Right( "0" & Hour( aTime ),2 ) & ":" & Right( "0" & Minute( aTime ),2 ) & ":" & Right( "0" & Second( aTime ),2 ) ) って感じにしました 勉強になりますm(_ _)m 120 名前：デフォルトの名無しさん mailto:sage [2007/09/08(土) 13:37:53 ] >>109 一応、ピクチャボックスに書き加えたものまで含めて保存したい場合は、 Picture1.PictureでなくてPicture1.Imageの方を保存ね。 121 名前：デフォルトの名無しさん [2007/09/08(土) 19:03:46 ] VBから他の言語へ「とらば〜ゆ」するのって、簡単ですか？ 基本的なアルゴリズムが理解できてとOSの知識があればOKだと思うんですが。 122 名前：デフォルトの名無しさん mailto:sage [2007/09/08(土) 19:15:33 ] >>121 問題ないんじゃない PCの知識も必要かもしれないが 123 名前：デフォルトの名無しさん mailto:sage [2007/09/08(土) 19:30:00 ] VBしかできない奴のほうがどうかしてる 124 名前：デフォルトの名無しさん mailto:sage [2007/09/08(土) 20:56:57 ] >121 他の言語に移行できないヤツはVBも理解できていない 125 名前：デフォルトの名無しさん mailto:sage [2007/09/08(土) 22:25:54 ] インターネット トランスファコントロールで 動画ファイルをダウンロードするのはどうしたらいいのですか？ text,jpg,zipなんかはできるんですけど なぜか動画は同じ方法ではダウンロードできません もしかしたらこのコントロールではむりですか 参考になるヒントなど教えてください。 126 名前：デフォルトの名無しさん mailto:sage [2007/09/08(土) 23:00:39 ] 動画にも色々あるんだが 127 名前：デフォルトの名無しさん mailto:sage [2007/09/08(土) 23:16:28 ] すまん .flvファイルです 128 名前：デフォルトの名無しさん mailto:sage [2007/09/08(土) 23:39:07 ] >>127 flvか ダウンロードの方法は、保存支援サイトが何をやってるか見ればわかるだろう 129 名前：デフォルトの名無しさん mailto:sage [2007/09/09(日) 01:51:16 ] やりかたは変わらない。 DL厨対策に動画のURLの取得が一筋縄でいかないようになっているだけ。 130 名前：デフォルトの名無しさん mailto:sage [2007/09/09(日) 09:17:20 ] なるほどこのコントロールでできるのですか もう少しじっくりコードを見直してみます。 131 名前：デフォルトの名無しさん mailto:sage [2007/09/09(日) 10:36:27 ] VB6からＶＢ2005に以降したのですが、 ＶＢ6のときにあった、ディストリビューションウィザードがなくなって セットアップディスクが作成できなくて困ってます。 別のツールかなにかで作るのでしょうか？ お勧めがあったら教えてください。 132 名前：デフォルトの名無しさん mailto:sage [2007/09/09(日) 11:26:36 ] >>131 VSI (Visual Studio Installer) 133 名前：132 mailto:sage [2007/09/09(日) 11:27:41 ] ごめんこれはVB６だった。 VB2005は知らんです。 134 名前：109 [2007/09/09(日) 18:07:15 ] >>110 >>112 >>120 レスありがとうございます。 申し訳ありません。話がややこしくなってしまいました。 いっきに処理しなければならないのは忘れて下さい。 私が勘違いしていました。 おっしゃる通りバッチのような感じで処理できます。 ポイントとしては、 ・現在Imageコントロールを使っているので、Imageで文字描画できないか ・Pictureボックスしか無ければ、仕方ないけど、ImageのStrechみたいな 　ボックスの大きさを固定しつつ圧縮する技はないか 以上２点です。 Pictureボックスの大きさを気にするのには理由があります。 処理する前にどの位置に日付を描画するのかを目視したいからです。 写真によっては文字の位置や色なども変えなければ見えませんので。 その為、ボックスの大きさは常に一定で、 Imageのような画像のサイズ圧縮が必要になります。 135 名前：デフォルトの名無しさん mailto:sage [2007/09/09(日) 23:59:38 ] >>134 自分はImage嫌いなのでPictureを二つ用意する。一つは非表示で元画像(等倍)。 表示用にはStretchBltかスクロールバーで表示する。 136 名前：134 [2007/09/10(月) 10:04:06 ] >>135 レスありがとうございます。 基本的な事で申し訳ありませんが、 ピクチャー１のAutoSizeをTrueにすると、 写真が大きい場合、ピクチャー１が画面上からはみ出るのですが これをピクチャー２にコピーしてもうまくいきません。 また、AutoSizeをFalseにすると、写真が小さく表示され、やはり無理です。 どのように対処されていますか？ 137 名前：デフォルトの名無しさん mailto:sage [2007/09/10(月) 10:15:53 ] ステータスバーのSimpleTextの文字色、変える方法ってある？ 138 名前：デフォルトの名無しさん mailto:sage [2007/09/11(火) 01:57:56 ] >>136 元画像AutoSize=True 手法1(Stretch)：StretchBltを使って表示画像に転送 手法2(ScrollBar)：表示位置(原点)を保持しておいてスクロールバーを移動させるたびにBitBlt 手法1の場合完結しているが小さい場合に見づらい。 手法2の場合どんなサイズでも擬似的に表示できる。その代わり制御が少し面倒。 他にも色々あるだろうけど、原寸そのままに表示できない場合は、小さくするか 一部だけ表示させるしかないでしょ。 139 名前：デフォルトの名無しさん mailto:sage [2007/09/11(火) 21:28:45 ] VB6で、WinSockコントロールを使ってのソケット通信について質問します フォームにWinSockコントロールを複数貼り付けたり Win32APIのWinSock関係を直接操作したりすることなく 複数クライアントとの同時通信などと言うものは可能なのでしょうか？ WinSockコントロールはひとつのインスタンスでひとつのコネクションしかもてなかったと思うのですが・・・ いかがなものでしょうか 140 名前：デフォルトの名無しさん mailto:sage [2007/09/11(火) 21:31:08 ] >139 でけます。 WinSockコントロールを配列にして扱うサンプルがMSDNにあるでよ 141 名前：デフォルトの名無しさん mailto:sage [2007/09/11(火) 21:56:09 ] >>140 ありがとうございます MSDN漁って見つけることができました。 142 名前：136 [2007/09/12(水) 00:43:16 ] >>138 色々と情報を頂いて、頑張ってはみたのですが、 私では実現できないようですので、残念ですが今回は諦めます。 お時間頂いてありがとうございました。 143 名前：デフォルトの名無しさん [2007/09/12(水) 23:11:43 ] 今VBで2chに書き込むプログラム作ろうとしているのですが、どうにも駄目です。 winsockを使用して作ってます。 スレの取得はできるようになったのですが、書き込みの方法がわかりません。 特にクッキーの設定の部分がわかりません。 助けてください。 144 名前：デフォルトの名無しさん mailto:sage [2007/09/12(水) 23:42:59 ] >>143 迷惑だからやめてください 145 名前：デフォルトの名無しさん mailto:sage [2007/09/13(木) 04:54:56 ] >>143 HTTPべんきょうしてください 146 名前：デフォルトの名無しさん mailto:sage [2007/09/13(木) 09:13:32 ] >>143 本当にやる気があるならmonazillaで調べて自分で解決してください 俺はそこで調べて誰にも聞かずにdat取得、スレ書き込みまでできました(スレたてはテストの都合上作成も試みていない) 147 名前：デフォルトの名無しさん mailto:sage [2007/09/14(金) 20:20:32 ] Dim a As New WshShell a.Run　"lame.exe -b 192" みたいな感じでコマンドプロンプトで実行させるプログラム自体は起動できるんですが、 実行中はコマンドプロンプトに制御が移ってしまうのが嫌で、 VB側で実行中のパラメータとかを直接受け取ることって何の関数を使えば出来ますか？ コマンドライン型のアプリケーションを完全にこっちで制御したいんです 148 名前：デフォルトの名無しさん mailto:sage [2007/09/14(金) 20:35:33 ] 色々ぐぐってみたら何となく分かりました。 support.microsoft.com/default.aspx?scid=http://www.microsoft.com/JAPAN/support/kb/articles/JP171/6/54.asp コンソールウィンドウを表示させればいいのかな？でもこれだと表示させるだけで パラメータも受け取れないし・・・WshShell使うのと変わらないですね。。 149 名前：デフォルトの名無しさん mailto:sage [2007/09/15(土) 12:03:16 ] >>147 自作プログラムなら幾らかやりようがあるけど、既製品はまず無理。 作るときは製品のドキュメントをよく読んでいくしかない。 150 名前：デフォルトの名無しさん mailto:sage [2007/09/15(土) 12:39:15 ] >>147 プログラムが終了するまで自プログラムが停止してしまうということだけなら、 3つ目の引数にFalseを指定すれば解消できる。 今度は終了を検地できないけどね。 a.Run　"lame.exe -b 192", 1, False msdn.microsoft.com/library/ja/script56/html/wsmthrun.asp 151 名前：デフォルトの名無しさん mailto:sage [2007/09/15(土) 23:35:54 ] >>150 それなら出来るんですけど、自分のしたいことはコマンドライン型のEXEを、 実行中にパラメータを取得したいんです。具体的にはLameなら実行中のパーセンテージを こっち側のプログラムで取得して、自作のフォームにプログレスバーとして表示したり、完全に制御したいんです。 >>149 既製品は無理なんですか？それはVBの限界ってことでですかね？ 例えば変換君のフロントエンドなんかは、ffmpegのパラメータを実行中に取得してるみたいで・・・同じことをしたいんですが、 VBではどんなAPIを使用しても不可能ですか？ 152 名前：デフォルトの名無しさん mailto:sage [2007/09/16(日) 01:21:56 ] >>151 そりゃきっとVBで可能だとしても、やるとかえって大変ですよ。 他の開発言語・ツールを使った方がいいと思います。 え？なにがいいかって？馬鹿野郎よくググれ。 153 名前：デフォルトの名無しさん mailto:sage [2007/09/16(日) 11:17:54 ] LAMEの画面出力は、プログラムから解析されるような出来になっていないので、 そういう用途ならLAME_ENC.DLLか何かを使ったほうがいいと思う。 VBからどれくらい扱えるかはわからないけど。 154 名前：デフォルトの名無しさん [2007/09/16(日) 14:38:44 ] フォルダにあるテキストのテキスト名をリストボックスに表示して、 テキスト名を選択したときにテキストの内容をテキストボックスに 標示させたいのですが、パスがわかりません。 155 名前：デフォルトの名無しさん mailto:sage [2007/09/16(日) 15:12:19 ] >>154 何をしたくて何が分からないのか分かりません 156 名前：デフォルトの名無しさん mailto:sage [2007/09/16(日) 15:21:43 ] >>154 つ｢App.Path｣ つ｢CommonDialogBox｣ 157 名前：デフォルトの名無しさん [2007/09/16(日) 15:49:28 ] >>155 >>156 回答ありがとうございます。 デスクトップ上にあるフォルダの中のファイルをListViewで表示してます。 ListViewで表示しているファイル名をStreamReaderを使用してテキストの内容を ラベルに表示させたいです。 ファイル名を時間にしていますので、ファイル名のパスを指定できません。 158 名前：デフォルトの名無しさん mailto:sage [2007/09/16(日) 16:04:09 ] >157 > ファイル名を時間にしていますので、ファイル名のパスを指定できません。 ？？？ 159 名前：デフォルトの名無しさん mailto:sage [2007/09/16(日) 16:18:44 ] ゆとりは理由にならない根拠で結果を導き出すから困る 取り付く島がないじゃないか 160 名前：デフォルトの名無しさん [2007/09/16(日) 16:38:23 ] パス名を現在の時間にしており、変更しているからです。 161 名前：デフォルトの名無しさん mailto:sage [2007/09/16(日) 16:55:20 ] 変更しているのは誰？ 自身のプログラム内なら、ファイル名生成のルーチンから ファイル名を横取って来ればいい。 162 名前：デフォルトの名無しさん [2007/09/16(日) 17:03:47 ] VB2005を使用してます。 複数あるプログラムをボタンをクリックした時にCheckboxにチェックが あるときは起動してチェックがないときは起動しないプログラムを 作成したいのですが、方法とコードなどありましたら、ご教授ください。 163 名前：デフォルトの名無しさん [2007/09/16(日) 17:07:24 ] >>161 回答ありがとうございます。 また、ListViewで選択しているファイルののパスを指定する場合の 方法はありますでしょうか？ 164 名前：デフォルトの名無しさん mailto:sage [2007/09/16(日) 20:26:50 ] >>162 想像できない 165 名前：デフォルトの名無しさん [2007/09/16(日) 21:33:42 ] PINGを定期的に行う、プログラムを作成したいのですが、 いいサンプルプログラムとかありますか？ 166 名前：デフォルトの名無しさん mailto:sage [2007/09/17(月) 01:05:24 ] 連休中の宿題か？ ガキでなければキチガイばっかりだなｗ 167 名前：デフォルトの名無しさん mailto:sage [2007/09/17(月) 08:58:54 ] >>163 ListViewにファイル名を入れる時はどうやってそのファイル名を取得したの？ 俺がListViewにファイル名を入れる時は、そのファイル群が置いてあるフォルダを指定し、 検索してフルパスを取得し、ファイル名だけ抜き出して表示させるが この過程においてファイルのパスが分からないという問題は起きないわけだが どう考えてパスが分からないと導き出した？ これで意味が分からないならもう一度勉強し直した方がいいよ 168 名前：デフォルトの名無しさん [2007/09/17(月) 10:47:43 ] ググったりしましたがわからなかったので質問です。 私はDEL使いなんですが、会社で前任者が作ったVBソフトのメンテをやることになりました。 内容はimageコントロールの画像の表示方法に関することです。 なにしろ、VBはVBA程度の知識しかないので カードデータベース風の情報管理ソフトです。 フォームにimageコントロール（以下イメコン）があります。 利用者は自分で撮影したデジカメ写真をフォームに登録して表示させることができます。 しかし、stretch=trueにするとイメコンのサイズに変形されるしfalseにすると一部分しか表示されません。 そこで、フォーム上のイメコンのサイズで収まるようにアスペ比を一定に縮小させる、または、元サイズのままスクロールできるようにしたいんですが、 どうすればいいんですか？ それと、imageコントロールとpictureコントロールの違いって何ですか？ 169 名前：デフォルトの名無しさん mailto:sage [2007/09/17(月) 11:40:31 ] >>168 アスペクト比一定なら、元画像の縦横サイズとImageの縦横それぞれの倍率を取って倍率の小さい方で 縦横同じ倍率で縮小すればいい。 スクロールする場合は表示位置(x,y)を保持して、スクロールバーの値が変わったときに表示サイズの 縦横分だけ抜き出して表示。スクロールバーの値の範囲は0から元画像の幅−表示サイズの幅 ＞imageコントロールとpictureコントロールの違い これくらいは自分で調べてくれ 170 名前：デフォルトの名無しさん [2007/09/17(月) 13:26:51 ] >>168 IPictureDispに画像を保持してRenderメソッドでPicturBoxに描く。 171 名前：デフォルトの名無しさん mailto:sage [2007/09/20(木) 10:17:30 ] 質問です。[VB6,WindowsXP] ボタンを押して始まる処理の中で、DoEventとSleepを使ってかなり長いループを作って これを実行している最中に右上の[×]で終了させるとボタンの処理が遠い世界に旅立つので フォームのQueryUnloadで「End」を書いて終了させているのだけど、何か間違っている気がしてならないです。 これで問題はないものでしょか？ 172 名前：デフォルトの名無しさん mailto:sage [2007/09/20(木) 10:37:31 ] >>171 End命令は即座にVBの実行を停止する命令で、FormのunloadやTerminate、 オブジェクトのTerminateイベントの処理をすべてバイパスする。 ActieX(COM)のアンロード処理も省かれるので、 アウトプロセスサーバーを使ってる場合にActiveX.EXEのプロセスが終了しない。 これらのことが問題にならないなら使っていいよ。 173 名前：デフォルトの名無しさん mailto:sage [2007/09/20(木) 11:33:16 ] >>172 ありがとうございます〜 えーと、やっているのはAPIによるPCIボードのアクセスとシリアルの入出力。 シリアルは閉じるとして、APIのほうはClose命令があるのでソレを発行しておけばよいかな… あと万全を期すため？ EndをQueryUnloadからUnload最後に移動かしら。 174 名前：デフォルトの名無しさん mailto:sage [2007/09/20(木) 13:12:48 ] 「これからこのプログラムは強制終了するお」っていうのをフラグ立てて、 遠い世界へ旅立つループ処理に教えてあげてループ処理を抜けさせるようにすれば？ 175 名前：デフォルトの名無しさん mailto:sage [2007/09/20(木) 13:36:56 ] >>174 その時は遠い世界へ旅立つループ処理が終わるのを待ってあげないとダメなので本末転倒なんだぜ？ 176 名前：デフォルトの名無しさん mailto:sage [2007/09/20(木) 14:25:03 ] >>173 自分の場合メッセージボックスを出してループだけ抜けさせて、Unloadイベントをキャンセル。 改めてユーザー側にもう一度終了させるようにした。 下手に一括でやろうとしてプロセスが残るより安心。 177 名前：デフォルトの名無しさん mailto:sage [2007/09/20(木) 15:51:33 ] >>174-176 あー。ループのほうでトラップ(?)するというのはスッポリ抜けてたす。 ループでフラグ立て→[×]→フラグでUnloadキャンセル→ループ内で「フラグ消し→Unload Me→Exit sub」 とやってみた。 それっぽくなった。 こっちのほうが幸せっぽいかな。 178 名前：デフォルトの名無しさん mailto:sage [2007/09/20(木) 19:00:13 ] 遠い世界に旅だつ、とかなんの意味だかさっぱり分からん。 ダメな奴は本当なにやらしてもダメだな。人に通じる文章すらちゃんと書けないのか。 ループでDoEventsなんて、VBプログラマが嘲笑されるときのネタの定型だぞw しかもなんでSleepかますの？ Sleepの意味分かってるのかねw 179 名前：デフォルトの名無しさん mailto:sage [2007/09/20(木) 19:03:55 ] は？DoEventsはループの中でしかつかわねーしアホか 180 名前：デフォルトの名無しさん mailto:sage [2007/09/21(金) 00:35:49 ] しかし>>178さんは昔からずーっとこのスレでがんばってるなあ。 久しぶりにのぞいてみたけど健在で驚いたよ。 181 名前：デフォルトの名無しさん [2007/09/21(金) 09:34:37 ] >>169 ありがとう。 画像を定比で縮小することはできた。 だけど、スクロールバーで足踏み。 スクロールバーを動かすと確かに図形も動くけど、元の画像がそのまま移動するだけ。 つまり画像を左にスクロールすると、右側には、今まで見えていなかった画像が現れるのではなく、ただのブランクになる もうわけわからん〜 182 名前：デフォルトの名無しさん mailto:sage [2007/09/21(金) 11:13:42 ] デバイスの安定待ちとかの十数ｍｓもタイマーか何かに逃げないといけないものなのか？ 183 名前：デフォルトの名無しさん mailto:sage [2007/09/21(金) 11:41:31 ] MsgWaitForMultipleObjectsは使うがSleepは使わないな 184 名前：169 mailto:sage [2007/09/21(金) 12:11:18 ] >>181 手抜き説明。書き殴りだからあっているかどうか不明 [Form1] '元画像をPicture1に表示、表示用画像にPicture2を用意 '簡単のためScaleModeはPixelで統一 'スクロールバーの値を利用する Private Sub HScroll1_Change() 'HScroll1の値の範囲は0からPicture1.Width-Picture2.Width Bitblt Picture2.hdc,0,0,Picture2.Width,Picture2.Height, _ 　　　　Picture1.hdc,HScroll1.Value,VScroll1.Value, _ 　　　　vbSrcCopy End Sub Private Sub VScroll1_Change() 'VScroll1の値の範囲は0からPicture1.Height-Picture2.Height Bitblt Picture2.hdc,0,0,Picture2.Width,Picture2.Height, _ 　　　　Picture1.hdc,HScroll1.Value,VScroll1.Value, _ 　　　　vbSrcCopy End Sub 元画像と表示画像、スクロールバーの値について適当な絵と値を書いて考えてみれ これでカネ稼ぐんだろうから、少しは苦労しなよ。こんなのは基礎だぞ〜 185 名前：デフォルトの名無しさん mailto:sage [2007/09/21(金) 13:29:26 ] VB6.0でFarPoint SPREAD 3.0を使ってプログラムしています SpreadPreviewを貼り付けたフォームでKeyPreviewをTrueにして フォームのKeyDownイベントをトラップしていると SpreadPreviewにフォーカスが有る時に 一度しか押していないキーのイベントが2度発生してしまいます この症状の解決方法などご存知の方はいらっしゃいませんでしょうか 186 名前：デフォルトの名無しさん mailto:sage [2007/09/21(金) 13:59:43 ] >>185 そういう質問はメーカーに問い合わせるのが先だ 187 名前：デフォルトの名無しさん mailto:sage [2007/09/21(金) 14:12:24 ] KeyDownとKeyUpが走っちゃうって話？ 188 名前：185 mailto:sage [2007/09/21(金) 15:01:14 ] >>186 確かに・・・orz >>187 KeyDownしかプロシージャ追加して無いんで、KeyUpは関係ないと思いたいんですが・・・ 189 名前：デフォルトの名無しさん [2007/09/22(土) 01:20:02 ] >>184 丁寧にすまん。　じっくり勉強させてもらうわ。 だけど、 > これでカネ稼ぐんだろうから、少しは苦労しなよ。こんなのは基礎だぞ〜 いや、だから、俺はdel使いであってVBなんて知らないの。 ただ前任者の尻ぬぐいをしてるだけだって。 190 名前：184 mailto:sage [2007/09/22(土) 17:31:37 ] >>189 Bitbltの変数足りないかも分からんのでヘルプ見直しておくれ。すまん ＞前任者の尻ぬぐいをしてるだけだって よーく分かるｗだが、調べれば結構載っているからな。がんばり〜 191 名前：デフォルトの名無しさん [2007/09/22(土) 23:47:04 ] >いや、だから、俺はdel使いであってVBなんて知らないの。 >ただ前任者の尻ぬぐいをしてるだけだって。 回答になってねぇよｗｗｗｗｗ DEL使いとかじゃなくって社会人かどうか疑いたくなるなｗｗｗｗ 192 名前：デフォルトの名無しさん mailto:sage [2007/09/23(日) 01:08:33 ] >>191 だよなｗｗｗｗｗ 俺もお前のこと疑うぜｗｗｗｗｗｗｗｗｗうぇｗｗｗ 193 名前：デフォルトの名無しさん [2007/09/23(日) 15:23:34 ] >>192 だよなｗｗｗｗｗ 俺もお前のこと疑うぜｗｗｗｗｗｗｗｗｗうぇｗｗｗ 194 名前：189 [2007/09/23(日) 21:59:28 ] >>191 > 回答になってねぇよｗｗｗｗｗ > DEL使いとかじゃなくって社会人かどうか疑いたくなるなｗｗｗｗ すれちになるからあまり深入りしたくないが、ニートのおまえには言われたくねーよ。 うちは別にソフトベンダーでも何でもなくて、業務用アプリを担当部署ごとに作ってるだけ。 仕様書も何もなく放置されていたバグだらけのソフトを、君もプログラミングできるなら何とかしてくれ っていわれてメンテする羽目になっただけだ。 195 名前：デフォルトの名無しさん mailto:sage [2007/09/23(日) 22:07:22 ] >>194 「del使い」じゃなくて「DEL使い」って逝っちゃってるんだから，見逃してやろうぜ・・・ 196 名前：デフォルトの名無しさん [2007/09/23(日) 22:17:24 ] const int * a; const * int a; * const int a; int * const a; * int const a; 違いを教えて下さい 197 名前：デフォルトの名無しさん mailto:sage [2007/09/23(日) 22:24:28 ] その前にVBとcの違いを知るべきではないだろうか 198 名前：デフォルトの名無しさん mailto:sage [2007/09/23(日) 22:25:27 ] >196 書き方が違うだけで全て同じものです 199 名前：デフォルトの名無しさん [2007/09/23(日) 23:10:46 ] >>198 ありがとうございました。 なぞが解けました 200 名前：デフォルトの名無しさん mailto:sage [2007/09/23(日) 23:38:48 ] cdeclプログラム(BSD用バイナリ配布)をみれ 201 名前：デフォルトの名無しさん mailto:sage [2007/09/24(月) 00:34:50 ] >>196 もしCのことならここ読め。 ttp://kmaebashi.com/programmer/pointer.html 202 名前：デフォルトの名無しさん mailto:sage [2007/09/24(月) 01:26:56 ] つうか んっとにカスばっかりだな お前らのうちどんだけが本当のPGとかSEなんだよｗ 203 名前：デフォルトの名無しさん mailto:sage [2007/09/24(月) 01:28:12 ] だってVBスレだよ 204 名前：デフォルトの名無しさん mailto:sage [2007/09/24(月) 09:37:17 ] ネタ質問には全力ボケで返す、基本だろ？空気嫁よｗ 205 名前：デフォルトの名無しさん [2007/09/24(月) 17:42:14 ] VB5.0でフォルダ名の変更ってどうやってやるのでしょうか？？ フォルダ名をリネームするプログラムを作りたいんです ファイル名の変更は出来たんだけど・・・ どなたか教えてください 206 名前：デフォルトの名無しさん mailto:sage [2007/09/24(月) 18:03:42 ] FilesystemObjectつかえばいいんじゃね？ 207 名前：デフォルトの名無しさん mailto:sage [2007/09/24(月) 19:41:58 ] >>205 nameステートメント使えばいいんでね？ 208 名前：デフォルトの名無しさん [2007/09/24(月) 21:20:42 ] イントラネット内に接続されているコンピュータのIPアドレスを 取得したいのですが可能でしょうか？ iphlpapi.dllを使用すれば可能とのことだったのですがコードが 分かりません。 209 名前：デフォルトの名無しさん [2007/09/24(月) 23:50:22 ] 使用環境はExcel VBAなんですが、Excelのスレだとスレ違いになるっぽいのでこちらに質問します。 フォルダパスの文字列の"開始"という文字を"完了"に置き換えたいのですが 現在はパス名をセルに一度書き込んでから エクセルのReplace関数でセルの文字を置き換え、それをコピー先のパス名として変数に代入する みたいな感じでやってます。 コードはこんな感じです。 Cells(1, 1).Value = myStDir Cells(1, 1).Replace What:="完了", Replacement:="開始" myEnDir = Cells(1, 1).Value myFso.CopyFolder myEnDir, myStDir, True これでも動く事は動くんですが、VB上で変数の文字列の一部を置換する事はできるんでしょうか。 210 名前：デフォルトの名無しさん mailto:sage [2007/09/25(火) 00:02:42 ] ヘルプ見ろよ。 VBの文字列関数なんて数が知れてるじゃないか 211 名前：デフォルトの名無しさん mailto:sage [2007/09/25(火) 00:20:43 ] できました・・・・ myEnDir = Replace(myStDir, "完了", "開始") 何かReplaceはVBで使えないって思い込んでました・・申し訳ない・・ 212 名前：デフォルトの名無しさん mailto:sage [2007/09/25(火) 01:33:11 ] >>208 どんな感じのネットワークかわからんから，正直何も言えない まあpingが通るなら単純にネットワーク内に存在する可能性のあるのIPアドレスにpingを送ってみればいいかもな 213 名前：デフォルトの名無しさん mailto:sage [2007/09/25(火) 13:20:33 ] VB6.0の本が売ってません。 214 名前：デフォルトの名無しさん mailto:sage [2007/09/25(火) 13:38:34 ] つブックオフオンライン 215 名前：デフォルトの名無しさん mailto:sage [2007/09/25(火) 15:16:45 ] >>214 いいのがあるか探してみるよ。 216 名前：デフォルトの名無しさん [2007/09/25(火) 17:07:49 ] PCサロン板でこちらを紹介していただいてやってきました。 InputMan7.0を購入して、今まで使用していたVer6.5から7.0に移そうと移 行ツールを試してみたのですが、できるコントロールとできないコントロ ールにわかれてしまいました。 BOC社のサイトで調べてみるとTab上にあるコントロールは認識しないよう なFAQを見つける事ができ、最新版をDLすれば解決するとありました。 早速DLして再度移行ツールを実行してみたのですが、やはりエラーになり 思うような結果が得られませんでした。 この他に、上手く移行できたものでも勝手にフォントサイズが変わってし まう(小さくなる)という現象がおきてしまいました。 何か原因をご存知の方がいましたら是非教えてください。 OSはVISTAでVBは6.0です。 217 名前：デフォルトの名無しさん mailto:sage [2007/09/25(火) 17:15:16 ] BOC社に問い合わせるのが先 218 名前：デフォルトの名無しさん mailto:sage [2007/09/25(火) 18:53:46 ] > OSはVISTAでVBは6.0です。 219 名前：デフォルトの名無しさん mailto:sage [2007/09/25(火) 19:03:53 ] >>218 言いたい事はわかるけど気になったからBCC社のHP見てきた >[必要システム] >Visual Basic 6.0日本語版（Windows 95／98／Me／NT 4.0／2000／XP／Server 2003／Vista） 一応Vista対応謳ってるから>>217でFAだな。 220 名前：デフォルトの名無しさん mailto:sage [2007/09/26(水) 16:32:19 ] VB6/ADODBのしっかりしたリファレンスのサイトか本ありませんか？ 221 名前：デフォルトの名無しさん mailto:sage [2007/09/26(水) 16:37:46 ] ソース中にUnicode文字列リテラルを入れるにはどう書けばいいんでしょうか？ IDEのテキストエディタにU+9B73などをコピペすると化けてしまったんですが… 222 名前：デフォルトの名無しさん mailto:sage [2007/09/26(水) 19:00:44 ] >>221 VBってコンパイラもエディタもS-JISしか対応してないんじゃないの？ むしろそんなことができたら怖いと思うがw 223 名前：デフォルトの名無しさん mailto:sage [2007/09/26(水) 20:11:35 ] >>220 MSDN msdn.microsoft.com/library/ja/default.asp?url=/library/ja/jpado260/htm/mdmscstreamspersistence.asp 224 名前：デフォルトの名無しさん mailto:sage [2007/09/27(木) 00:24:15 ] >>223 MSDNって読みづらくないですか？ でも、なんとか頑張って読んでみようと思います。 ありがとうございました。 225 名前：デフォルトの名無しさん mailto:sage [2007/09/27(木) 01:41:48 ] >>224 辞書引くのって難しくないですか？ まで読んだ 226 名前：デフォルトの名無しさん mailto:sage [2007/09/27(木) 10:00:11 ] リファレンスとして使いにくいと思うのは少数派？ 227 名前：デフォルトの名無しさん mailto:sage [2007/09/27(木) 10:56:28 ] >220 技術評論社の本 www.gihyo.co.jp/books/syoseki.php/4-7741-0859-6 VBの言語仕様をしっかり解説してるのがいいと思う。 ADODBについては微妙だけど。 買っちゃいけないのは、いわゆるHowTo本。 サンプルコードがいっぱい載ってるような奴ばかり読んでると、 コピペしかできないなんちゃってプログラマになりやすい。 228 名前：デフォルトの名無しさん mailto:sage [2007/09/27(木) 12:40:56 ] >>224 なんだ入門書みたいなものが欲しかったのか。 www.microsoft.com/japan/technet/prodtechnol/sql/2000/evaluate/exercises.mspx これの「開発編 No.3 ADO 2.6 入門 」どうぞ。 229 名前：デフォルトの名無しさん [2007/09/27(木) 15:41:03 ] すみません。 ちょっとお聞きします。 任意の期間を設定して、その期間内はForm1へ 期間外はForm2へ としたいのですが、どうすればいいのでしょうか？ 230 名前：デフォルトの名無しさん mailto:sage [2007/09/27(木) 15:50:54 ] 何を言ってるんだお前は 231 名前：デフォルトの名無しさん mailto:sage [2007/09/27(木) 16:56:03 ] ifかSelectでダメなのか？ ？？？ 232 名前：229 [2007/09/27(木) 16:57:07 ] 本当にすみません。 もうちょっと勉強して出直します＞＜ 233 名前：デフォルトの名無しさん mailto:sage [2007/09/27(木) 18:15:59 ] VB6には連想配列はないですか？ 234 名前：デフォルトの名無しさん mailto:sage [2007/09/27(木) 18:19:27 ] Collection使えばいいんじゃね？ 235 名前：デフォルトの名無しさん mailto:sage [2007/09/27(木) 18:24:00 ] Dictionaryでもいいんじゃね？ 236 名前：デフォルトの名無しさん mailto:sage [2007/09/28(金) 10:47:18 ] Dictionary は Microsoft Scripting Runtime を参照設定すると 使えますぜ？ 237 名前：デフォルトの名無しさん mailto:sage [2007/09/28(金) 11:06:15 ] mscorlib.dllを参照設定するとHashtableが使えますぜ？ 238 名前：デフォルトの名無しさん mailto:sage [2007/09/28(金) 11:20:04 ] いやいや専用クラスをイチから自作が最強っしょ？ 239 名前：デフォルトの名無しさん mailto:sage [2007/09/28(金) 11:41:17 ] そこでVB8のとうじょうです 240 名前：デフォルトの名無しさん mailto:sage [2007/09/28(金) 14:19:07 ] Dim test As New Collection test.Add "テスト","test" For Each test2 In test Debug.Print test2 Next この時に、"テスト"は取れますが"test"を取得する方法がわかりません。 241 名前：デフォルトの名無しさん mailto:sage [2007/09/28(金) 14:48:00 ] CollectionからKeyを取得する方法はありません 242 名前：デフォルトの名無しさん mailto:sage [2007/09/28(金) 19:20:59 ] それではRecordsetを使いましょうか？ 243 名前：デフォルトの名無しさん [2007/09/28(金) 23:24:36 ] 外部に依存してもいいならScripting.Dictionaryとかでおｋ イヤならCollection2つ使って自作 244 名前：デフォルトの名無しさん [2007/09/29(土) 18:00:06 ] [VB6 WindowsXP] VB6＆CAPICOMについて質問させてください。 VB６からCAPICOMを利用して、 ファイルの復号化を行おうとしています。 アルゴリズムはAESで、 暗号化は別の言語で施されており、 暗号化時に使用した 鍵とベクトルの情報はわかっている状態です。 MSDNや ttps://www.netacademia.net/tudastar/default.aspx?upid=2781 こちらのサイトのサンプルを見ながら 復号化ロジックをVB6で実装しようとしているのですが、 なかなかうまくいきません。 サンプルを見た限りでは 鍵の設定は　SetSecretメソッドで行っているようなのですが、 ベクトルの設定はどこで行えばよいのでしょうか。 何卒ご教授のほどよろしくお願いいたします。 245 名前：baka ◆Jgn6bakat. [2007/09/29(土) 19:02:56 ] 1

---

---

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

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