Question

窗口显示结果为三角形的完整vb代码

用****组成的三角形

Answer 1

窗口显示结果是什么意思？
把谁显示为三角形？窗体？窗体上的控件？窗体上的输出？

答案补充：你也太惜字如金了。就不能多说几个字？
直角三角形，正三星，等腰三角形，还是任意三角形？

下面代码以常见的等腰三角形为例（不合适自己改去吧）：
Private Sub Command1_Click()
Do
行数 = Val(InputBox("请输入行数（2-40)"))
Loop Until 行数 > 1 And 行数 < 41
Print 行数
For i = 1 To 行数
Print Tab(行数 + 5 - i); String(2 * i - 1, "*")
Next i
End Sub

Private Sub Form_Load()
Me.AutoRedraw = True
Command1.Caption = "开始"
End Sub