1

VBSでWindowsフォームを開こうとしていますが、問題が発生しています:-(

この行は問題なく動作します(私は思います):

Set frmPopup = CreateObject("System.Windows.Forms.Form")

ただし、最初の行で次のエラーが発生します。Microsoft VBScriptランタイムエラー:ActiveXコンポーネントはオブジェクトを作成できません:'System.Drawing.Size'

    Set frmPopup.Size = CreateObject("System.Drawing.Size")
    frmPopup.Size.Width = cmintPSPFormWidth
    frmPopup.Size.Height = intPopupHeight

これは、System.Drawing.Sizeが呼び出しで指定されたHeightパラメーターとWidthパラメーターを必要とするためだと思いますか?

wwwは使用について話します:

Set frmPopup.Size = new System.Drawing.Size(1,2)

しかし、これは私に与えます:変数は未定義です:'システム'。

.NET 4インストールフォルダーのSystem.Windows.Forms.dllとSystem.Drawing.dllでregasmを実行しましたが、それでも機能しません。何か案は?

4

1 に答える 1

2

サイズはメソッドであり、ProgID ではありません。おそらく次のようなものが必要になるでしょう:

Set frmPopup = CreateObject("System.Windows.Forms.Form")
Set frmDrwg = CreateObject("System.Drawing")
frmDrwg.Size 1, 2

ただし、すべての .NET オブジェクトを VBS から適切にインスタンス化できるわけではないことに注意してください。

于 2012-08-01T16:05:56.270 に答える