VBレスキュー(花ちゃん)
VB2005用トップページへVBレスキュー(花ちゃん)のトップページVB6.0用のトップページ各掲示板

メニューへ戻ります。 システム及びOS情報関係のメニュー
１．環境変数に格納されている情報を取得
２．コントロールパネル及びコントロールパネル内の各メニューを開く
３．INI ファイルへの書き込み及び読み込み
４．レジストリへの保存及び読み取り・削除例
５．オペレーティングシステムのバージョン情報を取得
６．WMI の Win32_OperatingSystem クラスを使っての OS 情報の取得
７．現在のシステム環境に関する情報(108項目)を取得
８．ウィンドウ・画面等の幅や高さ等と現在の構成を(84項目)取得
９．Win32 API を使っての物理メモリ及び仮想メモリに関する情報を取得
10．コンピューターの製造会社名及びモデル名/製品型番を取得
11．現在の OS 及びプロセスが 64ビットかどうかを調べる
12．
　．　
20．その他、当サイト内に掲載のシステム及びOS情報に関するサンプル


２．コントロールパネル及びコントロールパネル内の各メニューを開く(27_Sys_02)　(旧、SampleNo.074)
１．コントロールパネル及びコントロールパネル内の各メニューを開く
２．
３．
４．
５．
６．
　下記プログラムコードに関する補足・注意事項　
動作確認：Windows 8.1 (Windows 7) / VB2013 (VB2010) / Framework 4.5.1 / 対象の CPU：x86
Option　：[Compare Text] [Explicit On] [Infer On] [Strict On]
Imports ：追加なし
参照設定：追加なし
その他　：
　　　　：
このサンプル等の内容を無断で転載、掲載、配布する事はお断りします。(私の修正・改訂・削除等が及ばなくなるので)
必要ならリンクをはるようにして下さい。(引用の場合は引用元のリンクを明記して下さい)
このページのトップへ移動します。 １．コントロールパネル及びコントロールパネル内の各メニューを開く

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
'コントロールパネルを表示する
    Call Shell("CONTROL.EXE", AppWinStyle.NormalFocus)
End Sub

Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
'コントロールパネルのインターネットオプション(プロパティ)を表示
    Call Shell("CONTROL.EXE Inetcpl.cpl", AppWinStyle.NormalFocus)
End Sub

Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click
'コントロールパネルのキーボードを表示
    Call Shell("CONTROL.EXE keyboard", AppWinStyle.NormalFocus)
End Sub

Private Sub Button4_Click(sender As Object, e As EventArgs) Handles Button4.Click
'コントロールパネルのゲームコントローラーを表示
    Call Shell("CONTROL.EXE Joy.cpl", AppWinStyle.NormalFocus)
End Sub

Private Sub Button5_Click(sender As Object, e As EventArgs) Handles Button5.Click
'コントロールパネルのサウンドとオーディオデバイスを表示
    Call Shell("CONTROL.EXE mmsys.cpl", AppWinStyle.NormalFocus)
End Sub

Private Sub Button6_Click(sender As Object, e As EventArgs) Handles Button6.Click
'コントロールパネルのシステムを表示
    Call Shell("CONTROL.EXE sysdm.cpl", AppWinStyle.NormalFocus)
End Sub

Private Sub Button7_Click(sender As Object, e As EventArgs) Handles Button7.Click
'コントロールパネルのスキャナーとカメラを表示
    Call Shell("CONTROL.EXE sticpl.cpl", AppWinStyle.NormalFocus)
End Sub

Private Sub Button8_Click(sender As Object, e As EventArgs) Handles Button8.Click
'コントロールパネルのネットワーク接続を表示(windows2000〜)
    Call Shell("CONTROL.EXE ncpa.cpl", AppWinStyle.NormalFocus)
End Sub

Private Sub Button9_Click(sender As Object, e As EventArgs) Handles Button9.Click
'コントロールパネルのハードウェアの追加を表示(windows2000〜)
'コントロールパネルのデバイスマネージャーを表示(windows8.1)
    Call Shell("CONTROL.EXE hdwwiz.cpl", AppWinStyle.NormalFocus)
End Sub

Private Sub Button10_Click(sender As Object, e As EventArgs) Handles Button10.Click
'コントロールパネルのフォントを表示
    Call Shell("CONTROL.EXE fonts", AppWinStyle.NormalFocus)
