simotetsu の回答履歴

こんにちは。GetKeyStateについて質問させていただきます。 ＶＢ６にて、APIの「GetKeyState」を使用し、Tabキーのキー入力判断を行っているのですが、その他の操作(GetKeyStateを判断しているフィールドより マウス左ボタンにて他のコントロールに移動した時等)に、Tabキーを押して いないのに、プログラムはTabキーを押した状態のロジックが動作していま す。下記にそのコードを記述しますので、原因・対処方法がありましたら、 教えてください。 ****コード Private Sub TXT_ATAI_LostFocus() Dim SUBM0030 As SUBM0030_AREA Dim X As Variant If (GetKeyState(vbKeyTab) <> 0) Then If FRM70.TXT_ATAI.Text <> "" Then Call MEDIA_DECODE3_SEC(SUBM0030, "1") If SUBM0030.RETURN_CD <> "0" Then FRM70.GRD1.Col = 7 FRM70.TXT_ATAI.SetFocus FRM70.MousePointer = vbDefault Exit Sub End If End If End If End Sub **** 開発環境 ・ＯＳ：Windows98 4.10.1998 ・メモリ：６４ＭＢ ・ＣＰＵ：Ｐ２－２３３ ・ＰＣ：ＦＭＶ６２３３－Ｄ９

タイトル通りなんですけど、 テーブルにあるフィールドを追加、削除したいのですが、 どうしたらいいのか全くお手上げ状態です。 助けてください。 ADOを使用しています。 お願いします。

こんにちは。GetKeyStateについて質問させていただきます。 ＶＢ６にて、APIの「GetKeyState」を使用し、Tabキーのキー入力判断を行っているのですが、その他の操作(GetKeyStateを判断しているフィールドより マウス左ボタンにて他のコントロールに移動した時等)に、Tabキーを押して いないのに、プログラムはTabキーを押した状態のロジックが動作していま す。下記にそのコードを記述しますので、原因・対処方法がありましたら、 教えてください。 ****コード Private Sub TXT_ATAI_LostFocus() Dim SUBM0030 As SUBM0030_AREA Dim X As Variant If (GetKeyState(vbKeyTab) <> 0) Then If FRM70.TXT_ATAI.Text <> "" Then Call MEDIA_DECODE3_SEC(SUBM0030, "1") If SUBM0030.RETURN_CD <> "0" Then FRM70.GRD1.Col = 7 FRM70.TXT_ATAI.SetFocus FRM70.MousePointer = vbDefault Exit Sub End If End If End If End Sub **** 開発環境 ・ＯＳ：Windows98 4.10.1998 ・メモリ：６４ＭＢ ・ＣＰＵ：Ｐ２－２３３ ・ＰＣ：ＦＭＶ６２３３－Ｄ９

ActiveXでIEウインドウの最小化をしたいのですが・・・。 たとえば、コマンドボタンを押したときにIEウインドウが閉じてVBも終了・・・。 というのは、できますでしょか？

全角のスペースの削除の仕方を教えてください。 例を下に示します。 50桁の変数"name"の中身は"山田　太郎　　　　　　　　　　　"です。 変数の中身は、山田　太郎の後ろは全角のスペースが入っています。 名前の後ろの全角のスペースが半角4桁（全角2桁）以上ある場合は、 それ以降を削除したと思っています。 かなり困っています。良い方法をどなたかご伝授下さい。 宜しくお願いします。

全角のスペースの削除の仕方を教えてください。 例を下に示します。 50桁の変数"name"の中身は"山田　太郎　　　　　　　　　　　"です。 変数の中身は、山田　太郎の後ろは全角のスペースが入っています。 名前の後ろの全角のスペースが半角4桁（全角2桁）以上ある場合は、 それ以降を削除したと思っています。 かなり困っています。良い方法をどなたかご伝授下さい。 宜しくお願いします。

実は少し前ASPのところで質問した内容に似ているのですが いまだ解決できず困っています。 内容は社員番号入力し表示された詳細を編集させる 処理なのですが、既に別のマシンから開かれている（表示されている） 社員番号の情報を取得する方法はないのでしょうか？ 「既に別の人が編集中です。」のようなメッセージや 開く事はできてもなんらかのメッセージが画面上のどこかに表示 されて保存ボタンを押せなくなる等の処理をさせたいのですが。 社員番号等のデータをロック情報として別テーブルにもつ方法が あると思うのですが異常終了時に情報が残ってしまうような気がして 気がすすみません。（データベースの構造はなるべく変更したくない） 参考になるホームページやキーワードだけでも構いませんので よろしくお願いします。 Windows2000sp2 VB6sp5 ADO2.5 DAO3.6

実は少し前ASPのところで質問した内容に似ているのですが いまだ解決できず困っています。 内容は社員番号入力し表示された詳細を編集させる 処理なのですが、既に別のマシンから開かれている（表示されている） 社員番号の情報を取得する方法はないのでしょうか？ 「既に別の人が編集中です。」のようなメッセージや 開く事はできてもなんらかのメッセージが画面上のどこかに表示 されて保存ボタンを押せなくなる等の処理をさせたいのですが。 社員番号等のデータをロック情報として別テーブルにもつ方法が あると思うのですが異常終了時に情報が残ってしまうような気がして 気がすすみません。（データベースの構造はなるべく変更したくない） 参考になるホームページやキーワードだけでも構いませんので よろしくお願いします。 Windows2000sp2 VB6sp5 ADO2.5 DAO3.6