hairulfadly 27 Report post Posted December 14, 2007 Penerangan Aturcara 2.4 dan 2.5 di atas (Kira Jualan CD)Aturcara 2.4 di atas ini mengaplikasikan penggunaan Dim pada baris 2-6. Perhatikan pada baris 7 iaitu penggunaan Const. Const adalah singkatan kepada Constant (Pemalar) yang mana kita gunakan untuk mengisytiharkan nilai yang tetap dan tidak berubah-ubah.Ringkasnya, Const adalah lawan kepada Dim (pembolehubah) yang mana nilainya boleh berubah-ubah. Penggunaan label juga diaplikasikan bagi mengoutputkan nilai, Contohnya dalam baris 17 dan 18, lblAsal.Caption dan lblDiskaun.Caption membolehkan kita mengumpukkan nilai data kepada tulisan (caption) bagi label lblAsal dan lblDiskaun. Dalam Aturcara 2.5 pula, ini adalah contoh aturcara untuk keluar dari aplikasi. Katakunci yang penting digunakan adalah End.KesimpulanKita telah melihat dan mempelajari beberapa contoh aturcara yang melibatkan penggunaan pembnolehubah. Di sini kita tahu bahawa pembolehubah perlu dicipta dan diisytiharkan sebelum memulakan langkah aturcara seterusnya kerana ia berperanan menyimpan data yang diinput untuk sementara. Konsep ini penting sebelum kita mempelajari ke mana data akan di simpan selamanya (selagi ia tidak dibuang) iaitu samada ke pangkalan data, fail atau terus ditukarkan kepada bentuk yang lain.Pada tutorial yang akan datang, kita akan mempeljari pula bagaimana kita boleh mengawal tindakan data yang dimasukkan. Quote Share this post Link to post Share on other sites
ApoNie 0 Report post Posted December 14, 2007 hehe,.. rajin ko hairul.. tutorial yg berguna untuk newbie cam aku... selama nie aku buat software guna vb nie aku hentam kromo jer.. xtahu benda2 teori nie.. sebab tu kalau orang tanya aku pasal vb aku xtahu nak explain.. masuk aku sekali dalam kelab nie ekk.. ApoNieshahrir1999 at yahoo dot com Quote Share this post Link to post Share on other sites
TJ-Ariff 40 Report post Posted December 14, 2007 Good job Hairul... satu penerangan yang sangat baik.. Kepada ApoNie ... Selamat Datang ke Kelab ini.. Rajin2 lah on-lline... Quote Share this post Link to post Share on other sites
hairulfadly 27 Report post Posted December 14, 2007 MENETAPKAN KAWALANKita telah pun sedia maklum mengenai cara mencipta dan menentukan jenis data. Dalam erti kata lain, kita telah berjaya mewujudkan data. Tetapi data yang bagaimanakah yang akan kita gunakan ? Berapa nilai yang kita mahu, apakah syarat data diterima atau ditolak ?Contohnya dalam sistem e-mail, kita telah berjaya mencipta data untuk pengguna.Persoalannya, adakah semua pengguna di dalam sistem dibenarkan mencapai akaun e-mel kita? Hanya pengguna yang mempunyai ID serta katalaluan yang benar sahaja yang boleh mencapai sesuatu akaun. Di sinilah kita akan menggunakan konsep data.OPERATOR SYARAT (CONDITIONAL OPERATOR)Sebelum kita mempelajari penyataan-penyataan kawalan, kita akan berkenalan dulu dengan operator yang terlibat dengan kawalan. Operator ini dikenali sebagai Conditional Operator.= sama dengan > lebih besar < lebih kecil >= lebih besar atau sama dengan <= lebih kecil atau sama dengan <> tidak sama denganOPERATOR LOGIK (LOGICAL OPERATOR)Sebagai tambahan kepada Operator Syarat, beberapa operator logik juga ditambah bagi memudahkan dan memantapkan lagi aturcara kita.Operator And – Kedua-dua pihak mesti BENAR (TRUE)Or – Satu pihak sahaja mesti BENAR (TRUE)Xor – Satu pihak mesti BENAR (TRUE) tetapi tidak kedua-duanyaNot – Tidak BENAR (TRUE) Quote Share this post Link to post Share on other sites
hairulfadly 27 Report post Posted December 18, 2007 (edited) PENYATAAN IFJika warganegara = Malaysia Maka Status = Dibenarkan MasukBegitulah contoh mudah penggunaan pernyataan If. Jika contoh data Pelancong dimasukkan, warganegaranya adalah Malaysia, oleh itu dia dibenarkan masuk.Penyataan mudah ini sebenarnya amat berguna dalam pengaturcaraan kerana dalam banyak keadaan, kita perlu menentukan tindakan seterusnya berlandaskan input data yang dimasukkan. Carta alir di bawah menggambarkan pernyataan ifPENYATAAN IF...THEN...ELSEIf (syarat) ThenPenyataan 1ElsePenyataan 2End IfDalam penyataan If, jika keadaan tersebut adalah BENAR (TRUE), maka penyataan selepas klausa Then akan dilaksanakan. Jika keadaanya SALAH (FALSE), kenyataan selepas klausa Else pula yang akan dilaksanakan. Edited December 18, 2007 by hairulfadly Quote Share this post Link to post Share on other sites
hairulfadly 27 Report post Posted December 18, 2007 Contoh Aturcara 3.11.Bina antaramuka seperti di atas.2.Klik 2 kali pada butang arahan cmdStatus dan masukkan aturcara di bawah:1.Private Sub cmdStatus_Click()2.Dim Status As String3.If (cmdWarga.text = “Malaysiaâ€) Then4.Status = “ANDA WARGANEGARA. DIBENARKAN MASUKâ€5.Else6.Status = “ANDA BUKAN WARGANEGARA. MINTA PASSPORT UNTUK DISEMAKâ€7.End If8.lblStatus.Caption = status9.End Subp/s : dalam ruangan properties cmdStatus, pilih text dan taipkan "Malaysia", "Indonesia"Kemudian larikan program di atas dengan memilih Malaysia atau Indonesia dan tekan butang status. Quote Share this post Link to post Share on other sites
ApoNie 0 Report post Posted December 18, 2007 tambahan:1.Private Sub cmdStatus_Click()2.Dim Status As String3.If (Lcase(cmdWarga.text) = “malaysiaâ€) Then4.Status = “ANDA WARGANEGARA. DIBENARKAN MASUKâ€5.Else6.Status = “ANDA BUKAN WARGANEGARA. MINTA PASSPORT UNTUK DISEMAKâ€7.End If8.lblStatus.Caption = status9.End SubLcase Atau Ucase digunakan untuk mengelakkan error berlaku jika user menaip case yang silap contoh: "MaLaYsiA" Quote Share this post Link to post Share on other sites
hairulfadly 27 Report post Posted December 18, 2007 (edited) Suatu cadangan yang bernas daripada Aponie.Lcase digunakan untuk mengecilkan ayat atau perkataan yang dimasukkan oleh pengguna.Ucase digunakan untuk memBESARkan ayat atau perkataan yang dimasukkan oleh pengguna.Digunakan untuk memasukkan input yang berjenis text sahaja. Okey Penerangan Aturcara 3.1Perhatikan baris 3-7. Kita telah mengaplikasikan kawalan ke atas aturcara. Baris ini bermaksud jika senarai yang kita pilih dari cmbwarga adalah "Malaysia", maka lblStatus akan memaparkan status yang bernilai "ANDA WARGANEGARA. DIBENARKAN MASUK". Jika tidak (selain dari pilihan "Malaysia"), status akan bernilai "ANDA BUKAN WARGANEGARA. MINTA PASSPORT UNTUK DISEMAK".Kawalan membenarkan pengguna sistem memilih dengan pilihan yang diberikan. Inilah yang dipraktikkan pada kesemua sistem komputer seperti mesin ATM, sistem online dan sebagainya.Walaupun begitu, tidak mungkin dalam semua kedaaan, kita cuma ada 2 pilihan sahaja. Dalam sesetengah keadaaan, kita akan ada lebih dari 2 pilihan. Di sini kita akan menggunakan ElseIf sebagai tambahan kepada If...Then...Else.If (syarat 1) ThenPenyataan 1ElseIf (syarat 2)Penyataan 2ElseIf (syarat 3)ElsePenyataan 4End IfRajah 3.4Bentuk am seperti Rajah 3.4 diatas menggambarkan kita mempunyai 3 pilihan keadaan. Jika keadaan kita tidak BENAR (TRUE) dengan semua keadaan, maka pilihan Else akan dipilih untuk penyataan 4 akan dilaksanakan. Edited December 18, 2007 by hairulfadly Quote Share this post Link to post Share on other sites
hairulfadly 27 Report post Posted December 19, 2007 Pernyataan Select CaseTerdapat cara yang lebih mudah untuk melaksanakan multi pilihan selain dari menggunakan If…Then…Else. Pernyataan tersebut adalah Select Case.Select Case PenyataanCase (keadaan 1)Penyataan 1Case (keadaan 2)Penyataan 2:Case ElsePenyataan 3End SelectContoh Aturcara 3.31.Aturcara ini akan mengeluarkan output dari markah yang anda masukkan.2.Bina antaramuka Form seperti di bawah :Klik 2 kali butang cmdGred, dan masukkan aturcara di bawah:1.Private Sub cmdTentuGred_click() 2.Dim intMarkah As Integer 3.intMarkah = txtMarkah.text 4.Select Case intMarkah 5.Case Is >=80 6.lblGred.Caption= “A†7.lblKomen.Caption = “Sangat Bagus. Anda telah membuktikan anda bijak. Teruskan usaha.†8.Case 70 To 79 9.lblGred.Caption = “B†10.lblKomen.Caption = “Bagus. Pencapaian yang baik.†11.Case 50 To 69 12.lblGred.Caption = “C†13.lblKomen.Caption = “Sederhana. Usaha lagi dan tingkatkan pembacaan.†14.Case 40 To 49 15.lblGred.Caption = “D†16.lblKomen.Caption = “Agak lemah. Perlukan lebih usaha dan penumpuan.†17.Case Else 18.lblGred.Caption = “E†19.lblKomen.Caption = “Sangat lemah. Perlukan perhatian yang khusus.†20.End Select 21.End SubCuba buat dan larikan. Masukkan input gred dan perhatikan gred dan komen yang terhasil apabila kita menekan butang Tentu Gred.Selamat mencuba. Quote Share this post Link to post Share on other sites
LanoV 22 Report post Posted December 25, 2007 Takde sambungan lagi ker... busy nampaknya, atau tengah cuti Chrismas... hehehehe... Quote Share this post Link to post Share on other sites
hairulfadly 27 Report post Posted December 26, 2007 (edited) Penerangan Aturcara 3.3Perhatikan dalam baris 4, kita telah menjadikan intMarkah sebagai pembolehubah rujukan. Ertinya kita akan menetapkan penyataan seterusnya berdasarkan nilai intMarkah. Perhatikan juga baris 17, Case Else bermaksud sekiranya nilai intMarkah kita tidak menetapi kes-kes seperti di atas, maka penyataan bagi Else yang akan dipilih. Dalam aplikasi ini, Else adalah nilai markah yang kurang dari 40.DO/LOOPGelung Do/Loop amat berguna dalam menghasilkan aturcara yang mantap. Ia membolehkan kita mengulang satu kumpulan arahan/aturcara. Proses ulangan inilah yang dikenal sebagai ulangan (looping). Do/Loop dilaksanakan selagi syarat adalah BENAR (TRUE) atau sehingga syarat (BENAR) TRUE.Do (While | Until ) Syarat Kenyataan Loop Atau Do Kenyataan Loop (While | Until ) Syarat FOR/NEXT Gelung Do/Loop sesuai digunakan untuk memenuhi syarat-syarat tertentu yang ditetapkan. Namun jika kita sudah menetapkan beberapa kali gelung harus berulang, penyataan yang lebih sesuai adalah For/Next. For Indeks Ulangan = Nilai Permulaan To Nilai yang ditetapkan [Langkah Penambahan] KENYATAAN ULANGAN Next [Indeks Ulangan]Bersambung nanti.. Edited February 4, 2008 by hairulfadly Quote Share this post Link to post Share on other sites
TJ-Ariff 40 Report post Posted December 26, 2007 Tutorial ini aku akan berhentikan dulu. Akan bersambung pada 1 Februari 2008, otak aku berpindah ke tempat baru sekarang ini, jadi tengah mengalami transformasi dan konfigurasi perubahan teknikal tahap SA5669-89GH.... kawan yang lain boleh teruskan ... okeh !!!Waduh... bahaya tahap tu... Aku rase ko punya memori ke reprogram balik laa...Tak pun tukar RAM dan HD... Kasi besar...InsyaAllah, nanti ada lah rakan2 disini datang membantu...ko rehat la dulu.... Jangan lupa Cuci kaki RAM tu dengan pemadam...Ko pulak jangan lupa Cuci Kaki Ko sebelum tido... Quote Share this post Link to post Share on other sites
ApoNie 0 Report post Posted December 26, 2007 Aiseh.. lambat lagi.. per kata orang lain sambung? Tj-Ariff, hang sambung bleh? xpon LanoG.. hehebtw.. aku nak tanya sesuatu, bagi korang ahh, berdasarkan pengalaman @ teori atau sebagainya, database apa yang besh? mysql? access? sqlite? atau yang lain2 aku xsebut? leh bagi kelebihan & kontra.. aku blurr lagi bab database nie, aku tahu guna jer.. hehehe..tapi stakat yang aku tahu skrang, ms access memang kurengss sebab lembap, saiz file besar, security low.. nie komen aku berdasar pengalaman seciput aku.. sekarang aku beralih ke sqlite; laju, file size kecik, free, dan yg kurengsnya nak buat password untuk db kena bayar.. pendapat korang plaks..p/s: jangan blame ngan statement aku nie kalau silap, sebab aku noob lagi... Quote Share this post Link to post Share on other sites
LanoV 22 Report post Posted December 27, 2007 Database....? Oracle yang terbaik rasanya. Tak penah crash boom bang... hehehehe. Quote Share this post Link to post Share on other sites
A I S H 0 Report post Posted December 27, 2007 kalau sye nk join dah terlambat ker? nk join, buleyh?buleyh?erk buleyh x? sye xterror programming..kire pangkat dummy gak lah *sumell lah pulak smiley2 nieh Quote Share this post Link to post Share on other sites
ApoNie 0 Report post Posted December 27, 2007 xterlambat lagi AISH.. jangan lupa kasi alamat umah, no tepon dll.. yang penting no phone.. keh3.. oracle pon sebenarnya aku berminat nak teroka nie.. nampak cam besh.. LanoG, kalau hang ada ilmu pasal Oracle tu, perturunkan ahh kat sini.. basic2 pasal oracle dulu.. Quote Share this post Link to post Share on other sites
TJ-Ariff 40 Report post Posted December 27, 2007 (edited) kalau sye nk join dah terlambat ker? nk join, buleyh?buleyh?erk buleyh x? sye xterror programming..kire pangkat dummy gak lah *sumell lah pulak smiley2 nieh Yaa... masih belum terlambat... keahlian dibuka sepanjang tahun... Selamat datang dan meneroka alam pengaturcara...oracle pon sebenarnya aku berminat nak teroka nie.. nampak cam besh.. LanoG, kalau hang ada ilmu pasal Oracle tu, perturunkan ahh kat sini.. basic2 pasal oracle dulu..Bagus tu... cadangan yang baik...bole jugak aku tumpang belajar... he he he Edited December 27, 2007 by TJ-Ariff Quote Share this post Link to post Share on other sites
A I S H 0 Report post Posted December 28, 2007 project yg nie xbuleyh follow up sngt sbb skung tgh bz..tp mcm best jugak vb nieh..erk dulu pernah buat gak, tapi sume dh lupe..dulu pakai vb 98, xtaulah function ye sme x dgn yg latest nieh..nnt ade mse pelan2 sye belek system nie..btw, thanx sbb sudi berkongsi ilmu, cewahhhhh Quote Share this post Link to post Share on other sites
mfaizul89 3 Report post Posted December 31, 2007 Salam smue...lame x bukak thread nie...saye suke tutorial abg hairul tue...tapi saye ader satu soalan...cam ner nok wat satu database dr Access ke Vi Basic...maknenyer kite wat database dr Mic Access... kemudiannok letak dlm VBasic pulok... leh x... ape coding dier ek... Quote Share this post Link to post Share on other sites
LanoV 22 Report post Posted December 31, 2007 (edited) xterlambat lagi AISH.. jangan lupa kasi alamat umah, no tepon dll.. yang penting no phone.. keh3.. oracle pon sebenarnya aku berminat nak teroka nie.. nampak cam besh.. LanoG, kalau hang ada ilmu pasal Oracle tu, perturunkan ahh kat sini.. basic2 pasal oracle dulu.. Mana ler aku reti menda2 Oracle nie... setakat customize ready-made visual tool untuk portal dia buleh ler... kekekeke. tapi saye ader satu soalan...cam ner nok wat satu database dr Access ke Vi Basic...maknenyer kite wat database dr Mic Access... kemudiannok letak dlm VBasic pulok... leh x... ape coding dier ek...Kalau pakai VB 2005 Express, ada dah cara senang nak link (pakai wizard dia jer). Dan secara automatik dia akan create menu bar yang mengandungi basic command button untuk control database macam first record, last record, forward, backward, save, delete. Edited December 31, 2007 by LanoG Quote Share this post Link to post Share on other sites
mfaizul89 3 Report post Posted December 31, 2007 pakai VB 2005 Express, ada dah cara senang nak link (pakai wizard dia jer). Dan secara automatik dia akan create menu bar yang mengandungi basic command button untuk control database macam first record, last record, forward, backward, save, delete. sayer pakai VB yg lame...cam abg hairul wat tutorial tue... Quote Share this post Link to post Share on other sites
ApoNie 0 Report post Posted December 31, 2007 Mana ler aku reti menda2 Oracle nie... setakat customize ready-made visual tool untuk portal dia buleh ler... kekekeke. Kalau pakai VB 2005 Express, ada dah cara senang nak link (pakai wizard dia jer). Dan secara automatik dia akan create menu bar yang mengandungi basic command button untuk control database macam first record, last record, forward, backward, save, delete. camnie ahh.. ko ajar apa yang ko tahu.. hehehe... Quote Share this post Link to post Share on other sites
TJ-Ariff 40 Report post Posted December 31, 2007 sayer pakai VB yg lame...cam abg hairul wat tutorial tue...Dalam VB6 kalau tak silap saya ada dua cara untuk link kan database 1) Gunakan tools yg telah ada dalam VB iaitu DATA - dan setkan kan nama database kita itu, recordsource , pada data properties (ini memang kerja senang) 2) Gunakan arahan, coding / arahan nya kita kena tulis sendiri... Quote Share this post Link to post Share on other sites
TJ-Ariff 40 Report post Posted December 31, 2007 (edited) Sambungan/......Sebelum kita sambungkan database dengan program VB kita, mari kita buat databese nya dulu.1) Buka Microsoft Access2) Klik New - Blank database3) namakan fail ini dengan login.mdb (pastikan kita membuat folder dahulu ) - klik create4) klik 2x pada create table in design view5) pada field name kita nama user dan password dan pada Data type kedua2 text6) setelah itu klik close (tanda pangkah tu..) kita akan diminta untuk save table tu, dan nama kan Pass7) bila ditanya untuk membuat primary key - klik NO.Table database kita telah siap..untuk permulaan ini, kita isikan database ini secara manual.. caranya,1) Klik 2x pada table pass2) Isikan user & password seperti berikut :-ali - 123abu - 234kassim - 345tutup databese kita dengan klik pada pangkah ... tutup Access.tadaaa ... database kita dah siap...- Tamat - Edited December 31, 2007 by TJ-Ariff Quote Share this post Link to post Share on other sites
aduka kias utama 0 Report post Posted January 2, 2008 bro TJ-Ariff..sambung ah lagih.. aku dah tak sabo dah nih.. semangat giler.. klu dalam vb lak camner?? Quote Share this post Link to post Share on other sites