TULISAN BERJALAN BAHASA ASEMBLER

Posted on 11 Januari 2014 by kendrozsisandong

$mod51
geserL equ 00011011b ; 0 0 0 1 S/C R/L X X
geserR equ 00011111b ; 0 0 0 1 S/C R/L X X
org 000h
clr p3.5
call init_LCD
start: call write_char
;call init_LCD
call write_char2
call geser
sjmp start
;
geser:
mov R6,#40 ;R7 = 40; geser sebanyak 40 karakter
lagi: mov R1,#geserL ;R1 = Geser Kiri
call write_inst
call ldelay
djnz R6,lagi ;R7=R7-1, jika R7 ? 0 maka lompat ke lagi

write_char:
mov dptr,#word1 ;DPTR = [ address word1 ]
mov r3,#28;R3=15,number character to be display
mov r1,#80h ;R1=80h,address DDRAM start position
call write_inst
;

write1:clr a ; A = 0

movc a,@a+dptr ; A = [A+ DPTR]
mov r1,A ; R1 = A
inc dptr ; DPTR = DPTR +1
call write_data;
djnz r3,write1 ; R3 = R3-1,
ret

write_char2:
mov dptr,#word2 ;DPTR = [ address word1 ]
mov r3,#28 ;R3=13,number character to be display
mov r1,#0C0h ;R1=80h,address DDRAM start position
call write_inst
;
write2:clr a ; A = 0

movc a,@a+dptr ; A = [A+ DPTR]
mov r1,A ; R1 = A
inc dptr ; DPTR = DPTR +1
call write_data;
djnz r3,write2 ; R3 = R3-1,
ret

;
Init_lcd:
mov r1,#00000001b ;Display clear
call write_inst ;
mov r1,#00111000b ;Function set,
;Data 8 bit,2 line font 5×7
call write_inst ;
mov r1,#00001100b ;Display on,
;cursor off,cursor blink off
call write_inst
mov r1,#00000110b ;Entry mode, Set increment
call write_inst
ret
;
Write_inst:
clr P3.6 ; RS = P2.0 = 0, write mode instruction
mov P0,R1 ; D7 s/d D0 = P0 = R1
setb P3.7 ; EN = 1 = P2.1
call delay ; call delay time
clr P3.7 ; EN = 0 = P2.1
ret
;
Write_data:
setb P3.6 ; RS = P2.0 = 1, write mode data
mov P0,R1 ; D7 s/d D0 = P0 = R1
setb P3.7 ; EN = 1 = P2.1
call delay ; call delay time
clr p3.7 ; EN = 0 = P2.1
ret
;
Ldelay: mov R2,#040h
Ld1: acall delay
djnz R2,Ld1
ret
delay: mov R0,#0
delay1: mov R7,#0fh
djnz R7,$
djnz R0,delay1
ret
;
word1: DB ‘ KENDRO STIYONO’; here is the data to be look up
word2: DB ‘ 11.11.2374 ‘; here is the data to be look up
;
end

PRINT OUT

MAKALAH MIKROPROCESSSOR INTERRUPSI

Posted on 24 Desember 2013 by kendrozsisandong

MAKALAH MIKROPROSESOR
“ INTERRUPSI DALAM MIKROPROCESSOR“

Disusun Oleh :

Nama : Kendro Stiyono
NIM : 11.11.2374
Kelas : TI 11 A

JURUSAN TEKNIK INFORMATIKA

SEKOLAH TINGGI MANAJEMEN INFORMATIKA DAN KOMPUTER AMIKOM

PURWOKERTO

2013

Abstrak

