怎么反转这个? vb.net [英] how to invert this? vb.net
本文介绍了怎么反转这个? vb.net的处理方法,对大家解决问题具有一定的参考价值,需要的朋友们下面随着小编来一起学习吧!
问题描述
Dim i,j,n As 整数
n = 5
i = 1
TextBox1.TextAlign = HorizontalAlignment.Right
直到i> = n
i + = 1
j = 1
直到j> ; = i
TextBox1.Text = TextBox1.Text& *
j + = 1
循环
TextBox1.Text = TextBox1.Text& vbCrLf
循环
输出:
*
**
***
****
*****
问题:如何反转这个?? ..
解决方案
试试:
< pre lang =vb> Dim sb As New StringBuilder()
对于 i 作为 整数 = 5 1 步骤 -1
对于 j As 整数 = 0 i - 1
sb.Append( *)
下一页
sb.Append(vbCr& vbLf)
下一步
TextBox1.Text = sb.ToString()
Dim i, j, n As Integer
n = 5
i = 1
TextBox1.TextAlign = HorizontalAlignment.Right
Do Until i >= n
i += 1
j = 1
Do Until j >= i
TextBox1.Text = TextBox1.Text & " *"
j += 1
Loop
TextBox1.Text = TextBox1.Text & vbCrLf
Loop
output:
*
**
***
****
*****
question: How to invert this??..
解决方案
Try:
Dim sb As New StringBuilder() For i As Integer = 5 To 1 Step -1 For j As Integer = 0 To i - 1 sb.Append(" *") Next sb.Append(vbCr & vbLf) Next TextBox1.Text = sb.ToString()
这篇关于怎么反转这个? vb.net的文章就介绍到这了,希望我们推荐的答案对大家有所帮助,也希望大家多多支持IT屋!
查看全文