ペイントを起動する

トップページ（目次）

328.ペイントを起動する

＜実行前後＞

→

Sub ペイントを起動する()

    CreateObject("WScript.Shell").Run "MSPaint"

End Sub

こちらの方法でもOK

Sub ペイントを起動する_2()

    ペイント起動 = Shell("mspaint.exe", vbNormalFocus)

End Sub