Pada saat ini ,teknologi semakin berkembang dengan sangat cepat dan semakin canggih. Perkembangan tekhnologi ini pastinya sangat berkaitan dengan perkembangan tekhologi komputer. Dimana tekhnologi komputer merupakan pendukung bahkan penggerak kemajuan tekhnologi informasi pada jaman sekarang ini. Dan tidak bisa dipungkiri bahwa ilmu elektronika sangat berpengaruh kepada perkembangan tekhnologi. Interrupt atau interupsi adalah proses dalam komputer untuk meminta dilayani oleh mikroprosesor sesuai dengan tingkat prioritasnya yang telah diatur sedemikian rupa oleh sistem hardware computer.
BAB 1.
I. PENDAHULUAN
1.1. Latar Belakang
Pada saat ini ,teknologi semakin berkembang dengan sangat cepat dan semakin canggih. Perkembangan tekhnologi ini pastinya sangat berkaitan dengan perkembangan tekhologi komputer. Dimana tekhnologi komputer merupakan pendukung bahkan penggerak kemajuan tekhnologi informasi pada jaman sekarang ini. Dan tidak bisa dipungkiri bahwa ilmu elektronika sangat berpengaruh kepada perkembangan tekhnologi.
Interupsi atau bisa disebut Interrupt memiliki pengertian suatu permintaan khusus kepada mikroprosessor untuk melakukan sesuatu. Bila terjadi interupsi, mikroprosesor akan menghentikan dahulu apa yang sedang dikerjakannya dan mengerjakan permintaan khusus tersebut serta mampu membuat program dengan memanfaatkan fasilitas interupsi yang tersedia pada mikrokontroler.
Pada makalah ini dijelaskan mengenai interupsi pada mikroprosesor dan register register yang terkait dalam pemrograman bahasa rakitan guna mendukung operasi kerja sintaks sintaks bahasa rakitan teori dan pendalaman praktek melalui pengembangan program aplikasi konkrit
II. TUJUAN
Diharapkan dengan mengetahui interupsi pada mikroprosesor penulis mampu untuk mulai mempelajari mengenai sintaks sintaks bahasa rakitan
III. PERUMUSAN MASALAH
a. Apa itu Interrupsi dan sistem interrupsi ?
b. Sumber Interrupsi
c. Tipe Interupsi
d. Respon Interupsi
e. Jenis jenis interup
f. Penyebab terjadinya interup
g. Contoh program interrupsi
BAB II
IV. PEMBAHASAN
a. Pengertian interrup dan sistem interrup
Interupsi adalah selaan yang diberikan oleh alat luar atau bagian dalam dari sebuah mikrokontroler untuk menjalankan suatu rutin program tertentu. Pengetahuan mengenai interupsi sangat membantu mengatasi masalah pemrograman mikroprocessor/mikrokontroler dalam hal menangani banyak peralatan input/output.
Interupsi adalah selaan yang diberikan oleh alat luar atau bagian dalam dari sebuah mikrokontroler untuk menjalankan suatu rutin program tertentu. Pengetahuan mengenai interupsi sangat membantu mengatasi masalah pemrograman mikroprosesor/mikrokontroler dalam hal menangani banyak peralatan input/output.
Saat kaki RESET pada IC mikroprosesor/mikrokontroler menerima sinyal reset (pada AT89S51 sinyal tersebut berupa sinyal ‘1’ sesaat, pada prosesor lain umumnya merupakan sinyal ‘0’ (sesaat), Program Counter diisi dengan sebuah nilai. Nilai tersebut dinamakan sebagai vektor reset (reset vector), merupakan nomor awal memori-program yang menampung program yang harus dijalankan.
Pembahasan di atas memberi gambaran bahwa proses reset merupakan peristiwa perangkat keras (sinyal reset diumpankan ke kaki Reset) yang dipakai untuk mengatur kerja dari perangkat lunak, yakni menentukan aliran program prosesor (mengisi Program Counter dengan vektor reset).
Program yang dijalankan dengan cara reset, merupakan program utama bagi prosesor. Peristiwa perangkat keras yang dipakai untuk mengatur kerja dari perangkat lunak, tidak hanya terjadi pada proses reset, tapi terjadi pula dalam proses interupsi.
Dalam proses interupsi, terjadinya sesuatu pada perangkat keras tertentu dicatat dalam flipflop khusus, flip-flop tersebut sering disebut sebagai ‘petanda’ (flag), catatan dalam petanda tersebut diatur sedemikian rupa sehingga bisa merupakan sinyal permintaan interupsi processor jika permintaan interupsi ini dilayani prosesor, Program Counter akan diisi dengan sebuah nilai. Nilai tersebut dinamakan sebagai vektor interupsi (interrupt vector), yang merupakan nomor awal memoriprogram yang menampung program yang dipakai untuk melayani permintaan interupsi tersebut.

Program yang dijalankan dengan cara interupsi, dinamakan sebagai program layanan interupsi (ISR – Interrupt Service Routine). Saat prosesor menjalankan ISR, pekerjaan yang sedang dikerjakan pada program utama sementara ditinggalkan, selesai menjalankan ISR prosesor kembali menjalankan program utama, seperti yang digambarkan dalam gambar dibawah ini

Gambar 1 .Bagan kerja prosesor melayani interupsi
Sebuah prosesor bisa mempunyai beberapa perangkat keras yang merupakan sumber sinyal permintaan interupsi, masing-masing sumber interupsi dilayani dengan ISR berlainan, dengan demikian prosesor mempunyai beberapa vektor interupsi untuk memilihISR mana yang dipakai melayani permintaan interupsi dari berbagai sumber.
Kadang kala sebuah vektor interupsi dipakai oleh lebih dari satu sumber interupsi yang sejenis, dalam hal semacam ini ISR bersangkutan harus menentukan sendiri sumber interupsi mana yang harus dilayani saat itu.
Jika pada saat yang sama terjadi lebih dari satu permintaan interupsi, prosesor akan melayani permintaan interupsi tersebut menurut perioritas yang sudah ditentukan, selesai melayani permintaan interupsi perioritas yang lebih tinggi, prosesor melayani permintaan interupsi berikutnya, baru setelah itu kembali mengerjakan program utama.
Saat prosesor sedang mengerjakan ISR, bisa jadi terjadi permintaan interupsi lain, jika permintaan interupsi yang datang belakangan ini mempunyai perioritas lebih tinggi, ISR yang sedang dikerjakan ditinggal dulu, prosesor melayani permintaan yang perioritas lebih tinggi, selesai melayani interupsi perioritas tinggi prosesor meneruskan ISR semula, baru setelah itu kembali mengerjakan program utama. Hal ini dikatakan sebagai interupsi bertingkat (nested interrupt), tapi tidak semua prosesor mempunyai kemampuan melayani interupsi secara ini.
Bagan Lengkap Sistem Interupsi AT89S51 .Meskipun sistem interupsi AT89S51 termasuk sederhana dibandingkan dengan sistem interupsi MC68HC11 buatan Motorola, tapi karena menyangkut 5 sumber interupsi yang masingmasing harus diatur secara tersendiri, tidak mudah untuk mengingat semua masalah tersebut, terutama pada saat membuat program sering dirasakan sangat merepotkan membolak-balik buku untuk mengatur masing-masing sumber interupsi tersebut.
Gambar 2 menggambarkan sistem interupsi AT89S51 selangkapnya, berikut dengan masing-masing bit dalam register-register SFR (Special Function Register) yang dipakai untukmengatur masing-masing sumber interupsi.
Saklar yang digambarkan dalam Gambar 2 mewakili bit dalam register yang harus diatur untuk mengendalikan sumber interupsi, kotak bergambar bendera kecil merupakan flag (petanda) dalam register yang mencatat adanya permintaan interupsi dari masing-masing sumber interupsi. Kedudukan saklar dalam gambar tersebut menggambarkan kedudukan awal setelah AT89S51 direset.
Gambar ini sangat membantu saat penulisan program menyangkut interupsi AT89S51.

Gambar 2. Bagan Lengkap Sistem Interupsi AT89S51
b. Sumber Interrupsi
Sumber interrupsi mempunyai 6 sumber interupsi, yakni Interupsi External (External Interrupt) yang berasal dari kaki INT0 dan INT1,
Interupsi Timer (Timer Interrupt) yang berasal dari Timer 0 maupun Timer 1, Interupsi Port Seri (Serial Port Interrupt) yang berasal dari bagian penerima dan bagian pengirim Port Seri. Di samping itu AT89C52 mempunyai 2 sumber interupsi lain, yakni Interupsi Timer 2 bersumber dari Timer 2 yang memang tidak ada pada AT89S51.
Bit IE0 (atau bit IE1) dalam TCON merupakan petanda (flag) yang menandakan adanya permintaan Interupsi Eksternal.
Ada 2 keadaan yang bisa meng-aktip-kan petanda ini, yang pertamakarena level tegangan ‘0’ pada kaki INT0 (atau INT1), yang kedua karena terjadi transisi sinyal ‘1’ menjadi ‘0’ pada kaki INT0 (atau INT1). Pilihan bentuk sinyal ini ditentukan lewat bit IT0 (atau bit IT1) yang terdapat dalam register TCON.
Kalau bit IT0 (atau IT1) =’0’ maka bit IE0 (atau IE1) dalam TCON menjadi 1’ saat kaki INT0=’0’.
Kalau bit IT0 (atau IT1) =’1’ maka bit IE0 (atau IE1) dalam TCON menjadi 1’ saat terjadi transisi sinyal ‘1’ menjadi ‘0’ pada kaki INT0. Menjelang prosesor menjalankan ISR dari Interupsi Eksternal, bit IE0 (atau bit IE1) dikembalikan menjadi ‘0’, menandakan permintaan Interupsi Eksternal sudah dilayani.
Namun jika permintaan Interupsi Ekternal terjadi karena level tegangan ‘0’ pada kaki IT0 (atau IT1), dan level tegangan pada kaki tersebut saat itu masih =’0’ maka bit IE0 (atau bit IE1) akan segera menjadi ‘1’lagi.
Bit TF0 (atau bit TF1) dalam TCON merupakan petanda (flag) yang menandakan adanyapermintaan Interupsi Timer, bit TF0 (atau bit TF1) menjadi ‘1’ pada saat terjadi limpahan pada pencacah biner Timer 0 (atau Timer 1).
Menjelang prosesor menjalankan ISR dari Interupsi Timer, bit TF0 (atau bit TF1) dikembalikan menjadi ‘0’, menandakan permintaan Interupsi Timer sudah dilayani. Interupsi port seri terjadi karena dua hal, yang pertama terjadi setelah port seri selesai mengirim data 1 byte, permintaan interupsi semacam ini ditandai dengan petanda (flag) TI=’1’. Yang kedua terjadi saat port seri telah menerima data 1 byte secara lengkap, permintaan interupsi semacam ini ditandai dengan petanda (flag) RI=’1’. Petanda di atas tidak dikembalikan menjadi ‘0’ menjelang prosesor menjalankan ISR dari Interupsi port seri, karena petanda tersebut masih diperlukan ISR untuk menentukan sumber interupsi
c. Tipe Interrup
Pada mikroprocessor 8086 ,interupsi dapat berasal dari 3 kemungkinan yaitu:
1. Dari sinyal yang diberikan oleh perangkat luar melalui pin NMI atau INTR, yang disebiut interupsi secara perangkat keras (hardware interrup)
2. Berasal dari eksekusi interuksi interrup (INT), disebut interupsi secara perangkat lunak (software interrup)
3. Dari suatu kondisi yang ditimbulkan karena suatu eksekusi, misalnya ketika prosesor diminta membagi suatu bilangan dengan nol, maka akan muncul interrupsi, hal ini disebut interupsi kondisional.
Terdapat sebanyak 256 buah interrupsi yang disediakan oleh 8086 yang diberi nomor atau tipe 0 sampai dengan 255. Beberapa tipe interupsi sudah dipakai oleh sistem ,anatara lain nomor 0 untuk interupsi kesalahan pembagian dengan 0 (nol) tipe 1 untuk single steep, tipe 2 untuk NMI , nomor 4 untuk interrrupsi pointer overflaw. Sisanya dapat dipakai untuk keperluan yang lain. Setiap nomor interrupsi mempunyai rutin pelayanan interrupsi sendiri.
Alamat alamat dari rutin tersebut ditaruh dalam tabel pointer interupsi yangberlokasi di memori 0000H-03FFH, dalam bentuk pasangan segment-offset. Pada saat terjadi interupsi pasangan seggment-offset ini akan dimasukan ke CS dan IP sehingga mikroprocessor dapat menjalankan rutin tersebut. Untuk interrupsi nomor N ,segmen rutin pelayanan interupsinya ditaruh dimemori dengan alamat 4N dan 4N+1, sedangkan offsetnya di alamat 4N+2 dan 4N+3. Jadi interupsi nomor 8,alamat rutinnya disimpan di memori 020H-023H. Jika kita membuat sistem mikroprocessor yang mempergunakan interupsi, maka selain koneksi hardware ,kita juga harus membuat program untuk rutin pelayanan interupsi. Kemudian menyimpan alamat rutin tersebut di tabel alamat interrupsi yang sesuai dengan nomor interrupsi yang dipakai.
d. Respon Interupsi
Prinsip kerja interrupsi cukup rumit karena ketika ada interrrupsi, sebelum mikroprocessor mengerjakan rutin pelayanan interrupsi, mikroprocessor harus mencatat dulu alamat dari interrupsi yang sedang kerjakan pada saat itu, sehingga dia bisa kembali ke tempat yang tepat yang ketika selesai mengerjakannya rutin pelayanan interrupsi dan meneruskan pekerjaaanya yang tertunda.
Pada setiap selesai melaksanakan suatu intruksi, 8086 akan memeriksa apakah ada permintaan intrupsi. Jika ada dan flag interupsi pada mikroprocessor (IF) mempunyai nilai 1 atau set,artinya mikroprocessor mengijinkan adanya interupsi.
e. Jenis jenis interup
Interrup dibagi menjadi dua jenis antara lain :
 Software :interrupt jenis ini juga disebut System call.
Misalnya, suatu program ingin mencetak hasil dengan printer
 Hardware, terjadi karena adanya aksi pada perangkat keras, seperti penekanan tombol keyboard atau menggerakkan mouse.
Interrupt ini terbagi lagi menjadi dua,yaitu: Maskable Interrupt(terjadi karena aksi luar) dan Non Maskable Interrupt(terjadi karena memori atau kesalahan parity pada program)
f. .Penyebab terjadinya innterrup
 .Program, terjadi akibat eksekusi suatu instruksi
 .Timmer, disebabkan oleh timmer prosessor
 I/O, disebabkan oleh I/O controller baik sebagai tanda bahwa operasi telah selesai maupun memberi tanda eror.
 Kegagalan hardware, disebabkan oleh kesalahan hardware seperti power failure dan memori parity eror
g. Contoh program
Gelombang kotak dengan frekuensi variabel
01: Clock bit P1.7
02: Pulse bit P3.2
03: ;
04: ; Vektor Reset
05: ORG 0000H
06: LJMP Start
07: ;
08: ; Vektor interupsi Eksternal 0
09: ORG 0003H
10: LJMP MengukurPulsa
11: ;
12: ; Vektor interupsi Timer 0
13: ORG 000BH
14: LJMP MembuatClock
15: ;
16: Start:
17: MOV TMODE,#01H
18: SETB IT0
19: SETB EX0
20: SETB EA
21: TanpaHenti:
22: SJMP TanpaHenti
23: ;
24: ; ISR interupsi eksternal
25: MengukurPulsa:
26: MOV TH0,#0
27: MOV TL0,#1
28: SETB TR0
29: JNB Pulse,$
30: CLR TR0
31: XRL TH0,#0FFH
32: XRL TL0,#0FFH
33: MOV A,#1
34: ADD A,TL0
35: MOV R2,A
36: MOV A,#0
37: ADDC A,TH0
38: MOV R3,A
39: SETB ET0
40: SETB TF0
41: RETI
42: ;
43: ; ISR interupsi timer 0
44: MembuatClock:
45: CLR TR0
46: MOV TH0,R3
47: MOV TL0,R2
48: CPL Clock
49: SETB TR0
50: RETI
51: ;
52: END
Program utama terletak pada baris 16 sampai 22. Baris 17 mengatur Timer 0 bekerja pada Mode 1 – Pencacah Biner 16 bit, yakni menghubungkan TL0 dan TH0 menjadi satu.
Baris 18 menentukan yang dianggap sebagai sinyal interupsi adalan perubahan tegangan pada kaki INT0 dari ‘1’ menjadi ‘0’.
Baris 19 mengaktipkan sistem interupsi eksternal 0 dan baris 20 mengaktipkan sistem interupsi AT89C2051 secara keseluruhan. Tapi saat ini interupsi Timer 0 belum diaktipkan. AT89C2051 akan berputar-putar pada baris 21 dan 22.Saat tegangan pada kaki INT0 berubah dari ‘1’ menjadi ‘0’, bit IE0 menjadi ‘1’ yang merupakan sinyal permintaan interupsi eksternal 0, hal ini mengakibatkan AT89C2051 mengerjakan rutin MengukurPulsa yang merupakan ISR interupsi eksternal 0 (baris 25 sampai 41).
Dalam ISR ini, lebar pulsa pada kaki INT0 dengan Timer 0. Baris 26 dan 27 membuat TH0 dan TL0 bernilai 0. Baris 28 membuat Timer 0 mulai mencacah, dan baris 29 menunggu tegangan pada kaki INT0 kembali menjadi ‘1’, dan selama itu Timer 0 terus mencacah. Baris 30 menghentikan Timer 0, nilai yang tersimpan dalam TH0 dan TL0 saat itu merupakan panjang pulsa dalam satuan mikro-detik. Lebar pulsa yang didapat dari pengukuran ini akan dipakai untuk menentukan frekuensi gelombang kotak yang dibangkitkan. Lebar pulsa ini dinegatipkan dan disimpan ke dalam R2 dan R3 pada baris 31 sampai 38.
Baris 39 mengaktipkan permintaan interupsi dari Timer 0, dan baris 40 (SETB TF0) membangkitkan permintaan interupsi timer 0 yang pertama kali lewat program. Rutin MembuatClock (baris 44 sampai 50) merupakan ISR untuk interupsi Timer 0. Dalam rutin ini mula-mula sumber sinyal denyut (clock) untuk Timer 0 dihentikan (baris 45), setelah itu TH0 dan TL0 diisi ulang dengan nilai hasil pengukuran pulsa yang sudah disimpan dalam R2 dan R2 (baris 46 dan 47). Level tegangan pada P1.7 dibalik pada baris 48, setelah itu sumber sinyal denyut Timer 0 diaktipkan kembali pada baris 49.
BAB III
V. PENUTUP
Demikian makalah tentang inteerup yang saya buat, semoga dapat bermanfaat dan berguna bagi kita semua.
V.1 Kesimpulan


Pengertian interrup dan sistem interrup

Interupsi adalah selaan yang diberikan oleh alat luar atau bagian dalam dari sebuah mikrokontroler untuk menjalankan suatu rutin program tertentu. Pengetahuan mengenai interupsi sangat membantu mengatasi masalah pemrograman mikroprosesor/mikrokontroler dalam hal menangani banyak peralatan input/output.

2. Saat kaki RESET pada IC mikroprosesor/mikrokontroler menerima sinyal reset (pada AT89S51 sinyal tersebut berupa sinyal ‘1’ sesaat, pada prosesor lain umumnya merupakan sinyal ‘0’ (sesaat), Program Counter diisi dengan sebuah nilai. Nilai tersebut dinamakan sebagai vektor reset (reset vector), merupakan nomor awal memori-program yang menampung program yang harus dijalankan.
 Terdapat sebanyak 256 buah interrupsi yang disediakan oleh 8086 yang diberi nomor atau tipe 0 sampai dengan 255. Beberapa tipe interupsi sudah dipakai oleh sistem ,anatara lain nomor 0 untuk interupsi kesalahan pembagian dengan 0 (nol) tipe 1 untuk single steep, tipe 2 untuk NMI , nomor 4 untuk interrrupsi pointer overflaw. Sisanya dapat dipakai untuk keperluan yang lain. Setiap nomor interrupsi mempunyai rutin pelayanan interrupsi sendiri.
V.2 SARAN
Agar lebih memahami program dengan memanfaatkan fasilitas interrupsi yang tersedia pada mikrokontroler makan harus sering melakukan ujicoba atau praktek.
DAFTAR PUSTAKA
[1]. http://yusniaalfisyahrin.wordpress.com/2013/01/08/sekilas-tentang-interupsi-pada-mikrokontroler/
[2]. http://file.upi.edu/Direktori/FPMIPA/PRODI._ILMU_KOMPUTER/HERBERT/KEL03
[3]. http://elektro.ft-untirta.ac.id/siswo/wp-content/uploads/sites/3/2013/03/BUKU-PEGANGAN-KULIAH-DASAR-MIKROPROSESOR-LENGKAP.pdf
[4]. http://staff.uny.ac.id/sites/default/files/07%20Modul%20Bahan%20Ajar-10.pdf

link teman:
Siti Maemunah
Yonathan Priambudhi
Dosen Arif Johar Taufiq
Januar Sudiono
Andi Setyo Budi S
Kiki Anggraeni
Herun

mengkoneksikan Visual Basic 2010 dengan SQL Server 2005

Posted on 27 Desember 2012 by kendrozsisandong

kali ini saya akn menjelaskan cara cara atau langkah langkah dari membuat data base pada SQL Server 2005 sampai mengkoneksikan dengan Vb.net 2010..

A. MEMBUAT DATABASE

-langkah pertama yaitu kita buka Aplikasi SQL Server 2005 setela itu yaitu

– kemudian klik connect
–          Klik kanan database, kemudian pilih new database, beri nama dan save di drive d atau e terserah anda.
–          Klik [+] database yang anda buat tadi kemudian klik kanan folder table pilih new table, kemudian format table dibuat sesuai yang telah ditentukan saat praktek, kemudian klik save all dan beri nama.
–          Klik kanan table tadi yang anda buat kemudian klik open table dan isikan kolom pada table tersebut sesuai ketentuan pada saat praktek, bila sudah klik save all.

B. MEMBUAT FORM PADA VB.NET 2010

– Open Visual Studio 2010

– Klik new project, kemudian pilih visual basic dan yang kanan pilih windows form application dan klik ok

C. UNTUK MENGHUBUNGKAN VB.NET 2010 DENGAN SQL SERVER 2005 yaitu :

– Klik menu data kemudian pilih add new data source

– pilih database klik next,pilih dataset klik next

– klik new conection, isi server name dengan (SI_KENLOPH-PC\SA) server pada SQL Server kemudian pilih use SQL Server Authentication, isi server dan password lalu browse select or enter a database name, kemudian klik test conection bila sukses klik ok, kemudian klik next, kemudian cetang semua pilihan kemudian klik finish

– klik data sourch dan masukan isi dari table tersebut ke dalam form.

Kemudian setelah mengkoneksikan Visual basic dengan database

Kita membuat property property lain …

Disini saya menambahkan BUTTON dan TEXBOOX…

-Button pertama saya gunakan untuk membuat tombol Sebelumnya/previous yaitu dengan codding di bawah ini…

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

TbmahasiswaBindingSource.MovePrevious()

End Sub

Kemudian setelah di klik maka akan keluar seperti ganbar di bawah ini

-Button kedua saya gunakan untuk membuat tombol sesudahnya/Next yaitu dengan codding di bawah ini :

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click

TbmahasiswaBindingSource.MoveNext()

End Sub

Sebelum di jalankan

sesudah di jalankan

–Button ke tiga saya gunakan untuk membuat tombol pertama/first yaitu coddingnya sebagai berikut

Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click

TbmahasiswaBindingSource.MoveFirst()

End Sub

berikut gambar untuk perintah pada button untuk navigasi pertama

–Button ke empat saya gunakan untuk membuat tombol terakhir/last yaitu coddingnya sebagai berikut

Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click

TbmahasiswaBindingSource.MoveLast()

End Sub

berikut gambar untuk perintah pada button untuk terakhir/last

–Buttton ke lima saya gunakan untuk membuat tombol keluar yaitu coodingnya sebagai berikut

If MsgBox(“anda yakin akan keluar??”, vbYesNo + vbQuestion + vbDefaultButton2, “tutup”) = vbYes Then

Me.Close()

End If

End Sub

berikut gambar untuk perintah pada button untuk keluar

–Button ke enam saya gunakan untuk membuat tombol cari coddingnya sebagai berikut

If (TbmahasiswaBindingSource.Find(“Nama”, TextBox1.Text)) > -1 Then

MsgBox(“Data Ditemukan”)

Else

MsgBox(“Data Tidak Ditemukan”)

End If

End Sub

Ketika data ditemukan

ketika data tidak di temukan

Button ke tujuh saya gunakan untuk tombol Add New yaitu coddingnya sebagai berikut :

Private Sub Button7_Click_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button7.Click

Me.TbmahasiswaBindingSource.AddNew()

End Sub

sebelum di add

ketika sudah di add

Dan yang terakhir saya gunakan textbook untuk mencari nama.. untuk codingnya yaitu

Private Sub TextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged

Me.TbmahasiswaBindingSource.Filter = “nama='” & TextBox1.Text & “‘”

End Sub

demikian pejelasan dari saya ,,,

mohon maaf karna masih banyak kekurangannya…

Semua Tentang OSI layer Dan TCP/IP

Posted on 20 Desember 2012 by kendrozsisandong

TCP/IP (Transmission Control Protocol/Internet Protocol)

Internet protocol suite atau TCP/IP (singkatan dari Transmission Control Protocol/Internet Protocol) adalah standar komunikasi data yang digunakan oleh komunitas internet dalam proses tukar-menukar data dari satu komputer ke komputer lain di dalam jaringan Internet. Protokol ini tidaklah dapat berdiri sendiri, karena memang protokol ini berupa kumpulan protokol (protocol suite). Protokol ini juga merupakan protokol yang paling banyak digunakan saat ini. Data tersebut diimplementasikan dalam bentuk perangkat lunak (software) di sistem operasi. Istilah yang diberikan kepada perangkat lunak ini adalah TCP/IP stack

Protokol TCP/IP dikembangkan pada akhir dekade 1970-an hingga awal 1980-an sebagai sebuah protokol standar untuk menghubungkan komputer-komputer dan jaringan untuk membentuk sebuah jaringan yang luas (WAN). TCP/IP merupakan sebuah standar jaringan terbuka yang bersifat independen terhadap mekanisme transport jaringan fisik yang digunakan, sehingga dapat digunakan di mana saja. Protokol ini menggunakan skema pengalamatan yang sederhana yang disebut sebagai alamat IP (IP Address) yang mengizinkan hingga beberapa ratus juta komputer untuk dapat saling berhubungan satu sama lainnya di Internet. Protokol ini juga bersifat routable yang berarti protokol ini cocok untuk menghubungkan sistem-sistem berbeda (seperti Microsoft Windows dan keluarga UNIX) untuk membentuk jaringan yang heterogen.

Protokol TCP/IP selalu berevolusi seiring dengan waktu, mengingat semakin banyaknya kebutuhan terhadap jaringan komputer dan Internet. Pengembangan ini dilakukan oleh beberapa badan, seperti halnya Internet Society (ISOC), Internet Architecture Board (IAB), dan Internet Engineering Task Force (IETF). Macam-macam protokol yang berjalan di atas TCP/IP, skema pengalamatan, dan konsep TCP/IP didefinisikan dalam dokumen yang disebut sebagai Request for Comments (RFC) yang dikeluarkan oleh IETF.

Arsitektur TCP/IP tidaklah berbasis model referensi tujuh lapis OSI, tetapi menggunakan model referensi DARPA. Seperti diperlihatkan dalam diagram, TCP/IP merngimplemenasikan arsitektur berlapis yang terdiri atas empat lapis. Empat lapis ini, dapat dipetakan (meski tidak secara langsung) terhadap model referensi OSI. Empat lapis ini, kadang-kadang disebut sebagai DARPA Model, Internet Model, atau DoD Model, mengingat TCP/IP merupakan protokol yang awalnya dikembangkan dari proyek ARPANET yang dimulai oleh Departemen Pertahanan Amerika Serikat.

Setiap lapisan yang dimiliki oleh kumpulan protokol (protocol suite) TCP/IP diasosiasikan dengan protokolnya masing-masing. Protokol utama dalam protokol TCP/IP adalah sebagai berikut:

Protokol lapisan aplikasi: bertanggung jawab untuk menyediakan akses kepada aplikasi terhadap layanan jaringan TCP/IP. Protokol ini mencakup protokol Dynamic Host Configuration Protocol (DHCP), Domain Name System (DNS), Hypertext Transfer Protocol (HTTP), File Transfer Protocol (FTP),Telnet, Simple Mail Transfer Protocol (SMTP), Simple Network Management Protocol (SNMP), dan masih banyak protokol lainnya. Dalam beberapa implementasi stack protokol, seperti halnya Microsoft TCP/IP, protokol-protokol lapisan aplikasi berinteraksi dengan menggunakan antarmuka Windows Sockets (Winsock) atau NetBIOS over TCP/IP (NetBT).
Protokol lapisan antar-host: berguna untuk membuat komunikasi menggunakan sesi koneksi yang bersifat connection-oriented atau broadcast yang bersifat connectionless. Protokol dalam lapisan ini adalah Transmission Control Protocol (TCP) dan User Datagram Protocol (UDP).
Protokol lapisan internetwork: bertanggung jawab untuk melakukan pemetaan (routing) dan enkapsulasi paket-paket data jaringan menjadi paket-paket IP. Protokol yang bekerja dalam lapisan ini adalah Internet Protocol (IP), Address Resolution Protocol (ARP), Internet Control Message Protocol (ICMP), dan Internet Group Management Protocol (IGMP).
Protokol lapisan antarmuka jaringan: bertanggung jawab untuk meletakkan frame-frame jaringan di atas media jaringan yang digunakan. TCP/IP dapat bekerja dengan banyak teknologi transport, mulai dari teknologi transport dalam LAN (seperti halnya Ethernet dan Token Ring), MAN dan WAN (seperti halnya dial-up modem yang berjalan di atas Public Switched Telephone Network (PSTN), Integrated Services Digital Network (ISDN), serta Asynchronous Transfer Mode (ATM)).

PENGALAMATAN

Protokol TCP/IP menggunakan dua buah skema pengalamatan yang dapat digunakan untuk mengidentifikasikan sebuah komputer dalam sebuah jaringan atau jaringan dalam sebuah internetwork, yakni sebagai berikut:

Pengalamatan IP: yang berupa alamat logis yang terdiri atas 32-bit (empat oktet berukuran 8-bit) yang umumnya ditulis dalam format www.xxx.yyy.zzz. Dengan menggunakan subnet mask yang diasosiasikan dengannya, sebuah alamat IP pun dapat dibagi menjadi dua bagian, yakni Network Identifier (NetID) yang dapat mengidentifikasikan jaringan lokal dalam sebuahinternetwork dan Host identifier (HostID) yang dapat mengidentifikasikan host dalam jaringan tersebut. Sebagai contoh, alamat 205.116.008.044 dapat dibagi dengan menggunakan subnet mask 255.255.255.000 ke dalam Network ID 205.116.008.000 dan Host ID 44. Alamat IP merupakan kewajiban yang harus ditetapkan untuk sebuah host, yang dapat dilakukan secara manual (statis) atau menggunakan Dynamic Host Configuration Protocol (DHCP) (dinamis).
Fully qualified domain name (FQDN): Alamat ini merupakan alamat yang direpresentasikan dalam nama alfanumerik yang diekspresikan dalam bentuk <nama_host>.<nama_domain>, di mana <nama_domain> mengindentifikasikan jaringan di mana sebuah komputer berada, dan <nama_host> mengidentifikasikan sebuah komputer dalam jaringan. Pengalamatan FQDN digunakan oleh skema penamaan domain Domain Name System (DNS). Sebagai contoh, alamat FQDN id.wikipedia.org merepresentasikan sebuah host dengan nama “id” yang terdapat di dalam domain jaringan “wikipedia.org“. Nama domain wikipedia.org merupakan second-level domain yang terdaftar di dalam top-level domain .org, yang terdaftar dalamroot DNS, yang memiliki nama “.” (titik). Penggunaan FQDN lebih bersahabat dan lebih mudah diingat ketimbang dengan menggunakan alamat IP. Akan tetapi, dalam TCP/IP, agar komunikasi dapat berjalan, FQDN harus diterjemahkan terlebih dahulu (proses penerjemahan ini disebut sebagai resolusi nama) ke dalam alamat IP dengan menggunakan server yang menjalankan DNS, yang disebut dengan Name Server atau dengan menggunakan berkas hosts (/etc/hosts atau %systemroot%\system32\drivers\etc\hosts) yang disimpan di dalam mesin yang bersangkutan.

Berikut ini merupakan layanan tradisional yang dapat berjalan di atas protokol TCP/IP:

Pengiriman berkas (file transfer). File Transfer Protocol (FTP) memungkinkan pengguna komputer yang satu untuk dapat mengirim ataupun menerima berkas ke sebuah host di dalamjaringan. Metode otentikasi yang digunakannya adalah penggunaan nama pengguna (user name) dan password”, meskipun banyak juga FTP yang dapat diakses secara anonim (anonymous), alias tidak berpassword. (Keterangan lebih lanjut mengenai FTP dapat dilihat pada RFC 959.)
Remote login. Network terminal Protocol (telnet) memungkinkan pengguna komputer dapat melakukan log in ke dalam suatu komputer di dalam suatu jaringan secara jarak jauh. Jadi hal ini berarti bahwa pengguna menggunakan komputernya sebagai perpanjangan tangan dari komputer jaringan tersebut. (Keterangan lebih lanjut mengenai Telnet dapat dilihat pada RFC 854 danRFC 855.)
Computer mail. Digunakan untuk menerapkan sistem surat elektronik. (Keterangan lebih lanjut mengenai e-mail dapat dilihat pada RFC 821 RFC 822.)
Network File System (NFS). Pelayanan akses berkas-berkas yang dapat diakses dari jarak jauh yang memungkinkan klien-klien untuk mengakses berkas pada komputer jaringan, seolah-olah berkas tersebut disimpan secara lokal. (Keterangan lebih lanjut mengenai NFS dapat dilihat RFC 1001 dan RFC 1002.)
Remote execution. Memungkinkan pengguna komputer untuk menjalankan suatu program tertentu di dalam komputer yang berbeda. Biasanya berguna jika pengguna menggunakan komputer yang terbatas, sedangkan ia memerlukan sumber yg banyak dalam suatu sistem komputer.
Ada beberapa jenis remote execution, ada yang berupa perintah-perintah dasar saja, yaitu yang dapat dijalankan dalam system komputer yang sama dan ada pula yg menggunakan sistemRemote Procedure Call (RPC), yang memungkinkan program untuk memanggil subrutin yang akan dijalankan di sistem komputer yg berbeda. (sebagai contoh dalam Berkeley UNIX ada perintah rsh dan rexec.)
Name server yang berguna sebagai penyimpanan basis data nama host yang digunakan pada Internet (Keterangan lebih lanjut dapat dilihat pada RFC 822 dan RFC 823 yang menjelaskan mengenai penggunaan protokol name server yang bertujuan untuk menentukan nama host di Internet.)

Lapisan TCP/IP

Model jaringan TCP/IP yaitu berbentuk layer atau lapisan. Ada 5 Lapisan pada TCP/IP, antara lain:

1. Physical Layer

Merupakan lapisan terbawah yang mendefinisikan besaran fisik seperti media komunikasi, dll. Lapisan ini fleksibel sesuai dengan media komunikasi yang digunakan.

2. Network Access Layer

Berfungsi mengatur penyaluran data pada media fisik yang digunakan. Lapisan ini memberikan layanan dan koreksi terhadap kesalahan data yang ditransmisikan.

3. Internet Layer

Berfungsi mendefinisikan bagaimana hubungan antara dua pihak dapat terjadi pada suatu jaringan. Pada jaringan internet, lapisan ini bertugas untuk memastikan agar semua paket data yang dikirimkan dapat sampai di tujuannya masing-masing.

4. Transport Layer

Berfungsi mendefinisikan cara-cara untuk melakukan pengiriman data antara end to end host. Lapisan ini menjamin bahwa informasi yang diterima oleh penerima adalah sama dengan informasi yang dikirim oleh pengirim.

5. Application Layer

Merupakan lapisan terakhir dalam arsitektur TCP/IP yang berfungsi mendefinisikan aplikasi-aplikasi yang berjalan pada jaringan. Oleh karena itu, akan banyak protokol pada lapisan ini sesuai dengan jumlah aplikasi yang dapat dijalankan.

2. Cara Kerja TCP/IP

Layer-layer dan protokol yang terdapat dalam arsitektur jaringan TCP/IP menggambarkan fungsi-fungsi dalam komunikasi antara dua buah komputer. Setiap lapisan menerima data dari lapisan di atas atau dibawahnya, kemudian memproses data tersebut sesuai fungsi protokol yang dimilikinya dan meneruskannya ke lapisan berikutnya. Ketika dua komputer berkomunikasi, terjadi aliran data antara pengirim dan penerima melalui lapisan-lapisan di atas. Pada pengirim, aliran data adalah dari atas ke bawah.

OSI (Internasional Standarizaation organization)

1. Pengertian OSI

OSI adalah protokol untuk menyatakan model jaringan yang melakukan interkoneksi tanpa memandang perangkat keras / “hardware” yang digunakan, sepanjang software komunikasi sesuai dengan standard. Hal ini secara tidak langsung menimbulkan modularity.

Modularity mengacu pada pertukaran protokol di level tertentu tanpa mempengaruhi atau merusak hubungan atau fungsi dari level lainnya. Dalam sebuah layer, protokol saling dipertukarkan, dan memungkinkan komunikasi terus berlangsung. Pertukaran ini berlangsung didasarkan pada perangkat keras / “hardware” dari vendor yang berbeda dan bermacam-macam alasan atau keinginan yang berbeda.

2. Lapisan OSI

OSI terdiri dari 7 lapisan, antara lain:

1. Physical

Bertanggung jawab atas proses data menjadi bit dan mentransfernya melalui media, seperti kabel, dan menjaga koneksi fisik antar sistem.

2. Data Link

Menyediakan link untuk data, memaketkannya menjadi frame yang berhubungan dengan hardware kemudian diangkut melalui media komunikasi dengan kartu jaringan, mengatur komunikasi layer physical antara sistem koneksi dan penanganan error.

3. Network

Bertanggung jawab menentukan alamat jaringan, menentukan rute yang harus diambil selama perjalanan, dan menjaga antrian trafik di jaringan. Data pada layer ini berbentuk paket.

4. Transport

Bertanggung jawab membagi data menjadi segmen, menjaga koneksi logika “end-to-end” antar terminal, dan menyediakan penanganan error.

5. Session

Menenutkan bagaimana dua terminal menjaga, memelihara dan mengatur koneksi, bagaimana mereka saling berhubungan satu sama lain. Koneksi layer ini disebut “session”.

6. Presentation

Bertanggung jawab bagaimana data dikonversi dan diformat untuk transfer data. Contoh konversi format teks ASCII untuk dokumen, .gif dan JPG untuk gambar. Layer ini membentuk kode konversi, translasi data, enkripsi dan konversi.

7. Application

Menyediakan jasa untuk aplikasi pengguna. Layer ini bertanggung jawab atas pertukaran informasi antara program komputer, seperti e-mail, dan service lain yang jalan di jaringan, seperti server printer atau aplikasi komputer lainnya.

8. Cara kerja OSI

Ketika data ditransfer melalui jaringan, sebelumnya data tersebut harus melewati ke-tujuh layer dari satu terminal, mulai dari layer aplikasi sampai physical layer, kemudian di sisi penerima, data tersebut melewati layer aphysical sampai aplikasi. Pada saat data melewati satu layer dari sisi pengirim, maka akan ditambahkan satu “header” sedangkan pada sisi penerima “header” dicopot sesuai dengan layernya.

Prinsip Kerja OSI Layer vs TCP/IP serta Perbedaan dan Persamaannya.
Persamaan Model OSI dan TCP/IP :
1) Keduanya memiliki layer (lapisan).
2) Sama – sama memiliki Application layer meskipun memiliki layanan yang berbeda.
3) Memiliki transport dan network layer yang sama.
4) Asumsi dasar keduanya adalah menggunakan teknologi packet switching.
5) Dua-duanya punya transport dan network layer yang bisa diperbandingkan.
6) Dua-duanya menggunakan teknologi packet-switching, bukan circuit-switching ( Teknologi Circuit-Switching digunakan pada analog telephone).

