kalau nyari solusi atas kasus mas Mulyana ya bisa diakal-akalin aja...hehe bikin dua array dynamic A[] dan B[] utk mewakili array 2 dimensi tadi...
On Wed, 14 Dec 2005 10:43:40 -0800 (PST) mulyana - <[EMAIL PROTECTED]> wrote: > thx, pak , atas jawaban /info nya.. (Soalnya baru kali >ini ada yang jawab....seneng dech) > > Kalo declare array satu dimensi A[] gitu memang tak >masalah...., tapi kalo dua / lebih dimensi misal : A[3,5] >gimana yah ? , supaya angka 3 atau 5 nya bisa >diubah2..... , misal jadi : decimal A[i, j] , i dan j >variabel bebas yang bisa di set sesuai kebutuhan > > wihartoyo <[EMAIL PROTECTED]> wrote: > Kalo aku malah bingung nentuin panjang array dynamic di >VB. > Tapi kalo array dynamic di PB mah giampiang banget, apa >lagi yang cuma > satu dimensi. Tinggal declare variable array tanpa >menyebutkan > panjangnya. > misal kita mau ngambil nama orang dari table "tblOrang" >yang jumlahnya > kita sendiri belum pernah tahu: > > string ist_nama,isa_nama[] > long i > declare cr_nama cursor for select nama from tblOrang; > open cr_nama; > i=1 > fetch cr_nama into :ist_nama; > isa_nama[i] = ist_nama > if sqlca.sqlcode = 0 then > do while sqlca.sqlcode =0 > fetch cr_nama into :ist_nama; > if sqlca.sqlcode = 0 then > isa_nama[i] = ist_nama > i++ > end if > loop > end if > > close cr_nama; > > kemudian buat nge-null in array juga sangat-sangat >mudah. Declarin aja > satu dengan panjang yang nggak ditentuin juga > misal mau nge-null-in array di atas > > string isa_null[] //null aray > > isa_nama = isa_null //assign null array ke yang udah ada >isinya > > selesai............ > > > > On Tue, 13 Dec 2005 09:21:29 -0000, "mulyan" ><[EMAIL PROTECTED]> said: >> abang2, bapak2,kaka2... tolong dong saya... >> Kalo di PB ada gak fungsi Setlength kaya di Delphi / VB. >>Misalnya saya >> punya Array satu dimensi A[3], yang ingin saya tanya : >>bagaimana >> caranya jumlah array tersebut ( 3 ) bisa dinamic, alias >>bisa diset >> gitu loh.... ( Tolooong....) >> >> >> >> >> >> >> ----------------------------------------------- >> Reuni SMA Negeri 1 Angkatan 1988 >> Hari/ Tanggal : Minggu, 18 Desember 2005 >> Pukul : 09.00 12.00 WIB >> Lokasi : SMA Negeri 1 Jl. Ir H. Juanda Bandung >> Info lanjut hub.: Udjo 0811140603, Ilo 021 70682007, >>Ratih 08122129539, >> Alland 0818202247, Happy 08161815734 >> ----------------------------------------------- >> IndoPB - Indonesia PB User Group >> To Post a message, send it to: [EMAIL PROTECTED] >> To Unsubscribe,send a blank message to: >>[EMAIL PROTECTED] >> Yahoo! Groups Links >> >> >> >> >> >> >> > -- > wihartoyo > [EMAIL PROTECTED] > > -- > http://www.fastmail.fm - A fast, anti-spam email >service. > > > > ----------------------------------------------- > Reuni SMA Negeri 1 Angkatan 1988 > Hari/ Tanggal : Minggu, 18 Desember 2005 > Pukul : 09.00 12.00 WIB > Lokasi : SMA Negeri 1 Jl. Ir H. Juanda Bandung > Info lanjut hub.: Udjo 0811140603, Ilo 021 70682007, >Ratih 08122129539, Alland 0818202247, Happy 08161815734 > ----------------------------------------------- > IndoPB - Indonesia PB User Group > To Post a message, send it to: [EMAIL PROTECTED] > To Unsubscribe,send a blank message to: >[EMAIL PROTECTED] > > > > SPONSORED LINKS > Computer monitoring software Powerbuilder >developer Free computer monitoring software > > --------------------------------- > YAHOO! GROUPS LINKS > > > Visit your group "indopb" on the web. > > To unsubscribe from this group, send an email to: > [EMAIL PROTECTED] > > Your use of Yahoo! Groups is subject to the Yahoo! >Terms of Service. > > > --------------------------------- > > > > > > > --------------------------------- > Yahoo! Shopping > Find Great Deals on Holiday Gifts at Yahoo! Shopping > > [Non-text portions of this message have been removed] > > > > ------------------------ Yahoo! Groups Sponsor > > ----------------------------------------------- > Reuni SMA Negeri 1 Angkatan 1988 > Hari/ Tanggal : Minggu, 18 Desember 2005 > Pukul : 09.00 12.00 WIB > Lokasi : SMA Negeri 1 Jl. Ir H. Juanda Bandung > Info lanjut hub.: Udjo 0811140603, Ilo 021 70682007, >Ratih 08122129539, Alland 0818202247, Happy 08161815734 > ----------------------------------------------- > IndoPB - Indonesia PB User Group > To Post a message, send it to: [EMAIL PROTECTED] > To Unsubscribe,send a blank message to: >[EMAIL PROTECTED] > Yahoo! Groups Links > > > > > > > ======================================================================================== Ikuti Kuis Ramadhan bersama TelkomNet Instan dari 12 Oktober s.d 2 Nopember 2005 di http://www.plasa.com/jatim dan dapatkan hadiah setiap minggunya ! (khusus Jawa Timur) ======================================================================================== ------------------------ Yahoo! Groups Sponsor --------------------~--> 1.2 million kids a year are victims of human trafficking. Stop slavery. http://us.click.yahoo.com/.QUssC/izNLAA/TtwFAA/NhFolB/TM --------------------------------------------------------------------~-> ----------------------------------------------- Reuni SMA Negeri 1 Angkatan 1988 Hari/ Tanggal : Minggu, 18 Desember 2005 Pukul : 09.00 12.00 WIB Lokasi : SMA Negeri 1 Jl. Ir H. Juanda Bandung Info lanjut hub.: Udjo 0811140603, Ilo 021 70682007, Ratih 08122129539, Alland 0818202247, Happy 08161815734 ----------------------------------------------- IndoPB - Indonesia PB User Group To Post a message, send it to: [EMAIL PROTECTED] To Unsubscribe,send a blank message to: [EMAIL PROTECTED] Yahoo! Groups Links <*> To visit your group on the web, go to: http://groups.yahoo.com/group/indopb/ <*> To unsubscribe from this group, send an email to: [EMAIL PROTECTED] <*> Your use of Yahoo! Groups is subject to: http://docs.yahoo.com/info/terms/
