在Visual Basic 6.0（VB6.0）中编程输出杨辉三角，可以参考以下步骤和代码：
新建工程
打开VB6.0，新建一个工程。
在窗体中添加一个命令按钮，命名为“打印”，并设置其Caption为“打印”。
添加一个图片框控件，用于打印输出，并将Form1窗体的Caption属性改为“杨辉三角”。
编写代码
双击“打印”命令按钮，进入代码编辑窗口。
输入以下代码：
```vb
Dim a（11, 11） As Integer
m = 11
' 初始化杨辉三角
For i = 1 To m
a（i, 1） = 1
a（i, i） = 1
Next i
' 计算杨辉三角的其他元素
For i = 3 To m
For j = 2 To i - 1
a（i, j） = a（i - 1, j - 1） + a（i - 1, j）
Next j
Next i
' 打印杨辉三角
n = 30
For i = 1 To m
Picture1.Print Tab（n）；
For j = 1 To i
Picture1.Print Tab（k）；
Picture1.Print Format（a（i, j）, "0"）
k = k + 6
Next j
Picture1.Print
n = n - 3
Next i
```
运行程序
关闭代码窗口，按下F5运行程序。
程序界面将显示杨辉三角的结果。
代码解释：
初始化数组：`Dim a（11, 11） As Integer` 定义了一个11x11的整数数组来存储杨辉三角的元素。
设置行数：`m = 11` 设置了杨辉三角的行数。
初始化杨辉三角：通过两个嵌套的For循环，将数组的第一列和最后一列初始化为1。
计算杨辉三角的其他元素：通过另外两个嵌套的For循环，根据杨辉三角的规律计算其他元素的值。
打印杨辉三角：通过一个For循环和一个内部的For循环，将杨辉三角的元素打印到图片框中，每个元素之间用Tab键分隔，并设置适当的格式。
注意事项：
确保VB6.0环境已正确安装并配置。
代码中的数组大小可以根据需要调整，这里设置为11x11是为了确保能够显示较多的行数。
如果需要输出更多行，可以适当增加数组的大小和打印的格式化字符串。
通过以上步骤和代码，你可以在VB6.0中成功编程输出杨辉三角。