Perbedaan Model OSI dan TCP/IP :
1) TCP/IP menggabungkan presentation dan session layers kedalam application layers.
2) TCP/IP menggabungkan OSI-data link dan physical layers kedalam network access layer.
3) TCP/IP Protocol adalah standar dalam pengembangan internet.

Prinsip Kerja TCP/IP :

Untuk memindahkan data antara dua komputer yang berbeda dalam suatu jaringan yang terdiri dari banyak komputer, dibutuhkan alamat tujuan dan perantara untukmemindahkan sinyal elektronik pembentuk data secara aman dan langsung.
Internet menggunakan protokol untuk menjamin sampainya data secara aman di tempat tujuan.
Saat seorang pengguna Internet mengirim sekelompok teks ke mesin lain, TCP/IP mulai bekerja. TCP membagi teks tersebut menjadi paket-paket data kecil, menambahkan beberapa informasi (dapat dianggap sebagai pengiriman barang), sehingga computer penerima memastikan bahwa paket yang diterimanya tidak mengalami kerusakan sepanjang pengiriman. IP menambahkan label yang berisikan informasi alamat pada paket tersebut.
Deretan paket-paket TCP/IP berjalan menuju tujuan yang sama dengan menggunakan berbagai jalur yang berbeda. Sebuah perangkat khusus yang disebut router dipasang di titik persimpangan antar jaringan dan memutuskan jalur mana yang paling efisien yang menjadi langkah berikut dari sebuah paket. Router membantu mengatur arus lalu lintas di Internet dengan membagi beban, sehingga menghindari kelebihan beban pada suatu bagian dari sistem yang ada.
Saat paket-paket TCP/IP tiba di tempat tujuannya, komputer akan membuka label alamat IP lalu menggunakan daftar pengiriman yang ada pada paket TCP untuk memeriksa apakah ada kerusakan paket yang terjadi selama pengiriman, dan menyusun kembali paket-paket tsb menjadi susunan teks seperti aslinya. Saat komputer penerima menemukan paket yang rusak, komputer tsb akan meminta komputer pengirim untuk mengirim salinan baru dari paket yang rusak.
Sebuah perangkat khusus yang disebut gateway memungkinkan beragam tipe jaringan yang ada di horison elektronik untuk berkomunikasi dengan Internet menggunakan TCP/IP. Gateway menerjemahkan protokol asli jaringan komputer tersebut menjadi TCP/IP dan sebaliknya.
Bagi seorang pemakai, Internet hadir seperti jaringan global raksasa yang tidak terbatas, yang langsung merespon jika diminta. Komputer, gateway, router, dan protokol yang membuat ilusi ini bekerja.

