在VB（Visual Basic）中，你可以使用Shape控件来创建和修改各种形状，包括圆形。以下是一个简单的示例，展示了如何将一个矩形形状更改为圆形：
添加Shape控件
在你的VB窗体上添加一个Shape控件，并设置其`Name`属性为`Shape1`。
设置Shape控件的Shape属性
使用`Shape1.Shape`属性来设置形状。要设置为圆形，将`Shape`属性设置为3。
```vb
Private Sub Form_Load（）
' 初始化形状为矩形
Shape1.Shape = 0
End Sub
Private Sub Command1_Click（）
' 将形状更改为圆形
Shape1.Shape = 3
End Sub
```
在这个示例中：
`Form_Load`事件在窗体加载时执行，将Shape1的形状设置为默认的矩形（`Shape = 0`）。
`Command1_Click`事件在单击命令按钮时执行，将Shape1的形状更改为圆形（`Shape = 3`）。
你可以根据需要调整`Shape`属性的值来创建不同的形状。以下是其他形状的对应值：
`Shape = 0`：矩形（默认值）
`Shape = 1`：正方形
`Shape = 2`：椭圆
`Shape = 3`：圆
`Shape = 4`：圆角矩形
`Shape = 5`：圆角正方形
通过这种方式，你可以轻松地在VB中创建和修改各种形状，包括圆形。