Visual Basic.Net

1. Microsoft Visual Basic .NET adalah sebuah alat untuk mengembangkan dan membangun aplikasi yang bergerak di atas sistem .NET Framework, dengan menggunakan bahasa BASIC. Dengan menggunakan alat ini, para programmer dapat membangun aplikasi 1. Windows Forms, Aplikasi web berbasis ASP.NET, dan juga aplikasi command-line. Alat ini dapat diperoleh secara terpisah dari beberapa produk lainnya (seperti Microsoft Visual C++, Visual C#, atau Visual J#), atau juga dapat diperoleh secara terpadu dalam Microsoft Visual Studio .NET. Bahasa Visual Basic .NET sendiri menganut paradigma bahasa pemrograman berorientasi objek yang dapat dilihat sebagai evolusi dari Microsoft Visual Basic versi sebelumnya yang diimplementasikan di atas .NET Framework. Peluncurannya mengundang kontroversi, mengingat banyak sekali perubahan yang dilakukan oleh Microsoft, dan versi baru ini tidak kompatibel dengan vsi terdahulu.
versi

2. Terdapat tiga buah versi Visual Basic yang dirilis hingga bulan Agustus 2007, yakni:
a.Visual Basic .NET 2002 (VB 7.0)

Versi pertama dari Visual Basic .NET adalah Visual Basic .NET 2002 yang dirilis pertama kali pada bulan Februari 2002. Visual Basic .NET 2002 merupakan sebuah bahasa pemrograman visual yang berbasis bahasa BASIC (sama seperti halnya Visual Basic 6.0, tetapi lebih disempurnakan dan lebih berorientasi objek), dan didesain untuk berjalan di atas Microsoft .NET Framework versi 1.0.

b.Versi 7.0 ini dirilis bersamaan dengan Visual C# dan ASP.NET. Bahasa C#, yang dianggap sebagai jawaban terhadap Java, mendapatkan perhatian yang lebih banyak dibandingkan dengan VB.NET yang kurang begitu banyak diulas. Hasilnya, sedikit orang di luar komunitas Visual Basic yang memperhatikan VB.NET. Versi pertama ini kurang mendapat sambutan yang bagus dari para programmer, dan pada saat itu, program berbasis Visual Basic 6.0 sedang marak-maraknya dibuat. Para programmer yang mencoba Visual Basic .NET untuk pertama kali akan merasakan bahwa Visual Basic .NET sangatlah berbeda dibandingkan dengan Visual Basic sebelumnya. Contoh yang paling mudah adalah runtime engine yang lebih besar 10 kali lipat dibandingkan Visual Basic 6.0, dan juga meningkatkan beban di memori.
Visual Basic .NET 2003 (VB 7.1)

c.Selanjutnya, pada bulan Maret 2003, Microsoft pun merilis lagi versi yang lebih baru dari Visual Basic .NET, Visual Basic .NET 2003. Versi ini berisi beberapa perbaikan dibandingkan dengan versi sebelumnya, dan aplikasi yang dibuatnya dapat berjalan di atas .NET Framework versi 1.1. Fitur yang ditambahkan adalah dukungan terhadap .NET Compact Framework dan mesin wizard upgrade VB6 ke VB.NET yang telah ditingkatkan. Peningkatan yang lainnya adalah peningkatan pada performa dan keandalan dari Integrated Development Environment (IDE) Visual Basic itu sendiri, dan juga runtime engine.
Visual Basic .NET 2003 tersedia dalam beberapa jenis cita rasa: Professional, Enterprise Architect dan Academic Edition. Khusus untuk Visual Basic .NET 2003 Academic Edition, versi tersebut didistribusikan secara gratis untuk beberapa sekolah di dalam setiap Visual Basic 2005 (VB 8.0)

3. Setelah itu, Microsoft pun berkonsentrasi dalam mengembangkan Microsoft .NET Framework 2.0, dan tentunya alat bantu untuk membangun program di atasnya. Hingga pada tahun 2005, mereka pun merilis versi terbaru dari Visual Basic .NET, yang kali ini disebut dengan Visual Basic 2005 (dengan membuang kata “.NET”), bersama-sama dengan beberapa aplikasi pengembangan lainnya.

4. Untuk rilis 2005 ini, Microsoft menambahkan beberapa fitur baru, di antaranya adalah:

Edit and Continue
Fitur ini sebelumnya terdapat di dalam Visual Basic, akan tetapi dihapus di dalam Visual Basic .NET. Dengan keberadaan fitur ini, para programmer dapat memodifikasi kode pada saat program dieksekusi dan melanjutkan proses eksekusi dengan kode yang telah dimodifikasi tersebut.
Evaluasi ekspresi pada saat waktu desain
Munculnya Pseudo-Namespace “My“, yang menyediakan:
Akses yang mudah terhadap beberapa area tertentu dari dalam .NET Framework yang tanpanya membutuhkan kode yang sangat signifikan.
Kelas-kelas yang dibuat secara dinamis (khususnya My.Forms).
Peningkatan yang dilakukan terhadap konverter kode sumber dari Visual Basic ke Visual Basic .NET.
Penggunaan kata kunci (keyword) Using, yang menyederhanakan penggunaan objek-objek yang membutuhkan pola Dispose untuk membebaskan sumber daya yang sudah tidak terpakai.
Just My Code, yang menyembunyikan kode reusable yang ditulis oleh alat bantu Integrated Development Environment (IDE) Visual Studio .NET.
Pengikatan sumber data (Data Source binding), yang mampu mempermudah pengembangan aplikasi basis data berbasis klien/server.

5.Fungsi-fungsi yang tersebut di atas (khususnya My) ditujukan untuk memfokuskan Visual Basic .NET sebagai sebuah platform pengembangan aplikasi secara cepat dan “menjauhkannya” dari bahasa C#.

Bahasa Visual Basic 2005 memperkenalkan fitur-fitur baru, yakni:

Bawaan .NET Framework 2.0:
Generics
Partial class, sebuah metode yang dapat digunakan untuk mendefinisikan beberapa bagian dari sebuah kelas di dalam sebuah berkas, lalu menambahkan definisinya di lain waktu; sangat berguna khususnya ketika mengintegrasikan kode pengguna dengan kode yang dibuat secara otomatis.
Nullable Type
Komentar XML yang dapat diproses dengan menggunakan beberapa alat bantu seperti NDoc untuk membuat dokumentasi secara otomatis.
Operator overloading
Dukungan terhadap tipe data bilangan bulat tak bertanda (unsigned integer) yang umumnya digunakan di dalam bahasa lainnya.

Visual Basic 9.0 (Visual Basic 2008)

Versi ini merupakan versi terbaru yang dirilis oleh Microsoft pada tanggal 19 November 2007, bersamaan dengan dirilisnya Microsoft Visual C# 2008, Microsoft Visual C++ 2008, dan Microsoft .NET Framework 3.5.

Dalam versi ini, Microsoft menambahkan banyak fitur baru, termasuk di antaranya adalah:

Operator If sekarang merupakan operator ternary (membutuhkan tiga operand), dengan sintaksis If (boolean, nilai, nilai). Ini dimaksudkan untuk mengganti fungsi IIF.
Dukungan anonymous types
Dukungan terhadap Language Integrated Query (LINQ)
Dukungan terhadap ekspresi Lambda
Dukungan terhadap literal XML
Dukungan terhadap inferensi tipe data.
dukungan terhadap ‘LINQ’

Hubungan dengan Visual Basic klasik

Apakah Visual Basic .NET dianggap sebagai sebuah versi Visual Basic atau benar-benar bahasa yang berbeda merupakan sebuah topik perdebatan yang hangat. Hal ini dikarenakan sintaksis bahasa Visual Basic .NET tidak mengalami perubahan yang sangat drastis, dan hanya menambahkan beberapa dukungan fitur baru seperti penanganan eksepsi secara terstruktur dan ekspresi yang bisa di-short-circuit-kan. Dua perubahan tipe data pun terjadi saat berpindah ke Visual Basic .NET. Dibandingkan dengan Visual Basic 6.0, tipe data Integer yang dimiliki oleh Visual Basic .NET memiliki panjang dua kali lebih panjang, dari 16 bit menjadi 32 bit. Selain itu, tipe data Long juga sama-sama berubah menjadi dua kali lipat lebih panjang, dari 32 bit menjadi 64 bit. Bilangan bulat 16-bit dalam Visual Basic .NET dinamakan dengan Short. Lagi pula, desainer GUI Windows Forms yang terdapat di dalam Visual Studio .NET atau Visual Basic .NET memiliki gaya yang sangat mirip dengan editor form Visual Basic klasik.

Jika sintaksis tidak banyak yang berubah, lain halnya dengan semantik, yang berubah secara signifikan. Visual Basic .NET merupakan sebuah bahasa pemrograman yang mendukung fitur “Bahasa Pemrograman Berorientasi Objek” secara penuh, karena memang didukung oleh arsitektur Microsoft .NET Framework, yang mengandung kombinasi dari Common Language Runtime dan Base Class Library. Visual Basic klasik, hanya merupakan sebuah bahasa pemrogaman berbasis objek, yang berjalan di atas arsitektur Component Object Model (COM).

Perubahan ini telah mengubah banyak asumsi tentang hal yang benar yang harus dilakukan dengan mempertimbangkan performa dan kemudahan untuk dipelihara. Beberapa fungsi dan pustaka perangkat lunak, yang ada di dalam Visual Basic klasik, kini tidak terdapat di dalam Visual Basic .NET; mungkin masih banyak yang masih terdapat di dalam Visual Basic .NET, tapi tidak seefisien apa yang ditawarkan oleh .NET Framework. Bahkan jika program Visual Basic klasik bisa dikompilasi dengan benar, sebagian besar program Visual Basic klasik harus melalui beberapa proses refactoring untuk mengadopsi fitur bahasa baru secara keseluruhan. Dokumentasi untuk ini pun tersedia di situs Microsoft[1].

Read more »

Kegiatan ku

ngomongin tentang kegiatan , bingung juga sih harus nge buat apa????(sambil berpikir)
tapi baik lah di coba saja.
langsung saja lah ya, kegiatan nya saya itu:
1.Kuliah
ya ngomongin kuliah ni ya, hampir setiap hari saya datang ke kempus untuk kuliah, ya biasa lah untuk belajar.

2. Membaca
hmmm.... merasa gimana aaa gitu ya membaca menjadi kegiatan, kalau kata anak-anak sekarang "acem betul aja".hehehe,,, tapi jangan berpikir negatif ya,abis bingung sih mau naro apa. Tapi ya emang aku senang memebaca sih,apalagi dengan buku-buku motivasi, novel, dan lain-lain lah(hmmm... tapi tergantumg buku nya juga sih)
:)
3. Belajar
agak kesel juga si kalo uda yang nama nya belajar(hehehehe), tapi ya memang ini lah yang saya lakuin setiap hari,khusus nya di kampus saya STMIK BUDI DARMA.