Daftar Pustaka

1.http://dhanz3rd.wordpress.com/2011/01/10/tcpip-dan-osi-layer/

2. : http://raytkj.blogspot.com/2012/02/perbedaan-layer-osi-dan-tcp-ip.html#ixzz2FZmNld00

3. http://id.wikipedia.org/wiki/Internet_protocol_suite

Penjelasan Program parram array dan macam macam fungsi bawaan

Posted on 17 Desember 2012 by kendrozsisandong

function dengan return value

berupa array

I.Program parramarray

Penjelasan : memesan variabel hasil berjumlah 3 yaitu hasil(0),hasil(1),hasil(3)

Penjelasan:‘mendeklarasikan variabel i sebgai integer dan perualangan i sebanyak array yang di pesan (To UBound(args))

Penjelasan: jika i= 0 maka maka hasil(1) = args jumlah index ny demikian juga hasil(2),,

Jika hasil (1) kurang dari args(i) maka hasil (1) sama dengan hasil args(i) ny demikian juga hasil dua lebih besar dari args (i) maka hasil(2) sama dengan args (i).dan terus mengulang sampai jumlah indexs

Penjelasan pada button 1 memesan variable statistik

Pada textbox 1 untuk menampilkan jumlah keseluruhan dari array yang telah di pesan d atas

