oOo.. begitu.. sip dah nanti di rumah aku coba.. ta kirain gara2 aku make fungsinya di DLL jadi ga bisa.. ok deh BIG Thanx..^_^
2008/5/16 Purwedi Kurniawan <[EMAIL PROTECTED]>: > coba liat lagi contohnya: > > Function test() As Variant > Dim a(5) As Integer, i As Integer '<- deklarasi array bertipe integer > > For i = 0 To 4 > a(i) = i > Next i > test = a > End Function > > Sub testrun() > Dim a As Variant, i As Integer > a = test '<<- sampai disini, variable a SUDAH BERUBAH menjadi array > yang sama dengan array hasil kembalian di fungsi test, yaitu array > bertipe integer > For i = 0 To UBound(a) - 1 > Debug.Print a(i) > Next i > End Sub > > jadi variable a MEMANG akan otomatis BERUBAH menjadi array dan bisa di > pakai seperti layaknya array, don't worry be happy :)) > > tapi ingat, pendeklarasian variable a ini BUKAN sebagai array, tapi > sebagai VARIANT. > > tipe data variant dapat BERUBAH menjadi tipe data apapun, dalam kasus > ini, karena kita memberikan nilai a = hasil fungsi test dan fungsi > test itu sendiri mengembalikan variable ARRAY bertipe integer, maka > variable VARIANT a akan BERUBAH menjadi ARRAY integer juga. > > best regards > [poer] > > --- In [email protected] <Programmer-VB%40yahoogroups.com>, > "kotz zaddock" <[EMAIL PROTECTED]> wrote: > > > > hm.. gitu ya.. tapi kalo hasil dari fungsi itu langsung masuk ke > array lain > > gimana? > > > > misal > > x=namafungsi() > > > > nah x itu misalnya adalah array, dan fungsi yang dipanggil > > mengembalikan/menghasilkan nilai dari array-nya dia.. > > jadi bukan berupa "debug.print".. maklum kurang paham saya > > > > thanx > > > > >