4.Mengerjakan tugas rumah
tugas rumah, ngomongin tugas rumah , memang ini salah satu kegiatan saya yang wajib. Kalo mau di sebutin apa-apa saja kegiatan rumah saya,, yagch??? banyak sich(sambil berpikir)coba buat menghitungnya. Hmmm....(sombong), hehehe, (cuma becanda) ya contohnya:mencuci piring, nyapu dll,

5.Dan lain-lain
syukurlah uda masuk yang ke5 berarti tugas ini sudah hampir selesai.Dan lain-lain,pasti berpikir mana ada tugas yang lain-lain ya??? ya ia sih,kenapa yang lain-lain??? karena ini mungkin suatu kegiatan yang gak harus seperi kegiatan yang lainnya, misalnya
_menonton tv,
ini ni kegiatan yang paling saya senangin(peace!) ya hampir setiap hari saya menonton tv, kenapa hampir??? sebenarnya setiap hari tapi karena dikurangi sama mati lampu,dll jdi hampir setiap hari dech(becanda pak).
_mendengarkan music
ini setiap hari saya lakuin,mau mengerjakan tugas rumah pun saya sambil dengerin
music lewat HP.biasa lah sambil menghibur hati
:)

uda dech sampai di sini saja lah saya menceritakan kegiatan saya ini,sebenarnya bukan untuk sok pamer atau sok kerajinan.Tapi sebagai salah satu tugas yang diberikan oleh dosen saya, ya semoga ja nilai dari tugas saya ini memuaskan .
amin.....
:)