Textbox2 untuk menampilkan nilai atau angka terkecil dari array tersebut

Textbox3 untuk menampilkan nilai atau angka terbesar dari array tersebut

1.bisa muncul angka 9 dari jumlah array yang terdapat pada coding yaitu ”fstat(1, 6, 2,)”

2.bisa muncul angka (6) yaitu bilangan terbesar dari array tersebut adalah 6

3. dan bisa muncul angka 1 yaitu dari bilangan terkecil dari array tersebut adalah 1

ketika program di jalankan dan menge-klik button 1 maka seperti berikut

Penjelasan program Overloading function

Over Loading Function

Overloading function dalah beberapa fungsi yang memiliki perintah berbeda tetapi namanya sama. Sebagai contoh adalah program dibawah ini. Terdapat 2 Fuction hitung pada program ini namun program hanya akan menjalankan salah satunya saja.
Function hitung(ByVal bil1 As Integer, ByVal bil2 As Integer) As Integer
hitung = bil1 + bil2
End Function
Function hitung(ByVal bil1 As Integer, ByVal bil2 As Integer, ByVal bil3 As Integer) As Integer
hitung = bil1 + bil2 + bil3
End Function
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
TextBox1.Text = hitung(1, 2, 3)
End Sub
Pada dua procedure diatas, yg pertama mempunyai dua buah deklarasi variabel dan yang kedua mempunyai tiga deklarasi variabel, lalu bagaimana cara kerjanya?
Hal ini bergantung dari variabel yg anda suplay pada saat procedure tersebut anda panggil,
jika anda hanya menyuplai tiga variabel, pada saat pemanggilan procedure maka yg di eksekusi adalah procedure yang kedua, akan tetapi
jika anda memberikan dua nilai variabel pada saat pemanggilan procedure maka yg dieksekusi adalah procedure yg pertama.

