主题：[求助]图片管理器

点击按钮...弹出的那个窗口？可以设置大小，但比较麻烦。

计划管理，写代码

Dim frm = Windows.Forms.Form.ActiveForm
If frm IsNot Nothing Then
    If frm.Name = Nothing AndAlso frm.text = "图片管理器" Then

        frm.width = 500

        frm.height = 500
        'Dim lbs = frm.Controls(0).controls(0).panel2.controls(0)
        'lbs.controls("Add").visible = False
        'lbs.controls("Open").visible = False
        'Add
        'Open
        'Delete
        'Clear
        'NextRecord
        'PrevRecord
        'Manager
        'Full
        'Stretch
        'SaveAs
        'lblConnect
        'lblUpdate
    End If
End If