Read more »

AnaKmu BuKan MiLiKmu

Anakmu bukan milikmu
Putri sang hidup yang rindu pada diri sendiri
Lewat engkau mereka lahir
Tapi bukan karena engkau
Berikan mereka kasih sayangmu
Tapi jangan sodorkan bentuk pikiranmu
Sebab pada mereka ada alam pemikiran tersendiri
Kau boleh berusaha menyerupai mereka
Tapi jangan membuat mereka menyerupaimu
Sebab KEHIDUPAN tidak pernah berjalan mundur
Pun tenggelam di masa lampau
Kaulah busur dan anakmu lah panah yang meluncur
Sang pemanah mahatau sasaran bidikan keabadian
Meliuklah dengan sukacita dalam rentangan sang pemanah
Sabab DIA mengasihi anak panah yang meluncur laksana kilat
Sebagaimana di kasihi-Nya pula busur yang mantap.


Kalau saja setiap orang tua mengerti akan makna puisi "anakmu bukan milikmu"
karya KHALIL GIBRAN diatas pasti tidak akan ada lagi orang tua-orang tua yang memaksakan kehendaknya terhadap anak nya atau pun pasti tidak akan ada lagi orang tua yang memaksa anaknya untuk menjadi seperti yang mereka ingin. Ya sebab kehidupan tidak akan pernah berjalan mundur.
Anak mu bukan Milikmu,, ya, mungkin kata yang sederhana dan pasti setiap orang tua pernah mendengarnya tapi bukan hal yang sederhana untuk bisa mengerti akan makna di balik kata-kata sederhana itu...
Semoga kita bisa belajar dari puisi karya KHALILI GIBRAN tersebut. Dan bagi yang belum jadi orang tua gak da salah nya untuk bisa belajar dari puisi tersebut.Kenapa?????
ya karna tanpa di pungkiri suatu saat nanti pasti kalian ingin donk menjadi orang tua.
Seperti saya (hehehehe) :)

