CHAPTER 1 BASIS DATA

Data Base Management System (DBMS) terdiri dari:sekumpulan data yang saling berhubungan dan  suatu himpunan program yang melakukan akses terhadap data tersebut 
Tujuan DBMS yang paling utama adalah: 
memelihara informasi  
informasi tersedia pada saat yang dibutuhkan
Data yang disimpan perlu diatur dalam Manajemen DataOleh karena itu perlu dipelajari: 
struktur informasi dan 
mekanisme dalam melakukan manipulasi terhadap informasi 
Komponen Basis  Data 
-DATA, data tersimpan secara terintegrasi dan dipakai secara bersama-sama
-HARDWARE, perangkat keras yang digunakan dalam mengelola sistem database-SOFTWARE, perangkat lunak perantara antara pemakai dengan data fisik. perangkat lunak dapat berupa data base management system dan berbagai program aplikasi-USER, sebagai pemakai sistem

DataCiri-ciri data didalam database : 
*Data disimpan secara terintegrasi (integrated) 
-Database merupakan kumpulan dari berbagai macam file dari aplikasi-aplikasi yang berbeda, yang disusun dengan cara menghilangkan bagian-bagian yang rangkap (redundant) 
*Data dapat dipakai secara bersama-sama (shared) 
-Masing-masing bagian dari database dapat diakses oleh pemakai dalam waktu yang bersamaan, untuk aplikasi yang berbeda



Hardware

*Terdiri dari semua peralatan perangkat keras komputer yang digunakan untuk pengelolaan sistem database berupa:

-Peralatan untuk penyimpanan database, yaitu secondary storage (harddisk, disket, flash disk, CD)
-Peralatan input (keyboard, scanner, kamera digital) dan output (printer, layar monitor) 
-Peralatan komunikasi data (ethernet card, modem) 


 Software


*Berfungsi sebagai perantara (interface) antara pemakai dengan data physik pada database. 
*Software pada sistem database dapat berupa: 
-Database Management System (DBMS), yang menangani akses terhadap database, sehingga pemakai tidak perlu memikirkan proses penyimpanan dan pengelolaan data secara detail 
-Program-program aplikasi dan prosedur-prosedur
 User 
*Pemakai database dibagi atas 3 klasifikasi, yaitu: 
1.Database Administrator (DBA), yaitu:- Orang/team yang bertugas mengelola sistem database secara keseluruhan 
2.Programmer, yaitu:-Orang/team yang bertugas membuat program aplikasi yang mengakses database, dengan menggunakan bahasa pemrograman, seperti Clipper, VB, Oracle baik secara batch maupun online untuk berinteraksi dengan komputer 
3.End-user, yaitu:-Orang yang mengakses database melalui terminal, dengan menggunakan query-language atau program aplikasi yang dibuatkan oleh programmer 
Aplikasi Basis Data  
Database Applications: 
-Banking: all transactions 
-Airlines: reservations, schedules 
-Universities:  registration, grades 
-Sales: customers, products, purchases 
-Online retailers: order tracking, customized recommendations 
-Manufacturing: production, inventory, orders, supply chain-Human resources:  employee records, salaries, tax deductions




  • Digg
  • Del.icio.us
  • StumbleUpon
  • Reddit
  • RSS

TUGAS PEMBANTU UTS

TUGAS PEMBANTU UTS
1.       Buatlah program kalkulator dengan operasi yang ada : penambahan, pengurangan, pembagian dan perkalian.
2.       Buat program untuk menghitung luas kubus, persegi panjang dan lingkaran dengan inputan panjang, lebar dan jari-jari, serta tampilkan hasilnya
3.       Buat program menginputkan identitas diri (Nim, Nama, Alamat, No.Telepon ) dan tampilkan pada form yang berbeda.
4.       Sebuah biro perjalanan menetapkan kelas, tujuan, harga dasar tiket dan batas minimal untuk setiap rombongan tour dengan ketentuan :
Jika jumlah peserta kurang dari batas minimal, maka rombongan itu harus membayar sejumlah batas minimal yang ditentukan dan Jika lebih, kelebihannya diberi diskon sebesar 25%
Kelas
Tujuan
Harga Tiket/orang
Batas Minimal
BIASA
JAKARTA
Rp 10000
50 orang

YOGYAKARTA
Rp 25000
40 orang

BALI
Rp 50000
30 orang
LUAR BIASA
JAKARTA
Rp 15000
40 orang

YOGYAKARTA
Rp 35000
50 orang

BALI
Rp 70000
60 orang
Contoh perhitungan :
Kelas                     :   biasa
Tujuan                  :   Jakarta
Banyak peserta     :           60 orang (lebih 10 dari batas minimal)
Bayar                     : (60*10000)-(10*0.25*10000)
5.       Buat program transaksi barang dengan ketentuan berikut :
Kode Barang
Nama Barang
Harga
101
Buku tulis Big Boss
1500
102
Pulpen Pilot
2050
103
Pensil Mekanik
4750
104
Tipe-X
2500
105
Penghapus steadler
3550
106
penggaris
1750

Cara kerja program :
-          Klik button input, muncul input box isikan jumlah item barang yang dibeli (max 6)
-          Setelah itu muncul input box untuk menanyakan kode barang dan kuantitas barang yang dibeli
-          Proses input otomatis muncul didisplay (listbox)
-          Ketika diklik button total bayar akan muncul jumlah uang yang harus dibayar pembeli.


  • Digg
  • Del.icio.us
  • StumbleUpon
  • Reddit
  • RSS

