VB 简单代码

Dim i As Long
For i = 1 To 5
Print Space(i - 1) & String(11 - i * 2, "*") & Space(1) & String(i * 2 - 1, "*")
Next

Dim n As Long

For n = 1 To 5

   Print Space(n - 1) & String(11 - n * 2, "*") & Space(1) & String(n * 2 - 1, "*")

Next n

和一楼的差不多~~~~~~~~~~~

简单的VB代码 vb简单病毒代码 vb的最简单代码 简单的VB实现代码！ vb中的一段简单代码 简单打字练习VB代码 求一个简单的VB代码 VB中button的一个简单代码 VB简单代码问题 救救小妹拉 vb的一段简单代码~~~大家看看~！！