Read more »

input data dosen dan mahasiswa

uses crt;

type Dosen = record

kode : byte

nama : string;

pen : string ;

kea : string ;

end;



Mahasiswa = record

NPM : string [8] ;

NAMA : string [25] ;

jen,jur : string [15] ;

thn : string ;

end ;

var

rdos : array [1..20] of dosen;

rmah : array [1..15] of mahasiswa ;

i,j : byte ;

pil,lg : char ;



procedure inputdosen ;

procedure formdosen ;

begin

clrscr ;

gotoxy (13,3) ; write (‘INPUT DATA DOSEN’);

gotoxy (5,4) ; write (‘_________________________’) ;

gotoxy (5,6) ; write (‘kode dosen:’) ;

gotoxy (5,7) ; write (‘nama :’) ;

gotoxy (5,8) ; write (‘pendidikan :’) ;

gotoxy (5,9) ; write (‘keahlian :’) ;

gotoxy (5,10) ; write (‘_________________________’);

gotoxy (5,11) ; write (‘isikan datalagi [Y/T]:’);

end ;

begin

repeat

formdosen ;

with rdos [i]do

begin

gotoxy (21,6) ; readln (kode) ;

gotoxy (21,7) ; readln (nama) ;

gotoxy (21,8) ; readln (pen) ;

gotoxy (21,9) ; readln (kea) ;

gotoxy (28,12); readln(lg) ;

inc(i) ;

end ;

Until Upcase (lg)=’T’;

end ;

procedure inputmahasiswa ;

procedure formmahasiswa ;

begin

clrscr ;

gotoxy (13,3) ; write (‘INPUT DATAMAHASISWA’) ;

gotoxy (5,4) ; write (‘_________________________’) ;

gotoxy (5,5) ; write (‘NPM :’) ;

gotoxy (5,6) ; write (‘NAMA :’) ;

gotoxy (5,7) ; write (‘JENJANG :’) ;

gotoxy (5,8) ; write (‘JURUSAN :’) ;

gotoxy (5,9) ; write (‘TAHUN :’) ;

gotoxy (5,10) ; write (‘________________________’) ;

gotoxy (5,11) ; write (‘isikan datalagi [Y/T]:’);

end ;

begin

repeat

formmahasiswa ;

