Re: [.NET] 陣列為何是空的

看板Visual_Basic作者fumizuki (小獅)時間19年前 (2005/06/01 12:22)推噓0(0推 0噓 0→)

留言0則, 0人參與討論串2/2 (看更多)

※ 引述《googookevin (我的笑點真的很低~)》之銘言： : Dim no As Integer = 0 : Dim num As Integer : Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As : System.EventArgs) Handles MyBase.Load : Label5.Visible = False : num = Val(InputBox("請輸入學生數目", "")) : Label1.Text = "請輸入" & num & "筆學生姓名和成績!" : Label2.Text = "第" & no + 1 & "筆" : End Sub : Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As : System.EventArgs) Handles Button1.Click : Dim s_score(num - 1) As Single : Dim s_name(num - 1) As String : Dim i As Integer : Dim tt As String : Dim ss As String : s_name(no) = TextBox1.Text : s_score(no) = TextBox2.Text : no += 1 : Label2.Text = "第" & no + 1 & "筆" ( ) 應該要加上括弧吧? : Label5.Text = "編號姓名分數" + vbNewLine : TextBox1.Text = "" : TextBox2.Text = "" : If no = num Then : Label5.Visible = True : For i = 0 To num - 1 Step 1 : Label5.Text &= i & " " & s_name(i) & " " & " : " & s_score(i) & vbNewLine : Next i : End If : End Sub : 這程式是希望最後能列出所有資料~但為何最後都只能顯示出最後一筆輸入的資料 : 呢?其他前面輸入的資料都會成為0～好奇怪喔！ : 是不是存取陣列出了問題阿? button1是新增資料？當輸入完成後會自動顯示所有資料在Lebel5？那應該是因為你陣列是區域變數的關係吧把宣告的部份拉出來移到最上面... 不過我不會 VB.NET 不知道應該放在哪個區塊@@" -- VB 程式設計倉木麻衣 PTT 星爺板行列輸入法 ====================================================== Visual_Basic MaiKuraki Stephen Array -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 61.222.155.162