Re: [.NET] 如何呼叫類別中的陣列??
看板Visual_Basic作者williewillie (williewillie)時間14年前 (2010/05/13 09:40)推噓1(1推 0噓 0→)留言1則, 1人參與討論串2/2 (看更多)
※ 引述《followmeyo (簡簡單單)》之銘言：
: 不好意思 問一點基本觀念問題
: 我是用VS2008
: 假設小弟有個類別檔 ppp.vb檔 code如下
: Public Class ppp
: Dim a(10) As Integer
: Sub aaa()
: For i = 0 To 9
: a(i) = i + 2
: Next
: End Sub
: End Class
: 那我的主程式上設一個button
: Public Class Form1
: Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As
: System.EventArgs) Handles Button1.Click
: End Sub
: End Class
: 該怎麼呼叫出ppp.vb檔裡陣列的值?
: 感謝回答
一般來說簡單的值宣告是放在Module裡
Module Module1
Public a(10) As Integer
Sub aaa()
'a()
'0 1 2 3 4 5 6 7 8 9 10
'Value
'2 3 4 5 6 7 8 9 10 11 0
For i = 0 To 9
a(i) = i + 2
Next
End Sub
End Module
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles Button1.Click
'輸出a()值
For i As Integer = 0 To a.Length - 1
MsgBox(a(i).ToString)
Next
End Sub
Private Sub Form1_Load(ByVal sender As Object, ByVal e As
System.EventArgs) Handles Me.Load
'開啟時先執行aaa()將值殖入
aaa()
End Sub
End Class
改用class的話就必須宣告為new
Public Class Class1
Public a(10) As Integer
Sub aaa()
'a()
'0 1 2 3 4 5 6 7 8 9 10
'Value
'2 3 4 5 6 7 8 9 10 11 0
For i = 0 To 9
a(i) = i + 2
Next
End Sub
End Class
Public Class Form1
'宣告aaa變數為class1型態
Dim aaa As Class1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles Button1.Click
'輸出a()值
For i As Integer = 0 To aaa.a.Length - 1
MsgBox(aaa.a(i).ToString)
Next
End Sub
Private Sub Form1_Load(ByVal sender As Object, ByVal e As
System.EventArgs) Handles Me.Load
'將class1 new 給Form1的aaa變數
aaa = New Class1
'開啟時先執行aaa()將值殖入
aaa.aaa()
End Sub
End Class
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 61.219.126.42
推
05/13 13:50, , 1F
05/13 13:50, 1F
討論串 (同標題文章)
本文引述了以下文章的的內容：
完整討論串 (本文為第 2 之 2 篇)：