Private Sub Command1_Click()
Data1.Recordset.Update
End Sub
Private Sub Command2_Click()
Data1.Recordset.AddNew
Text1.SetFocus
End Sub
Private Sub cmdbatal_Click()
txtnama.SetFocus
txtnama.Text = “”
txtnik.Text = “”
txtgol.Text = “”
txtkode.Text = “”
txtstatus.Text = “”
txttahun.Text = “”
txtjabatan.Text = “”
txtbagian.Text = “”
txtgapok.Text = “”
txttunjangan.Text = “”
txttotal.Text = “”
End Sub
Private Sub cmdkeluar_Click()
End
End Sub
Private Sub cmdlagi_Click()
txtnama.SetFocus
txtnama.Text = “”
txtnik.Text = “”
txtgol.Text = “”
txtkode.Text = “”
txtstatus.Text = “”
txttahun.Text = “”
txtjabatan.Text = “”
txtbagian.Text = “”
txtgapok.Text = “”
txttunjangan.Text = “”
txttotal.Text = “”
End Sub
Private Sub cmdproses_Click()
Select Case a = Mid(txtnik.Text, 5, 1)
Case a = “A”
txtgol = “A”
txtjabatan.Text = “MANAGER”
txtgapok.Text = “4000000″
txttunjangan.Text = “1025000″
Case a = “B”
txtgol.Text = “B”
txtjabatan.Text = “Ka.SEKSI”
txtgapok.Text = “3500000″
txttunjangan.Text = “975000″
Case a = “C”
txtgol.Text = “C”
txtjabatan.Text = “STAFF”
txtgapok.Text = “3000000″
txttunjangan.Text = “925000″
End Select
a = Right(txtnik.Text, 3)
If a = “KEU” Then
txtbagian.Text = “ACCOUNTING”
ElseIf a = “ADM” Then
txtbagian.Text = “ADMINISTRASI”
ElseIf a = “SDM” Then
txtbagian.Text = “GENERAL AFFAIR”
ElseIf a = “EDP” Then
txtbagian.Text = “IT UNIT”
ElseIf a = “SPM” Then
txtbagian.Text = “SECURITY”
End If
Select Case a = Mid(txtnik.Text, 7, 1)
Case a = “S”
kode = “S”
Status = “SINGEL”
Case a = “M”
kode = “M”
Status = “MENIKAH”
Case a = “J”
kode = “J”
Status = “JANDA”
Case a = “D”
kode = “D”
Status = “DUDA”
End Select
txtkode.Text = kode
txtstatus.Text = Status
txttahun.Text = Left(txtnik.Text, 4)
txttotal.Text = Val(txtgapok.Text) + Val(txttunjangan.Text)
End Sub
Private Sub Form_Activate()
txtnama.SetFocus
End Sub
Private Sub txtnama_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
txtnik.SetFocus
End If
End Sub
Private Sub txtkb_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
txtnb.SetFocus
End If
End Sub
2. Nama Buah :
Private Sub txtnb_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
txthb.SetFocus
End If
End Sub
3. Harga Buah :
Private Sub txthb_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
txtjb.SetFocus
End If
End Sub
4. Jumlah Beli :
Private Sub txtjb_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
txttb.Text = Val(txthb.Text) * (txtjb.Text)
End If
End Sub
5. Total Bayar :
Private Sub txttb_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
End If
End Sub
6. Lagi :
Private Sub cmdlagi_Click()
txtkb.SetFocus
txtkb = “”
txtnb = “”
txthb = “”
txtjb = “”
txttb = “”
End Sub
7. Batal :
Private Sub cmdbatal_Click()
txtkb.SetFocus
txtkb = “”
txtnb = “”
txthb = “”
txtjb = “”
txttb = “”
End Sub
8. Keluar :
Private Sub cmdkeluar_Click()
End
End Sub
1. NPM :
Private Sub txtnpm_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
txtnama.SetFocus
End If
End Sub
2. Nama Mahasiswa:
Private Sub txtnama_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
txtps.SetFocus
End If
End Sub
3. Program Studi :
Private Sub txtps_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
txtjurusan.SetFocus
End If
End Sub
4. Jurusan :
Private Sub txtjurusan_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
txtsemester.SetFocus
End If
End Sub
5. Semester :
Private Sub txtsemester_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
End If
End Sub
6. Lagi :
Private Sub cmdlagi_Click()
txtnpm.SetFocus
txtnpm = “”
txtnama = “”
txtps = “”
txtjurusan = “”
txtsemester = “”
End Sub
7. Batal :
Private Sub cmdbatal_Click()
txtnpm.SetFocus
txtnpm = “”
txtnama = “”
txtps = “”
txtjurusan = “”
txtsemester = “”
End Sub
8. Keluar :
Private Sub cmdkeluar_Click()
end
End Sub
Kemajuan teknologi informasi, khususnya pengembangan software seperti SPSS, menyebabkan pengolahan data statistik menjadi jauh lebih cepat dan mudah, tanpa mengurangi ketepatan hasil outputnya. Buku ini merupakan revisi dari buku SPSS versi 16. Untuk memudahkan pemahaman materi, pada setiap topik disertai contoh kasus; mulai dari cara memasukkan data suatu kasus statistik ke dalam SPSS, bagaimana cara SPSS mengolahnya dengan prosedur statistik tertentu, kemudian cara menafsir hasil output SPSS. Selain itu, agar dapat dipahami dengan sistematis, materi dibagi menjadi tiga bagian besar: * Bagian 1: menjelaskan persiapan data statistik sebelum diproses dengan SPSS. – Pengembangan ilmu statistik di era informasi – Cara memasukkan data secara benar dan efisien ke dalam SPSS – Editing data yang sudah terinput – Transformasi data pada kondisi tertentu * Bagian 2: menjelaskan penggunaan SPSS untuk mengolah data dengan berbagai prosedur statistik. – Pembuatan berbagai grafik statistik – Memberi variasi pada sebuah grafik – Desain tabel statistik, termasuk Multiple Response Tables. – Statistik Deskriptif, Box-Plot, Steam and Leaf dan uji Distribusi Normal – Uji t untuk dan ANOVA (Uji F) – Penggunaan Crosstab dan uji Chi-Square – Korelasi Bivariat dan Parsial, termasuk korelasi Pearson, Spearman, dan lainnya – Regresi Sederhana dan Berganda, termasuk berbagai uji seperti analisis residual, uji autokorelasi dan lainnya, serta berbagai metode pembuatan model regresi – Statistik Non-parametrik, seperti uji Binomial, Runs, Kruskal Wallis, Friedman, Wilcoxon, Kolmogorov-Smirnov, dan lainnya * Bagian 3: bersifat pelengkap dua bagian di atas, yang menjelaskan tip dan trik praktis dalam menggunakan SPSS. – Otomatisasi program SPSS dengan Syntax dan Production facility – Pembuatan tabel-tabel statistik dengan SPSS – Transfer data dan ekspor output SPSS ke Microsoft Word dan Excel – Kiat memilih metode statistik – Menjelajah situs http://www.spss.com Bonus CD diberikan dalam buku ini berisi file data dan output yang dibahas pada buku, juga memuat informasi situs-situs tentang statistik di dunia maya, kumpulan algoritma berbagai prosedur statistik, serta puluhan tip dan trik penggunaan SPSS (seperti restrukturisasi data, merger file, membuat tabel-tabel statistik, dan sebagainya)
Pengertian Basis Data
Basis dapat diartikan sebagai markas atau gudang, tempat bersarang/berkumpul.
Data adalah representasi fakta dunia nyata yang mewakili suatu objek seperti manusia (pegawai, siswa, pembeli, pelanggan), barang, hewan, peristiwa, konsep, keadaan dan sebagainya yang direkam dalam bentuk angka, huruf, simbol, teks, gambar, bunyi, atau kombinasinya.
Beberapadefinisi basis data :
1. Himpunan kelompok data (arsip) yang saling berhubungan yang diorganisasikan sedemikian rupa agar kelak dapat dimanfaatkan kembali dengan cepat dan mudah.
2. Kumpulan data yang saling berhubungan yang disimpan secara bersama sedemikian rupa dan tanpa pengulangan (redudansi) yang tidak perlu, untuk memenuhi berbagai kebutuhan
3. Kumpulan file/tabel/arsip yang saling berhubungan yang disimpan dalam media penyimpanan elektronik.
Basis Data adalah sekumpulan data yang saling berhubungan satu dengan yang lainnya yang diorganisasikan berdasarkan sebuah skema atau struktur tertentu, tersimpan di hardware komputer dan dengan software untuk melakukan manipulasi untuk kegunaan tertentu.
Sistem operasi (bahasa Inggris: operating system ; OS) adalah seperangkat program yang mengelola sumber daya perangkat keras komputer, dan menyediakan layanan umum untuk aplikasi perangkat lunak. Sistem operasi adalah jenis yang paling penting dari perangkat lunak sistem dalam sistem komputer. Tanpa sistem operasi, pengguna tidak dapat menjalankan program aplikasi pada komputer mereka, kecuali program aplikasi booting.
Sistem operasi mempunyai penjadwalan yang sistematis mencakup perhitungan penggunaan memori, pemrosesan data, penyimpanan data, dan sumber daya lainnya.
Untuk fungsi-fungsi perangkat keras seperti sebagai masukan dan keluaran dan alokasi memori, sistem operasi bertindak sebagai perantara antara program aplikasi dan perangkat keras komputer,[1][2] meskipun kode aplikasi biasanya dieksekusi langsung oleh perangkat keras dan seringkali akan menghubungi OS atau terputus oleh itu. Sistem operasi yang ditemukan pada hampir semua perangkat yang berisi komputer-dari ponsel dan konsol permainan video untuk superkomputer dan server web.
20 Tips suksesnya adalah sebagai berikut: