怎样使用VBA窗体基本属性设置？

1、首先在开发工具中打开VBA编辑器

2、在单元格区域当中输入一些内容作为例子

3、在VBA编辑器中插入模块

4、在模块当中输入如下代码，然后运行

Private Sub CommandButton2_Click()

  With UserForm1.Controls.Add("Forms.CommandButton.1", CommandButton2, True)
    '新增按钮
    .Left=20      '左边距为20
    .Top=60      '上边距为60
    .Width=100    '宽度为160
    .Height=20    '高度为20
    .Caption="新按钮"  '名称
  End With
End Sub
Private Sub UserForm_Initialize()
  With Me
    .BackColor=&HFFC0C0  '背景色
    .BorderColor=&H80FF80
    .BorderStyle=fmBorderStyleSingle '边框色
    .Caption="我的第一个窗体"  '定义窗体标题
    .Enabled=True   '接受焦点和响应用户产生的事件。若为False则不可操作窗体
    .Height=80
    '.Hide '隐藏窗体，不能隐藏自身
    .Left=200 '窗体离屏幕左边的距离
    .Picture=LoadPicture("d:\pic\窗体底纹图片.jpg") '背景图片
    .ScrollBars=fmScrollBarsVertical       '垂直滚动条
    '.Show显示一个窗体，可以后缀0表示显示为无模式，默认为模态，即焦点总在窗体上
    .Top=200  '上边距
    .Width=350      '宽度
    Zoom=100  '窗体缩放
    End With
End Sub
Private Sub CommandButton1_Click()
Me.Move 50, 100, 180, 120 '移动之后的新位置与屏幕左距50磅，上距100磅，宽度180，
高度120
Me.Caption="移动后的窗体"
End Sub

5、单击“移动窗体”按钮，窗体的位置按预设数字移动，如图

单击“新增控件”按钮，窗体中新增一个按钮，名为“新按钮”，如图