with rmah [i] do

begin

gotoxy (21,6) ; readln (NPM) ;

gotoxy (21,7) ; readln (NAMA) ;

gotoxy (21,8) ; readln (JEN) ;

gotoxy (21,9) ; readln (JUR) ;

gotoxy (21,10) ; readln (THN) ;

gotoxy (28,12) ; readln (lg) ;

inc(i) ;

end ;

until upcase (lg) = ‘T’;

end;

procedure outputdosen ;

procedure tabeldosen ;

begin

clrscr;

gotoxy (10,4); write (‘INPUT DATA DOSEN’) ;

gotoxy (4,5) ; write (‘_____________________________________’);

gotoxy (4,6) ; write (‘ No Kode Nama Pendidikan Keahlian’);

gotoxy(4,7);write(‘_______________________________________’);

end;

procedure HitNilai(totn : real ; var NH: char ; Ket: string) ;

begin

end ;

begin

Tabeldosen ;

for j:=1 to I-1 do

begin

with Rdos [j] do

begin

gotoxy (5,7+j) ; write (j:1,’ ‘,kode:8,’ ‘,NAMA) ;

GOTOXY (30,7+J) ; WRITE (PEN) ;

GOTOXY (43,7+J) ;WRITE (KEA) ;

end ;

end;

gotoxy(3,9+j);write(‘__________________________________________’);

repeat until keypressed ;

end;

procedure outputmahasiswa ;

procedure tabelmahasiswa ;

begin

clrscr ;

gotoxy (10,4) ; write (‘INPUT DATA MAHASISWA’) ;

GOTOXY(3,5) ;write(‘____________________________________’);

gotoxy (3,6) ; write(‘no npm nama jenjang jurusan tahun nilai’);

gotoxy(3,7) ;write(‘______________________________________’);

end ;

procedure hitnilai (totn : real; var NH: char; ket: string) ;

begin

end;

begin

tabelmahasiswa ;

for j :=1 to I-1 do

begin

with rmah [j] do

begin

gotoxy (3,5+j) ; write (j:1,’ ‘,npm:8,’ ‘,nama) ;

gotoxy (43,7+j); write (jen) ;

gotoxy (51,7+j); write (jur) ;

gotoxy (58,7+j); write (thn) ;

end;

end;

gotoxy(3,9+j);write(‘__________________________________________’);

repeat until keypressed ;

end;

procedure menu ;

begin

clrscr;

gotoxy (20,2) ;write (‘MENU UTAMA’) ;

GOTOXY(10,3);WRITE(‘_________________________________’);

gotoxy (10,4) ;write (‘[1]. input data mahasiswa’) ;

gotoxy (10,5) ;write (‘[2]. input data dosen’);

gotoxy (10,6) ;write (‘[3]. output datadosen’);

gotoxy (10,7) ;write (‘[4]. outout datamahasiswa’);

gotoxy (10,8) ;write (‘[5]. keluar program’) ;

gotoxy (10,9) ;write (‘__________________________________’) ;

gotoxy (10,10);write (‘pilihan :’);

end ;

begin {program utama}

i:=1; pil:=’1′ ;

while pil <>’5′ do

begin

menu ;

pil := readkey ;

case pil of

’1′ : InputMahasiswa ;

’2′ : InputDosen ;

’3′ : OutputDosen ;

’4′ : OutputMahasiswa ;

end ;

end ;

end.

Read more »

Gaji Pegawai

uses crt;
var

kdj : byte;

nama : string[25];

NIK : string[8];

gaji : longint;

tjn,tjnk : real;

ttl : real;

lg : char;

stat : string;

begin
repeat
clrscr;

gotoxy(10,1); write(‘kode jabatan :’); readln(kdj);

gotoxy(10,2); write(‘nama :’); readln(nama);

gotoxy(10,3); write(‘NIK :’); readln(NIK);

gotoxy(10,4); write(‘status :’); readln(stat);

gotoxy(10,5); write(‘———————————-’);

gotoxy(10,6); write(‘input lagi[Y/T] :’); readln(lg);

