いつも参考にさせていただいています。

プログラムが立ち上がるときに、
すでに押されているキーを検出することは可能でしょうか？
具体的には
　subMainから立ち上げ、そのときに"Alt"キーが押されていれば、
　設定用のフォームを立ち上げる。
ということがしたいのですが…

開発環境はWIN2000、VB6　sp6です。
よろしくお願いします。

> プログラムが立ち上がるときに、
> すでに押されているキーを検出することは可能でしょうか？

可能ですが。

> 　subMainから立ち上げ、そのときに"Alt"キーが押されていれば、

Alt キーを押しながらEXEファイルをクリックするとプロパティが表示されるように
なっており、起動そのものができないかと思います。
それとも　Windows2000 ではAlt キーを押しながらEXEファイルを起動できるのですか？

すばやい回答ありがとうございます。

> > プログラムが立ち上がるときに、
> > すでに押されているキーを検出することは可能でしょうか？
> 可能ですが。

すみません、質問が言葉足らずでした。
どのようにすれば検出できるのでしょうか？

下記にご指摘がありましたので"shift","ctrl",その他のキーを押しながら
ということでお願いします。

> > 　subMainから立ち上げ、そのときに"Alt"キーが押されていれば、
>
> Alt キーを押しながらEXEファイルをクリックするとプロパティが表示されるように
> なっており、起動そのものができないかと思います。
> それとも　Windows2000 ではAlt キーを押しながらEXEファイルを起動できるのですか？

花ちゃんさんのご指摘どうり起動できませんでした。知識不足で申し訳ありません。

> > > プログラムが立ち上がるときに、
> > > すでに押されているキーを検出することは可能でしょうか？
> > 可能ですが。
>
> すみません、質問が言葉足らずでした。
> どのようにすれば検出できるのでしょうか？

APIのGetKeyboardStateで取得できます。

ここの逆引きヘルプの　特殊キーの現在の状態を取得する・タブキーの押下を取得する
にも書いてありますが。　

Option Explicit
Private Declare Function GetKeyState Lib "user32" _
    (ByVal nVirtKey As Long) As Integer
Private Const VK_SHIFT = &H10
Private Const VK_CONTROL = &H11
Private Sub Form_Load()
    If GetKeyState(VK_CONTROL) < 0 Then
        MsgBox "Ctrl キーが押されています"
    End If
End Sub

nanashiさん、花ちゃんさん、
すばやい回答ありがとうございました。
参考にさせていただきます。

花ちゃんさん
逆引きヘルプ内を探しきれず、お手数をおかけしました。