vb。net中通过textbox给数组赋值的问题
定义一个数组,想通过textbox给它赋值,然后在label1控件上显示出来,最后在排序。就是输入一个数字,然后单击一下button1控件,它就在label上显示出来,再单击下,又显示个数字,让它一个一个的显示。最后再单击button2,给他们排序,都显示在label2上。请问怎么做啊?谢谢啦 --------------------编程问答-------------------- 汗,这个语言的表达能力...我表示,做程序员会有压力的 --------------------编程问答-------------------- 汗++
数组不是自带排序功能吗?
--------------------编程问答-------------------- 额。。。我承认我语言表达没能力不好,主要是想知道用textbox给数组赋值 --------------------编程问答--------------------
--------------------编程问答-------------------- Just Do it following what U think --------------------编程问答-------------------- --------------------编程问答--------------------
Label1.Text &= TextBox1.Text & vbCrLf '每接一次把 TextBox1.Text数字放进Label1.Text button1控件
Dim a() As String = Label1.Text.Split(vbCrLf) 'button2控件
Dim b(a.Length - 2) As Integer
For i As Integer = 0 To a.Length - 2
b(i) = Int(a(i))
Next
Array.Sort(b) '排序
Dim c(b.Length - 1) As String
For i As Integer = 0 To b.Length - 1
c(i) = b(i).ToString
Next
Label2.Text = Join(c, vbCrLf)
private a() as string
private sub button1_Click(byval sender as system.object,byval e as eventargs)handle button1.Click
dim i as integer =0
a(i)=textbox1.text
if i=0
label1.text=a(0)
else
for i as integer =0 to i-1
label1.text=""& label1.text + a(i) &""
next
end if
i=i+1
end sub
private sub button2_Click(byval sender as system.object,byval e as eventargs)handle button2.Click
array.sort(a)
dim i as integer=a.length
if i>0
for j as integer =0 to i-1
label1.text=""& label1.text + a(i) &""
next
end if
end sub
补充:.NET技术 , VB.NET