Jawaban Quis Online

PublicClass Form1

PrivateSub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) HandlesMyBase.Load

Call buattabel()

With Kode

            Kode.Items.Add("MB1")

            Kode.Items.Add("MB2")

            Kode.Items.Add("MB3")

            Kode.Items.Add("MB4")

EndWith

With Tahun

            Tahun.Items.Add("2012")

            Tahun.Items.Add("2013")

            Tahun.Items.Add("2014")

EndWith

With Kondisi

            Kondisi.Items.Add("BARU")

            Kondisi.Items.Add("BEKAS")

EndWith

For i = 12 To 48

            LamaKredit.Items.Add(i)

Next

EndSub

Sub buattabel()

        LV.Columns.Add("Kode", 80, HorizontalAlignment.Center)

        LV.Columns.Add("Mobil", 80, HorizontalAlignment.Center)

        LV.Columns.Add("Tahun", 80, HorizontalAlignment.Center)

        LV.Columns.Add("Kondisi", 80, HorizontalAlignment.Center)

        LV.Columns.Add("Harga", 80, HorizontalAlignment.Center)

        LV.Columns.Add("Jumlah Beli", 80, HorizontalAlignment.Center)

        LV.Columns.Add("Lama Kredit", 80, HorizontalAlignment.Center)

        LV.Columns.Add("Total Harga", 80, HorizontalAlignment.Center)

        LV.View = View.Details

        LV.GridLines = True

        LV.FullRowSelect = True

EndSub

Sub isitabel()

Dim lst AsNew ListViewItem

        lst.Text = Kode.Text

        lst.SubItems.Add(Mobil.Text)

        lst.SubItems.Add(Tahun.Text)

        lst.SubItems.Add(Kondisi.Text)

        lst.SubItems.Add(Harga.Text)

        lst.SubItems.Add(JumlahBeli.Text)

        lst.SubItems.Add(LamaKredit.Text)

        lst.SubItems.Add(TotalHarga.Text)

        LV.Items.Add(lst)

EndSub

PrivateSub Kode_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Kode.SelectedIndexChanged

If Kode.Text = "MB1"Then

            Mobil.Text = "AVANZA"

ElseIf Kode.Text = "MB2"Then

            Mobil.Text = "HONDA JAZZ"

ElseIf Kode.Text = "MB3"Then

            Mobil.Text = "MERCHEDEZ"

ElseIf Kode.Text = "MB4"Then

            Mobil.Text = "YARIZ"

EndIf

EndSub

PrivateSub Kondisi_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Kondisi.SelectedIndexChanged

If Kode.Text = "MB1"Then

If Tahun.Text = 2012 Then

If Kondisi.Text = "BARU"Then

                    Harga.Text = 175000000

ElseIf Kondisi.Text = "BEKAS"Then

                    Harga.Text = 120000000

EndIf

ElseIf Tahun.Text = 2013 Then

If Kondisi.Text = "BARU"Then

                    Harga.Text = 195000000

ElseIf Kondisi.Text = "BEKAS"Then

                    Harga.Text = 150000000

EndIf

ElseIf Tahun.Text = "2014"Then

If Kondisi.Text = "BARU"Then

                    Harga.Text = 210000000

ElseIf Kondisi.Text = "BEKAS"Then

                    Harga.Text = 187000000

EndIf

EndIf

EndIf

If Kode.Text = "MB2"Then

If Tahun.Text = 2012 Then

If Kondisi.Text = "BARU"Then

                    Harga.Text = 167000000

ElseIf Kondisi.Text = "BEKAS"Then

                    Harga.Text = 145000000

EndIf

ElseIf Tahun.Text = 2013 Then

If Kondisi.Text = "BARU"Then

                    Harga.Text = 185000000

ElseIf Kondisi.Text = "BEKAS"Then

                    Harga.Text = 155000000

EndIf

ElseIf Tahun.Text = 2014 Then

If Kondisi.Text = "BARU"Then

                    Harga.Text = 278000000

ElseIf Kondisi.Text = "BEKAS"Then

                    Harga.Text = 210000000