End Sub

Private Sub Button11_Click(sender As Object, e As EventArgs) Handles Button11.Click
'コントロールパネルのプリンターとFAXを表示
    Call Shell("CONTROL.EXE printers", AppWinStyle.NormalFocus)
End Sub

Private Sub Button12_Click(sender As Object, e As EventArgs) Handles Button12.Click
'コントロールパネルのプログラムの追加と削除を表示
    Call Shell("CONTROL.EXE appwiz.cpl", AppWinStyle.NormalFocus)
End Sub

Private Sub Button13_Click(sender As Object, e As EventArgs) Handles Button13.Click
'コントロールパネルのマウスを表示
    Call Shell("CONTROL.EXE main.cpl", AppWinStyle.NormalFocus)
End Sub

Private Sub Button14_Click(sender As Object, e As EventArgs) Handles Button14.Click
'コントロールパネルのユーザーアカウントを表示(windows2000〜)
    Call Shell("CONTROL.EXE nusrmgr.cpl", AppWinStyle.NormalFocus)
End Sub

Private Sub Button15_Click(sender As Object, e As EventArgs) Handles Button15.Click
'コントロールパネルのユーザー補助のオプションを表示
    Call Shell("CONTROL.EXE access.cpl", AppWinStyle.NormalFocus)
End Sub

Private Sub Button16_Click(sender As Object, e As EventArgs) Handles Button16.Click
'コントロールパネルの画面を表示
    Call Shell("CONTROL.EXE desk.cpl", AppWinStyle.NormalFocus)
End Sub

Private Sub Button17_Click(sender As Object, e As EventArgs) Handles Button17.Click
'コントロールパネルの地域と言語のオプションを表示
    Call Shell("CONTROL.EXE intl.cpl", AppWinStyle.NormalFocus)
End Sub

Private Sub Button18_Click(sender As Object, e As EventArgs) Handles Button18.Click
'コントロールパネルの電源オプションを表示
    Call Shell("CONTROL.EXE powercfg.cpl", AppWinStyle.NormalFocus)
End Sub

Private Sub Button19_Click(sender As Object, e As EventArgs) Handles Button19.Click
'コントロールパネルの電話とモデムのオプションを表示
    Call Shell("CONTROL.EXE telephon.cpl", AppWinStyle.NormalFocus)
End Sub

Private Sub Button20_Click(sender As Object, e As EventArgs) Handles Button20.Click
'コントロールパネルの日付と時刻を表示
    Call Shell("CONTROL.EXE timedate.cpl", AppWinStyle.NormalFocus)
End Sub

OS 等の違いにより表示される項目名が違ったりします。又上記以外の項目については、CONTROL.EXE Inetcpl.cpl 等をキーに検索して調べて下さい。
このページのトップへ移動します。 ２．


このページのトップへ移動します。 ３．


このページのトップへ移動します。 ４．


このページのトップへ移動します。 ５．


このページのトップへ移動します。 ６．


このページのトップへ移動します。 検索キーワード及びサンプルコードの別名(機能名)
１．コントロールパネルを表示する　２．コントロールパネルのインターネットオプション(プロパティ)を表示　３．コントロールパネルのキーボードを表示　４．コントロールパネルのゲームコントローラーを表示　５．コントロールパネルのサウンドとオーディオデバイスを表示　６．コントロールパネルのシステムを表示　７．コントロールパネルのスキャナーとカメラを表示　８．コントロールパネルのネットワーク接続を表示(windows2000〜)　９．コントロールパネルのハードウェアの追加を表示(windows2000〜)　10．コントロールパネルのフォントを表示　11．コントロールパネルのプリンターとFAXを表示　12．コントロールパネルのプログラムの追加と削除を表示　13．コントロールパネルのマウスを表示　14．コントロールパネルのユーザーアカウントを表示(windows2000〜)　15．コントロールパネルのユーザー補助のオプションを表示　16．コントロールパネルの画面を表示　17．コントロールパネルの地域と言語のオプションを表示　18．コントロールパネルの電源オプションを表示　19．コントロールパネルの電話とモデムのオプションを表示　20．コントロールパネルの日付と時刻を表示


このページのトップへ移動します。