Fungsi-fungsi Bawaan VB

Dalam Visual Basic, fungsi bawaan adalah suatu fungsi yang sudah ada dalam Visual Basic dan dapat digunakan secara langsung. Ada sejumlah fungsi-fungsi bawaan dalam VB diantaranya adalah fungsi untuk mengubah suatu tipe data String dari suatu TextBox menjadi tipe data numerik agar dapat digunakan untuk melakukan operasi perhitungan, fungsi yang berkaitan dengan matematika, dll.

Fungsi-fungsi Numerik

Dengan menggunakan fungsi-fungsi bawaan yang disediakan, waktu pembuatan sebuah program dapat disingkat. Fungsi-fungsi numerik merupakan fungsi-fungsi yang berkaitan dengan tipe data numerik. Fungsi-fungsi ini dapat dikelompokkan sebagai berikut :

a. Fungsi-fungsi konversi ke integer.

Ada tiga macam fungsi yang melakukan konversi ke tipe data integer yaitu seperti terlihat pada tabel .

Tabel 10.1 Fungsi-fungsi Konversi ke Integer

Untuk bilangan positif, fungsi Fix() dan Int() memberikan perlakuan yang sama. Sebagai contoh, kedua pernyataan berikut ini mengembalikan nilai yang sama:

Namun fungsi Fix() dan Int() memberikan perlakuan berbeda pada bilangan negatif. Kedua pernyataan berikut memberikan pengembalian yang berbeda :

