SetWindowTheme

Declare Function Api_SetWindowTheme& Lib "uxtheme" Alias "SetWindowTheme" (ByVal hWnd&, ByVal pszSubAppName&, ByVal pszSubIdList&)

Declare Function SetWindowTheme Lib "uxtheme" (ByVal hWnd As Long, ByVal pszSubAppName As Long, ByVal pszSubIdList As Long) As Long

ウィンドウのビジュアルテーマを設定する。

パラメータ
hWnd
    ウィンドウのハンドルを指定する。
pszSubAppName

    アプリケーション名を格納するメモリポインタを指定する。
    vbNullStringを指定したとき、呼び出したアプリケーション名を使用する。

pszSubIdList

    使用するCLSIDをセミコロン「;」で区切ったリストを含んでいる文字列へのメモリポインタ。
    vbNullStringを指定したとき、呼び出したCLSIDを使用する。

戻り値
    関数が成功すると S_OK が返る。関数が失敗すると S_OK 以外の値が返る。