EndIf

EndIf

EndIf

If Kode.Text = "MB3"Then

If Tahun.Text = 2012 Then

If Kondisi.Text = "BARU"Then

                    Harga.Text = 156000000

ElseIf Kondisi.Text = "BEKAS"Then

                    Harga.Text = 144000000

EndIf

ElseIf Tahun.Text = 2013 Then

If Kondisi.Text = "BARU"Then

                    Harga.Text = 198000000

ElseIf Kondisi.Text = "BEKAS"Then

                    Harga.Text = 177000000

EndIf

ElseIf Tahun.Text = 2014 Then

If Kondisi.Text = "BARU"Then

                    Harga.Text = 300000000

ElseIf Kondisi.Text = "BEKAS"Then

                    Harga.Text = 267000000

EndIf

EndIf

EndIf

If Kode.Text = "MB4"Then

If Tahun.Text = 2012 Then

If Kondisi.Text = "BARU"Then

                    Harga.Text = 170000000

ElseIf Kondisi.Text = "BEKAS"Then

                    Harga.Text = 156000000

EndIf

ElseIf Tahun.Text = 2013 Then

If Kondisi.Text = "BARU"Then

                    Harga.Text = 190000000

ElseIf Kondisi.Text = "BEKAS"Then

                    Harga.Text = 177000000

EndIf

ElseIf Tahun.Text = 2014 Then

If Kondisi.Text = "BARU"Then

                    Harga.Text = 320000000

ElseIf Kondisi.Text = "BEKAS"Then

                    Harga.Text = 298000000

EndIf

EndIf

EndIf

EndSub

PrivateSub Harga_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Harga.TextChanged

        JumlahBeli.Focus()

EndSub