CHAPTER 1 KONSEP DASAR BASIS ATA

Data and Information

Bagaimana data dan information berhubungan?
  ØKomputer memproses data menjadi
           informasi
                 Step 1.  The member data, including a photograph, is entered and stored on the hard disk.
                  Step 2.  The computer extracts the member data from disk

.Apakah yang dimaksud dengan database?
Kumpulan data yang sudah di organisasikan sehingga dapat di aksesdi ambil kembali dan digunakan

Database software mengijinkan anda untuk :
-Create database
-Add, change, and delete data
-Sort and retrieve data
-Create forms and reports

Database software biasa disebut database management system (DBMS)

Apakah yang dimaksud dengan data integrity?
ØTingkatan dimana data adalah benar

§Garbage in, garbage out (GIGO)prahse komputer yang berarti anda tidak dapat membuat informasi yang benar dari data yang salah


  • Digg
  • Del.icio.us
  • StumbleUpon
  • Reddit
  • RSS

SYNTAX VB kode barang

5. kode barang

Syntax :
Private Sub Command1_Click()
Label4.Visible = True
Label3.Visible = True
Combo1.Visible = True
Text3.Visible = True
Command2.Visible = True
List1.Visible = True
End Sub

Private Sub Command2_Click()
List1.Clear
List1.AddItem "Kode Barang = " & Combo1.Text
List1.AddItem "Kuantitas       = " & Text3.Text
If Combo1.Text = "101" Then
j = 1500 * Text3.Text
List1.AddItem "                      ______+"
List1.AddItem "Total              = " & j
End If
If Combo1.Text = "102" Then
j = 2050 * Text3.Text
List1.AddItem "                      ______+"
List1.AddItem "Total              = " & j
End If
If Combo1.Text = "103" Then
j = 4750 * Text3.Text
List1.AddItem "                      ______+"
List1.AddItem "Total              = " & j
End If
If Combo1.Text = "104" Then
j = 2500 * Text3.Text
List1.AddItem "                      ______+"
List1.AddItem "Total              = " & j
End If
If Combo1.Text = "105" Then
j = 3550 * Text3.Text
List1.AddItem "                      ______+"
List1.AddItem "Total              = " & j
End If
If Combo1.Text = "106" Then
j = 1750 * Text3.Text
List1.AddItem "                      ______+"
List1.AddItem "Total              = " & j
End If
End Sub

Private Sub Form_Load()
Label4.Visible = False
Label3.Visible = False
Combo1.Visible = False
Text3.Visible = False
Command2.Visible = False
List1.Visible = False
Combo1.AddItem "101"
Combo1.AddItem "102"
Combo1.AddItem "103"
Combo1.AddItem "104"
Combo1.AddItem "105"
Combo1.AddItem "106"
End Sub

Private Sub Text3_KeyPress(KeyAscii As Integer)
If KeyAscii >= 48 And KeyAscii <= 57 Or KeyAscii = vbKeyDelete Or KeyAscii = vbKeyBack Then
Else
    KeyAscii = 0
End If
End Sub

Ashita setyoning rinanti 1012503189

  • Digg
  • Del.icio.us
  • StumbleUpon
  • Reddit
  • RSS

SYNTAX VB inputan

Syntax :
Private Sub Cmdexit_Click()
    End
End Sub

Private Sub Cmdtampil_Click()
    Dim ket As String
    ket = "NIM : " + Txtnim.Text + Chr(13)
    ket = ket + "Nama : " + Txtnama.Text + Chr(13)
    ket = ket + "Alamat : " + Txtalamat.Text + Chr(13)
    ket = ket + "No.Telp : " + Txttelp.Text
    MsgBox ket, , "Identitas Diri"
End Sub


Ashita setyoning rinanti 1012503189

  • Digg
  • Del.icio.us
  • StumbleUpon
  • Reddit
  • RSS

SYNTAX VB membuat Luas barang

2. Luas

Syntax :
Private Sub Command1_Click()
Text4.Text = Val(Text3.Text) ^ 3
Text5.Text = Val(Text1.Text) * Val(Text2.Text)
Text6.Text = 3.14 * (Val(Text3.Text) ^ 2)
End Sub

Ashita setyoning rinanti 1012503189

  • Digg
  • Del.icio.us
  • StumbleUpon
  • Reddit
  • RSS

SYNTAX VB membuat kalkulator

1. kalkulator

Syntax :

Private Sub Command1_Click()
Text3.Text = Val(Text1.Text) + Val(Text2.Text)
End Sub

Private Sub Command2_Click()
Text3.Text = Val(Text1.Text) - Val(Text2.Text)
End Sub

Private Sub Command3_Click()
Text3.Text = Val(Text1.Text) / Val(Text2.Text)
End Sub

Private Sub Command4_Click()
Text3.Text = Val(Text1.Text) * Val(Text2.Text)
End Sub

Private Sub Command5_Click()
Text1.Text = ""
Text2.Text = ""
Text3.Text = ""
Text1.SetFocus
End Sub


Private Sub Command6_Click()
End
Unload Me
End Sub

Ashita setyoning rinanti 1012503189

  • Digg
  • Del.icio.us
  • StumbleUpon
  • Reddit
  • RSS