在VB编程中，打印星星的方法有多种，以下是几种常见的方法：
方法一：使用`Console.WriteLine`
你可以在控制台上打印五个星号，代码如下：
```vb
Sub Main（）
Dim output As String
output = "*" Console.WriteLine（output） End Sub ``` 方法二：使用`MsgBox` 你也可以使用`MsgBox`函数在一个消息框中显示五个星号： ```vb Private Sub Form_Load（） MsgBox（"*"） End Sub ``` 方法三：使用`Label`控件 在窗体上添加一个`Label`控件，并将其`Text`属性设置为"
```vb
Private Sub Form_Load（）
Dim label As New Label
label.Text = "*" Me.Controls.Add（label） End Sub ``` 方法四：使用`TextBox`控件 在窗体上添加一个`TextBox`控件，并将其`Text`属性设置为"
```vb
Private Sub Form_Load（）
Dim textBox As New TextBox
textBox.Text = "*" textBox.ReadOnly = True Me.Controls.Add（textBox） End Sub ``` 方法五：使用`RichTextBox`控件 在窗体上添加一个`RichTextBox`控件，并将其`Text`属性设置为"
```vb
Private Sub Form_Load（）
Dim richTextBox As New RichTextBox
richTextBox.Text = "*"
Me.Controls.Add（richTextBox）
End Sub
```
方法六：使用循环打印星号
你还可以使用循环来打印星号，例如输出一行五个星号：
```vb
Private Sub command1_click（）
For i = 1 To 5
Print "*"
Next
Me.cls
End Sub
```
或者输出一列五个星号：
```vb
Private Sub command2_click（）
Dim i As Long
For i = 1 To 5
Print "*"
Next
Me.cls
End Sub
```
这些方法都可以帮助你在VB编程中实现打印星星的功能。你可以根据自己的需求选择合适的方法。