until upcase(lg)=’T’;
if kdj=1 then
begin
gaji:=2500000;
tjn :=0.35*gaji;
end
else if kdj=2 then
begin
gaji:=2000000;
tjn :=0.10*gaji;
end
else if kdj=3 then
begin
gaji:=1500000;
tjn :=0.05*gaji;
end;
begin
if stat=’menikah’ then tjnk:=0.15*gaji;
end;

ttl:= gaji+tjn+tjnk;

gotoxy(15,9); writeln (‘kode :’,kdj);

gotoxy(15,10); writeln (‘nama :’,nama);

gotoxy(15,11); writeln (‘NIK :’,NIK);

gotoxy(15,12); writeln (‘status :’,stat);

gotoxy(15,13); writeln (‘gaji :Rp.’,gaji);

gotoxy(15,14);writeln(‘tunjangan :’,tjn:1:0);

gotoxy(15,15);writeln(‘tunjangan keluarga :’,tjnk:1:0);

gotoxy(15,16);writeln(‘total gaji :Rp.’,ttl:3:0);

readln;
end.

Read more »

Pelajaran Ku

Sekarang saya udah semester 2,saya paling senang dengan pelajaran agama,kenapa????(boleh di terka-terka sendiri kok :)),,sebentar lagi saya mau naik semester3, seperti teman-teman yang lain saya berharap semoga ja,pelajaran nanti dapat saya ikuti,.
Pelajaran yang saya ikuti sekarang pasti gak jauh beda sama kampus-kampus lain,, di sini juga saya belajar agama,bahasa Indonesia,bahasa Inggris sama ma waktu SMA dulu,,(hem... jadi ingat masa-masa SMA dulu)
ya semoga saja pelajaran-pelajaran saya saat dan nanti dapat saya ikuti dengan baik.
amin!

Read more »

Keinginan Ku

Keinginan Ku??????? masa ia sich harus di paparkan di sini??? Tapi nama nya tugas ya harus lah!!!!
Keinginku???? keinginan ku sich sebenar nya biasa za,, tapi banyak juga sich,, nama nya manusia biasa,, mau ini,mau itu,, semua nya mau.Ya uda langsung aja lah aq ingin dalam study ku bisa ngikuti semua mata kuliah nya dengan baik, dapat nilai yang baik, bisa jadi orang yg lebih baik juga dari hari hari kemarin.Ada satu hal yang pingin aq dapati kembali yang pernah hilang dari ku???(tap jangan di tanya apa ya!!)
Aku juga ingin bisa nge dapati apa yang aku mau, tapi hal penting yang aku ingin, aku ingin aq sehat selalu,, orang- orang yang aku sayang juga semoga mereka sehat selalu..
Karena hal penting dan yang paling mahal di dunia ini adalah"kesehatan"
Ia kan??????

Read more »

kehidupan ku

Kehidupan ku sama ja,,dgn org lain,berkutat dengan hal-hal dan rutinitas sehari-hari.
Dibilang speesial,, gak da yg spesialll, di bilang biasa, mungkin lah,, pa lagi kalo ada tugas wowwwwww,,,
Terkadang kalo ada hal yang nge buat hati gak senang, di tambah masalah,, pngin rasa nya teriak dan bilang semua rasa yg nge buat jengkel.
Setiap hari aku sama ma mahasiswa lain, pergi ke kampus,, ketemu ma tmn,, belajar,kalo ada tugas ngerasa gimana,, pa lagi kalo ujian,,, tapi kayak kata nya"bondan" ya sudah lah,, pa pun yg terjadi hari ini dan pa pun yang aku rasakan sekarang aku yakin itu memang hal yang hrs dpt dan itu pasti hal yg terindah.
Semoga saja!!!!

Read more »

tugas pemrograman terstruktur

USES CRT ;
VAR PIL : BYTE;
PROCEDURE INPUT ;
BEGIN
WRITELN('BAGIAN INPUT');
END;
PROCEDURE OUTPUT;
BEGIN
WRITELN('BAGIAN OUTPUT');
END;
BEGIN
CLRSCR;
PIL :=3;
REPEAT ;
WRITELN('MENU');
WRITELN('1 INPUT DATA');
WRITELN('2 OUTPUT DATA');
WRITELN('KEMENU');
WRITELN('PILIH');
READLN(PIL);
CASE PIL OF
1: INPUT;
2: OUTPUT;
END;
READLN;
UNTIL (PIL =3)
END.



