迪丽热巴直播视频回放:vb小问题,会的帮帮忙

来源:百度文库 编辑:高考问答 时间:2024/07/08 12:40:12
编写程序
输出:
0
1 1
2 3 5
8 13 21 34
……
(共六行)

Private Sub Command1_Click()
Dim a As Double, b As Double, c As Double
a = 1
b = 0
For i = 0 To 6
For j = 0 To i
Print c;
c = a + c
a = b
b = c
Next
Print
Next
End Sub