当前位置:编程学习 > C#/ASP.NET >>

vb。net中通过textbox给数组赋值的问题

定义一个数组,想通过textbox给它赋值,然后在label1控件上显示出来,最后在排序。就是输入一个数字,然后单击一下button1控件,它就在label上显示出来,再单击下,又显示个数字,让它一个一个的显示。最后再单击button2,给他们排序,都显示在label2上。请问怎么做啊?谢谢啦 --------------------编程问答-------------------- 汗,这个语言的表达能力...

我表示,做程序员会有压力的 --------------------编程问答-------------------- 汗++
数组不是自带排序功能吗?


--------------------编程问答-------------------- 额。。。我承认我语言表达没能力不好,主要是想知道用textbox给数组赋值 --------------------编程问答--------------------

 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)
--------------------编程问答-------------------- Just Do it following what U think --------------------编程问答-------------------- --------------------编程问答--------------------
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
CopyRight © 2012 站长网 编程知识问答 www.zzzyk.com All Rights Reserved
部份技术文章来自网络,