KODE :ARRAY[1..10] OF STRING[3] ;
JUMLAH :ARRAY[1..10] OF BYTE ;
HARGA :LONGINT ;
NAMA :STRING[20] ;
TOTAL :LONGINT ;
I :BYTE ;
BEGIN
FOR I :=1 TO 10 DO
BEGIN
TEXTCOLOR (5 ) : TEXETBACKGROUND (16 );
CLRSCR ;
GOTOXY(30,5); WRITE('KODE :');READLN(KODE[I]) ;
GOTOXY(30,6); WRITE('JUMLAH :');READLN(JUMLAH[I]);
END ;
CLRSCR;
GOTOXY(10,3); WRITE('-------------------------------------------------------------');
GOTOXY(10,4); WRITE('NO, KODE, NAMA, HARGA, JUMLAH, TOTAL');
GOTOXY(10,5); WRITE('-------------------------------------------------------------');
END;
FOR I :=1 TO 10 DO
BEGIN
IF KODE[I]='001' THEN
NAMA:='TV';HARGA:=’1000000’ ;
END
ELSE IF KODE[I]='002' THEN
NAMA:='DVD'; HARGA:=’650000’ ;
END ;
BEGIN
GOTOXY(10,5+I); WRITE(I=2,KODE[I]);
GOTOXY(10,5+I); WRITE(NAMA);
GOTOXY(10,5+I); WRITE(HARGA:9, JUMLAH[I]:3);
TOTAL:=HARGA*JUMLAH[I] ;
GOTOXY(45,5+I); WRITE(TOTAL:8);
END;
GOTOXY(10,6+I); WRITE('---------------------------------------');
READLN ;
END.

Read more »

bahasa pemograma

Artikel Tentang Bahasa Pemrograman Web
1. Bahasa Pemrograman HTML
HyperText Markup Language (HTML) adalah sebuah bahasa markup yang digunakan untuk membuat sebuah halaman web dan menampilkan berbagai informasi di dalam sebuah browser Internet.
HTML saat ini merupakan standar Internet yang didefinisikan dan dikendalikan penggunaannya oleh World Wide Web Consortium (W3C).
HTML berupa kode-kode tag yang menginstruksikan browser untuk menghasilkan tampilan sesuai dengan yang diinginkan.
Sebuah file yang merupakan file HTML dapat dibuka dengan menggunakan browser web seperti Mozilla Firefox atau Microsoft Internet Explorer.
2. Bahasa Pemrograman PHP
PHP adalah bahasa pemrograman script yang paling banyak dipakai saat ini.
PHP pertama kali dibuat oleh Rasmus Lerdorf pada tahun 1995. Pada waktu itu PHP masih bernama FI (Form Interpreted), yang wujudnya berupa sekumpulan script yang digunakan untuk mengolah data form dari web.
PHP banyak dipakai untuk membuat situs web yang dinamis, walaupun tidak tertutup kemungkinan digunakan untuk pemakaian lain.
PHP biasanya berjalan pada sistem operasi linux (PHP juga bisa dijalankan dengan hosting windows).
3. Bahasa Pemrograman ASP
ASP adalah singkatan dari Active Server Pages yang merupakan salah satu bahasa pemograman web untuk menciptakan halaman web yang dinamis.
ASP merupakan salah satu produk teknologi yang disediakan oleh Microsoft.
ASP bekerja pada web server dan merupakan server side scripting.
4. Bahasa Pemrograman XML
Extensible Markup Language (XML) adalah bahasa markup serbaguna yang direkomendasikan W3C untuk mendeskripsikan berbagai macam data.
XML menggunakan markup tags seperti halnya HTML namun penggunaannya tidak terbatas pada tampilan halaman web saja.
XML merupakan suatu metode dalam membuat penanda/markup pada sebuah dokumen.

5. Bahasa Pemrograman WML
WML adalah kepanjangan dari Wireless Markup Language, yaitu bahasa pemrograman yang digunakan dalam aplikasi berbasis XML (eXtensible Markup Langauge).
WML ini adalah bahasa pemrograman yang digunakan dalam aplikasi wireless.
WML merupakan analogi dari HTML yang berjalan pada protocol nirkabel.

Read more »