PrivateSub LamaKredit_KeyPress(ByVal sender AsObject, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles LamaKredit.KeyPress

If Asc(e.KeyChar) = 13 Then

            TotalHarga.Text = Harga.Text * JumlahBeli.Text

EndIf

EndSub

PrivateSub BtnIsi_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnIsi.Click

Call isitabel()

EndSub

PrivateSub BtnKeluar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnKeluar.Click

Me.Close()

EndSub

PrivateSub BtnHapus_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnHapus.Click

If LV.SelectedItems.Count = 0 Then

            MsgBox("Maaf,Tidak Ada Items Yang Anda Pilih")

Else

            LV.Items.Remove(LV.SelectedItems(0))

EndIf

EndSub

PrivateSub TotalHarga_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TotalHarga.TextChanged

        UangMuka.Focus()

EndSub

PrivateSub BtnProses_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnProses.Click

        KomisiSales.Text = 0.02 * JumlahBeli.Text * UangMuka.Text

        TotalKredit.Text = TotalHarga.Text - UangMuka.Text

Angsuran.Text = TotalKredit.Text * 0.03 * LamaKredit.Text

EndSub

EndClass

10 kelebihan android dibandingkan sistem operasi mobile lainnya

Berbicara mengenai sistem operasi pada perangkat mobile maka bisa dibilang bahwa andoid saat ini adalah pemain utama dimana para pengguna smartphone dan ponsel pintar lainnya didominasi oleh perangkat yang menggunakan sistam operasi besutan google ini.

Nah, apa saja kelebihan sistem operasi android secara umum dibandingan dengan sistem lainnya semacam windows mobile phone atau iOS? Simak beberapa ulasannya dibawah ini.



Kostumisasi
Secanggih dan sehebat apapun gadget kamu, selama tampilannya itu-itu aja satu saat juga bakal bosen. Untungnya android ini adalah OS yang menyediakan banyak sekali kostumisasi. Dari Launcher, keyboard, SMS client dan berbagai fitur krusial lainnya semua siap disesuaikan sesuai selera kamu. Jadi jika kamu merasa bosan, tinggal kamu buka google play dan berikan sedikit sentuhan pada tampilan androidmu.

Lebih Banyak Game dan Aplikasi
Sudah ratusan lebih developer aplikasi android turut mengambil peran dalam perkembangan Android, khususnya dukungan dalam hal pilihan aplikasi di Google Play. Yah sekarang ini bisa dibilang mau nyari apa aja google play udah siap sedia.

Perkembangan dan Update yang cepat
Salah satu faktor kenapa Android banyak disukai adalah update yang cepat. Memperbaiki Bug, menambah fitur dan berbagai perkembangan lain google melakukannya dengan segera, sehingga penggunapun juga merasa sangat nyaman dengan ini.

Multiple Devices
Seperti yang udah kamu ketahui semua, OS produk google ini mengharuskan kamu meregister akun email yang menggunakan layanan dari Gmail. Jika kamu mempunyai banyak gadget Android, kamu gak perlu menggunakan banyak email untuk masing-masing gadgetmu tersebut. Jadi Android mengijinkan satu akun untuk banyak gadget, hal ini juga akan memudahkan kamu untuk mengontrol semua gadget-gadgetmu dalam satu handle.

Banyak Pilihan Harga
Berbicara mengenai gadget tentu gak akan terlepas dari harga gadget tersebut. Nah disinilah android juaranya, dengan banyaknya vendor yang menyediakan gadget untuk ini secara otomatis banyak pilihan buat kalian yang mau beli Android. Dari harga dibawah satu juta sampai diatas 5 juta semuanya ada. Jadi berarapun gadget kamu, selalu banyak pilihan untuk Android.

Launcher
Mungkin pada berbagai platform fitur ini lebih dikenal dengan tema, hampir mirip sih namun launcher android ini bisa merubah tampilan bukan hanya pada desainnya saja melainkan diberi kebebasan untuk merombak total semua yang mungkin dirubah. Banyak developer penyedia aplikasi untuk ini, salah satu yang paling terkenal adalah Go Launcher. Jadi dengan fitur ini androidmu tidak akan membosankan, bahkan beberapa launcher mampu mengadopsi tampilan dari platform lain seperi Windows Phone, BB ataupun iOS.

Custom Room
Untuk meningkatkan performa android, kita bisa menggunakan akses super user dengan cara mengeroot Androidmu. Banyak kelebihan yang didapat untuk ini seperti kebebasan untuk menginstall aplikasi bawaan android, Blocking ads, optimasi penggunaan hardware dll.

Live Wallpaper
Biasanya pengguna smartphone pengin sesuatu yang spesial untuk gadgetnya pada saat dalam posisi stand by atau lock screen. Dalam hal ini android memberikan jalan opsi yang sangat menarik yaitu memungkinkan kita untuk memasang live wallpaper atau wallpaper bergerak. Kamu bisa menemukan dengan mudah apapun live wallpaper yang kamu inginkan untuk kamu pasang pada gadgetmu dengan berbagai aplikasi di Google Play. Emm..tapi perlu hati-hati fitur ini sedikit menguras baterai.

Dukungan Widget
Widget pada android memiliki fungsi yang krusial, selain sebagai shortcut ketika akan menjalankan aplikasi. Juga bisa digunakan untuk secara langsung menjalankan fitur aplikasi tanpa perlu membuka aplikasinya terlebih dahulu. Nah ini menjadi salah satu daya tarik tersendiri bagi pengguna Android.

Terintegrasi Dengan Produk-Produk Google yang lain
Selain android, banyak produk-produk google yang lain. Jika kamu juga banyak menggunakan produk produk lain seperti Google Docs, Gmail, Google Drive, Google Calender, Google Maps, Google Music, Google+ ataupun Google Chrome kamu bisa mengitegrasikan semua kedalam androidmu, Kalau udah gitu kamu gak perlu repot-repot lagi mengecek update satu persatu karena semua itu dapat kamu integrasikan dalam satu akses dalam timelinemu

Google Now
Memberikan hal penting tiap hari namun tetap dalam kontrol kita adalah kelebihan dari Google Now ini. Melihat prakiraan cuaca, searching sesuatu di Internet dan kelebihan lain ditawarkan pada fitur ini membuat Google Now ini m salah satu hal penting yang sayang untuk dilewatkan.

Demikianlah beberapa poin poin penting kelebihan android dibandingkan dengan simtem operasi mobile lainnya semacam windows phone atau iOS. Bagaimana pendapat anda?

Android (sistem operasi)

 

Android adalah sistem operasi berbasis Linux yang dirancang untuk perangkat seluler layar sentuh seperti telepon pintar dan komputer tablet.^[13] Android awalnya dikembangkan oleh Android, Inc., dengan dukungan finansial dari Google, yang kemudian membelinya pada tahun 2005.^[14] Sistem operasi ini dirilis secara resmi pada tahun 2007, bersamaan dengan didirikannya Open Handset Alliance, konsorsium dari perusahaan-perusahaan perangkat keras, perangkat lunak, dan telekomunikasi yang bertujuan untuk memajukan standar terbuka perangkat seluler.^[15] Ponsel Android pertama mulai dijual pada bulan Oktober 2008.^[16]
Antarmuka pengguna Android didasarkan pada manipulasi langsung, menggunakan masukan sentuh yang serupa dengan tindakan di dunia nyata, seperti menggesek, mengetuk, mencubit, dan membalikkan cubitan untuk memanipulasi obyek di layar. Android adalah sistem operasi dengan sumber terbuka, dan Google merilis kodenya di bawah Lisensi Apache.^[13] Kode dengan sumber terbuka dan lisensi perizinan pada Android memungkinkan perangkat lunak untuk dimodifikasi secara bebas dan didistribusikan oleh para pembuat perangkat, operator nirkabel, dan pengembang aplikasi. Selain itu, Android memiliki sejumlah besar komunitas pengembang aplikasi (apps) yang memperluas fungsionalitas perangkat, umumnya ditulis dalam versi kustomisasi bahasa pemrograman Java.^[17] Pada bulan Oktober 2012, ada sekitar 700.000 aplikasi yang tersedia untuk Android, dan sekitar 25 juta aplikasi telah diunduh dari Google Play, toko aplikasi utama Android.^[18][19] Sebuah survey pada bulan April-Mei 2013 menemukan bahwa Android adalah platform paling populer bagi para pengembang, digunakan oleh 71% pengembang aplikasi seluler.^[20]
Faktor-faktor di atas telah memberikan kontribusi terhadap perkembangan Android, menjadikannya sebagai sistem operasi telepon pintar yang paling banyak digunakan di dunia,^[21] mengalahkan Symbian pada tahun 2010.^[22] Android juga menjadi pilihan bagi perusahaan teknologi yang menginginkan sistem operasi berbiaya rendah, bisa dikustomisasi, dan ringan untuk perangkat berteknologi tinggi tanpa harus mengembangkannya dari awal.^[23] Akibatnya, meskipun pada awalnya sistem operasi ini dirancang khusus untuk telepon pintar dan tablet, Android juga dikembangkan menjadi aplikasi tambahan di televisi, konsol permainan, kamera digital, dan perangkat elektronik lainnya. Sifat Android yang terbuka telah mendorong munculnya sejumlah besar komunitas pengembang aplikasi untuk menggunakan kode sumber terbuka sebagai dasar proyek pembuatan aplikasi, dengan menambahkan fitur-fitur baru bagi pengguna tingkat lanjut atau mengoperasikan Android pada perangkat yang secara resmi dirilis dengan menggunakan sistem operasi lain.^[24]
Pada November 2013, Android menguasai pangsa pasar telepon pintar global, yang dipimpin oleh produk-produk Samsung, dengan persentase 64% pada bulan Maret 2013.^[25] Pada Juli 2013, terdapat 11.868 perangkat Android berbeda dengan beragam versi.^[26] Keberhasilan sistem operasi ini juga menjadikannya sebagai target ligitasi paten "perang telepon pintar" antar perusahaan-perusahaan teknologi.^[27][28] Hingga bulan Mei 2013, total 900 juta perangkat Android telah diaktifkan di seluruh dunia, dan 48 miliar aplikasi telah dipasang dari Google Play.^[29][30] Pada tanggal 3 September 2013, 1 miliar perangkat Android telah diaktifkan.^[31]