Sedangkan fungsi CInt() mengembalikan pembulatan angka yang terdekat. Berikut ni contoh penggunaan CInt() :

a. Fungsi – fungsi konversi tipe data

Tabel 10.2 merupakan fungsi – fungsi yang melakukan konversi ke tipe data.

Tabel 10.2 Fungsi-fungsi Konversi ke Tipe Data

Sebagai contoh misalkan sebuah data yang merupakan hasil bagi (1 / 7) .

a. Fungsi-fungsi matematika

Fungsi-fungsi yang bekaitan dengan matematika seperti terlihat pada table 10.3.

Tabel 10.3 Fungsi-fungsi Matematika

Fungsi-fungsi String

Selain fungsi-fungsi numerik, Visual Basic juga mempunyai sejumlah fungsi-fungsi String diantaranya seperti pada table 10.4.

Tabel 10.4 Fungsi-fungsi String

Substring merupakan bagian dari suatu string. Untuk memperoleh substring dari suatu string dapat digunakan 3 fungsi berikut :

Left$(StringVal, length)

Fungsi ini mengembalikan nilai string dari sebelah kiri sebanyak length karakter .

Right$(StringVal, length)

Fungsi ini mengembalikan nilai string dari sebelah kanan sebanyak length karakter .

Mid$(StringVal, startVal, length)

Fungsi ini mengembalikan nilai string dari startVal sebanyak length karakter .

Contoh :

Fungsi-fungsi Tanggal dan Waktu

Jika dalam suatu aplikasi diperlukan pengambilan tanggal atau waktu dari sistem, Visual Basic menyediakan fungsi – fungsi Now(), Date(), dan Time(). Lihat table 10.5.

Tabel 10.5 Fungsi-fungsi Tanggal dan Waktu

Selain fungsi-fungsi diatas terdapat sebuah fungsi yaitu format() yang berkaitan dengan fungsi-fungsi Tanggal dan waktu.

Fungsi ini mengembalikan nilai variant atau string sesuai dengan format yang ditentukan.

Catatan: sudut r yang saudara masukkan dalam ukuran derajat, untuk itu perlu dirubah terlebih dahulu sebelum dimasukkan dalam fungsi sin yang disediakan oleh VB. ()

Fungsi Date and Time pada VB

Time : mencari tahu waktu saat ini atau menetapkan waktu, tergantung format

pemakaiannya ( lihat contoh di bawah ini)
A$ = Time ‘hasil 18:16:35 AM

MyTime = #4:35:17 PM# ‘assign a time
Time = MyTime ‘set system time to MyTime
Now : merekam tanggal dan waktu sekarang
A$ = Now ‘hasil 10/8/02 18:16:35 AM

Timer : menghitung jumlah detik sejak tengah malam
Start = Timer ‘hasilnya 29991

Date : menetapkan hari pada sistem komputer
Dim MyDate
MyDate = #February 12, 1985 # ‘Assign a date
Date = MyDate ‘Change system date
DateAdd : menghasilkan Varian(Date) yang berisi tanggal baru setelah suatu interval waktu yang ditetapkan dari tanggal lama.
DateAdd(kode_interval,jumlah_interval,tanggal_lama)
Isi Kode Interval:

Contoh pemakaiannya :
Dim FirstDate As_Date ‘Declare variables
Dim IntervalType As String
Dim Number As Integer
Dim Msg
FirstDate = InputBox(“Enter a date”)
Bynber = InputBox(“Enter number of months to add”)
Msg = “New date : “ & DateAdd(“m”, Number, FirstDate)
MsgBox Msg

DateDiff : mencari interval waktu antara dua tanggal
DateDiff(interval, date1, date2[, firstdayofweek[, firstweekofyear]]) Dim TheDate As Date ‘declare variables
TheDate = InputBox(“Enter a date”) Msg = “Day from today : “ & DateDiff(“d”, Now, TheDate)
MsgBox Msg

DateSerial : menghasilkan tanggal dengan bulan/hari/tahun
MyDate = DateSerial(1969, 2, 12) ‘Hasil 2/12/69

DateValue : menghasilkan tanggal
MyDate = DateValue(“February 12, 1969”) ‘Hasil 2/12/69

Year : menghasilkan tahun sekarang
MyYear = Year(#2/12/1969#) ‘Hasil 1969

Month : menghasilkan bilangan integer yang menunjukkan bulan
MyDate = #February 12, 1969# ‘Assign a date
MyMonth = Month(MyDate) ‘MyMonth = 2

MonthName : menghasilkan teks yang menunjukkan nama bulan
a$ = MonthName(1, True) ‘a$ = Jan
b$ = MonthName(1, False) ‘b$ = January
c$ = MonthName(1) ‘c$ = January

Day : menghasilkan integer yang menunjukkan tanggal dari data date
MyDate = #February 12, 1969# ‘Assign a date
MyDay = Day(MyDate) ‘MyDay berisi 12

Hour : menghasilkan integer yang menunjukkan jam dari data timer
MyTime = #4:35:17 PM# ‘Assign a time
MyHour = Hour(MyTime) ‘MyHour berisi 16

Minute : menghasilkan integer yang menunjukkan menit dari data timer
MyTime = #4:35:17 PM# ‘Assign a time
MyMinute = Minute(MyTime) ‘MyMinute berisi 35

Second : menghasilkan integer yang menunjukkan detik dari data timer
MyTime = #4:35:17 PM# ‘Assign a time
MySecond = Second(MyTime) ‘MySecond berisi 17

TimeSerial : menghasilkan waktu dengan jam/menit/detik
MyTime = TimeSerial(16, 35, 17) ‘Isinya 4:35:17 PM

TimeValue : mengubah string waktu dari pukul 0:00:00 (12:00:00 AM) sampai 23:59:59 (11:59:59 PM) menjadi data waktu
MyTime = TimeValue(“4:35:17 PM”) ‘Isinya 4:35:17 PM
MyTime = TimeValue(“0:00:00”) ‘Isinya 12:00:00 AM

WeekDay : menghasilkan bilangan petunjuk hari dari suatu tanggal
Hari = #February 12, 1969# ‘Hari Rabu
MyweekDay = Weekday(Hari) ‘MyweekDay isinya 4

WeekDayName : menghasilkan teks nama hari dalam satu minggu

WeekDayName(weekday, abbreviate, firstdayofweek)
Hari = #2/12/1969# ‘Assign a date
MyWeekDay = Weekday(Hari) ‘MyWeekDay isinya 4
MyTime = WeekdayName(MyWeekDay) ‘Isinya Wednesday

Penjelasan program parramarray Pada Visual Basic Dan Macam Macam Fungsi Bawaan

Posted on 13 Desember 2012 by kendrozsisandong

function dengan return value

berupa array

I.Program parramarray

Penjelasan : memesan variabel hasil berjumlah 3 yaitu hasil(0),hasil(1),hasil(3)

Penjelasan:‘mendeklarasikan variabel i sebgai integer dan perualangan i sebanyak array yang di pesan (To UBound(args))

Penjelasan: jika i= 0 maka maka hasil(1) = args jumlah index ny demikian juga hasil(2),,

Penjelasan pada button 1 memesan variable statistik

Pada textbox 1 untuk menampilkan jumlah keseluruhan dari array yang telah di pesan d atas

Textbox2 untuk menampilkan nilai atau angka terkecil dari array tersebut

Textbox3 untuk menampilkan nilai atau angka terbesar dari array tersebut

1.bisa muncul angka 9 dari jumlah array yang terdapat pada coding yaitu ”fstat(1, 6, 2,)”

2.bisa muncul angka (6) yaitu bilangan terbesar dari array tersebut adalah 6

3. dan bisa muncul angka 1 yaitu dari bilangan terkecil dari array tersebut adalah 1

ketika program di jalankan dan menge-klik button 1 maka seperti berikut

Penjelasan program Overloading function

membuat fungsi dengan nama hitung dan bernilai integer,
di dlm fungsi tersebut terdapat parameter bil1,bil2 dengan tipe integer.
kemudian fungsi hitung tersebut di berikan nilai dengan perintah aritmatika
penjumlahan yaitu bil1 + bil2

cara kerja :
memberikan nilai pada fungsi hitung dengan perintah aritamika penjumlahan
antara bil1 + bil2

Fungsi-fungsi Bawaan VB

Fungsi-fungsi Numerik

a. Fungsi-fungsi konversi ke integer.

Ada tiga macam fungsi yang melakukan konversi ke tipe data integer yaitu seperti terlihat pada tabel .

Tabel 10.1 Fungsi-fungsi Konversi ke Integer

Untuk bilangan positif, fungsi Fix() dan Int() memberikan perlakuan yang sama. Sebagai contoh, kedua pernyataan berikut ini mengembalikan nilai yang sama:

Namun fungsi Fix() dan Int() memberikan perlakuan berbeda pada bilangan negatif. Kedua pernyataan berikut memberikan pengembalian yang berbeda :

Sedangkan fungsi CInt() mengembalikan pembulatan angka yang terdekat. Berikut ni contoh penggunaan CInt() :

a. Fungsi – fungsi konversi tipe data

Tabel 10.2 merupakan fungsi – fungsi yang melakukan konversi ke tipe data.

Tabel 10.2 Fungsi-fungsi Konversi ke Tipe Data

Sebagai contoh misalkan sebuah data yang merupakan hasil bagi (1 / 7) .

a. Fungsi-fungsi matematika

Fungsi-fungsi yang bekaitan dengan matematika seperti terlihat pada table 10.3.

Tabel 10.3 Fungsi-fungsi Matematika

Fungsi-fungsi String

Selain fungsi-fungsi numerik, Visual Basic juga mempunyai sejumlah fungsi-fungsi String diantaranya seperti pada table 10.4.

Tabel 10.4 Fungsi-fungsi String

Substring merupakan bagian dari suatu string. Untuk memperoleh substring dari suatu string dapat digunakan 3 fungsi berikut :

Left$(StringVal, length)

Fungsi ini mengembalikan nilai string dari sebelah kiri sebanyak length karakter .

Right$(StringVal, length)

Fungsi ini mengembalikan nilai string dari sebelah kanan sebanyak length karakter .

Mid$(StringVal, startVal, length)