QBASIC BIODATA SEDERHANA

  Q-BASIC BIODATA SEDERHANA

 Bahasa BASIC (Beginner's All-purpose Symbolic Instruction Code) adalah sebuah bahasa pemrograman tingkat tinggi yang dirancang untuk mempermudah pemula dalam belajar pemrograman komputer. Bahasa ini dikembangkan pada tahun 1960-an oleh John Kemeny dan Thomas Kurtz di Dartmouth College.

    Awalnya, bahasa BASIC dirancang untuk digunakan dalam lingkungan pendidikan, sehingga bahasa ini memiliki sintaks yang sederhana dan mudah dipahami oleh pemula. Selain itu, bahasa BASIC juga terkenal karena mudah dikembangkan, dan banyak digunakan dalam pengembangan aplikasi bisnis dan industri.

    Saat ini, bahasa BASIC sudah berkembang menjadi berbagai macam varian, termasuk Microsoft Visual Basic, FreeBASIC, dan PureBasic. Bahasa ini juga masih digunakan dalam beberapa aplikasi tertentu, meskipun telah digantikan oleh bahasa pemrograman lain yang lebih modern dan canggih.

    Kali ini saya akan membagikan Sebuah code yang digunakan untuk membuat Biodata Sederhana Dengan sedikit Tambahan Source Code yang sudah saya rakit secara mandiri. Berikut adalah Source Code nya

TAMPILAN SAAT RUNNING CODE:

TAMPILAN SAAT INPUT:

SOURCE CODE:

Dim pil As Integer

1 Cls Print "====== Menu Biodata ======" Print "1. Masukan Biodata" Print "2. Lihat Biodata" Print "3. Keluar" Print "==================" Input "Masukan Pilihan [1-3] : ", pil Select Case pil Case 1 Cls Print , , "BIODATA" Print "==================================================" Input "NAMA :"; NM$ Input "NPM :"; NPM$ Input "TANGGAL LAHIR:"; TGL$ Input "TEMPAT LAHIR :"; TTL$ Input "ALAMAT :"; ALMT$ Input "PRODI :"; PRD$ Input "JENIS KELAMIN:"; GNDR$ Input "MOTTO HIDUP :"; MTTO$ Input "<>", temp GoSub 1 Case 2 Cls Print "NAMA :"; NM$ Print "NPM :"; NPM$ Print "TANGGAL LAHIR:"; TGL$ Print "TEMPAT LAHIR :"; TTL$ Print "ALAMAT :"; ALMT$ Print "PRODI :"; PRD$ Print "JENIS KELAMIN:"; GNDR$ Print "MOTTO HIDUP :"; MTTO$ Input "<>", temp GoSub 1 Case 3 GoSub 2 Case Else Cls Input "pilihan Salah, Tekan enter", temp GoSub 1 End Select 2 Cls Print "Terimakasih Yang sudah mengisi" Close (1)

Program diatas adalah program yang bertujuan untuk mengisi biodata dengan menu agar tampilan nya tidak statis. Program tersebut juga bisa diiisi berkali kali dan jika kita ingin melihat hasil biodata juga bisa Di menu lihat Biodata. Sekian dari saya terimakasih mungkin saja artikel ini bisa bergguna bagi mahasiswa semester 1. #ProgramBiodataQBASIC