Maandag 13 Januarie 2014

JavaScript Bahasa Pemrograman

Sebuah bahasa pemrograman klasik JavaScript untuk iPad, iPhone dan iPod touch. Bahasa pemrograman adalah alat yang sempurna untuk belajar, perhitungan matematika yang kompleks, hiburan dan banyak tugas lain yang bermanfaat. Aplikasi ini sangat berguna untuk belajar bahasa pemrograman JavaScript. Anda harus membeli kompilasi dalam aplikasi. Koneksi Internet diperlukan. - Alat pemrograman besar di AppStore. - bahasa pemrograman Anda untuk iOS menakjubkan * FITUR * - Kompilasi dan jalankan program Anda. - input teks sebelum menjalankan program dan output teks. - Peningkatan editor kode sumber dengan sintaks highlight, nomor baris, auto lekukan, pencarian dan mengganti, membatalkan sejarah, tema warna dan keyboard tambahan. -. referensi bahasa online dan beberapa contoh program yang * PEMBATASAN * - Koneksi internet diperlukan untuk mengkompilasi dan menjalankan program. - Graphics, jaringan, sistem file dan masukan real-time tidak didukung. - waktu berjalan maksimum dari sebuah program adalah 15 detik. - Tombol panah pada keyboard bluetooth tidak bekerja. -. Gunakan Copy ketika keyboard tersembunyi dan Paste ketika itu terlihat Cari " PHP Programming Language "pada AppStore juga. Terima kasih untuk menggunakan aplikasi!==================================== JavaScript adalah prototipe berbasis bahasa scripting yang bersifat dinamis, lemah mengetik dan memiliki fungsi kelas-pertama. Ini adalah bahasa multi-paradigma, mendukung, penting, dan gaya pemrograman fungsional object-oriented. JavaScript diformalkan dalam standar bahasa ECMAScript dan terutama digunakan dalam bentuk JavaScript sisi klien, diimplementasikan sebagai bagian dari browser Web dalam rangka untuk menyediakan antarmuka pengguna yang ditingkatkan dan website dinamis.Hal ini memungkinkan akses program ke objek komputasi dalam lingkungan host. menggunakan JavaScript dalam aplikasi di luar halaman Web - misalnya dalam dokumen PDF, browser situs-spesifik, dan widget desktop - juga signifikan. Baru dan lebih cepat JavaScript VMS dan kerangka kerja yang dibangun di atas mereka (terutama Node.js) juga telah meningkatkan popularitas JavaScript untuk aplikasi web server-side. JavaScript menggunakan sintaks dipengaruhi oleh yang salinan C. JavaScript banyak nama dan konvensi penamaan dari Jawa, namun dua bahasa yang tidak berhubungan dan memiliki semantik yang sangat berbeda. Prinsip-prinsip desain dalam JavaScript diambil dari Diri dan Skema pemrograman bahasa. JavaScript pada awalnya dikembangkan oleh Brendan Eich dari Netscape di bawah nama Mocha, yang kemudian diganti namanya menjadi LiveScript, dan akhirnya ke JavaScript terutama karena lebih banyak dipengaruhi oleh Java bahasa pemrograman. LiveScript adalah nama resmi untuk bahasa ketika pertama kali dikirim dalam rilis beta dari Netscape Navigator 2.0 pada bulan September 1995, tetapi diubah namanya JavaScript dalam pengumuman bersama dengan Sun Microsystems pada tanggal 4 Desember 1995, ketika itu ditempatkan di browser versi Netscape 2.0B3. Perubahan nama dari LiveScript untuk JavaScript kira-kira bertepatan dengan Netscape menambahkan dukungan untuk teknologi Java di nya web browser Netscape Navigator.Pilihan terakhir dari nama menyebabkan kebingungan, memberikan kesan bahwa bahasa adalah spin-off dari bahasa pemrograman Java, dan pilihan telah ditandai oleh banyak orang sebagai taktik pemasaran oleh Netscape untuk memberikan JavaScript di cap apa yang kemudian panas bahasa pemrograman web baru. Hal ini juga telah mengklaim bahwa nama bahasa adalah hasil dari kesepakatan pemasaran bersama antara Netscape dan Sun, dalam pertukaran untuk Netscape bundling Sun Java runtime dengan browser dominan nya. Pada bulan November 1996, Netscape mengumumkan bahwa mereka telah mengajukan JavaScript untuk ECMA International untuk dipertimbangkan sebagai standar industri, dan bekerja selanjutnya menghasilkan versi standar bernama ECMAScript.

Sondag 12 Januarie 2014

PHP Bahasa Pemrograman

Sebuah bahasa pemrograman PHP klasik untuk iPad, iPhone dan iPod touch. Bahasa pemrograman adalah alat yang sempurna untuk belajar, perhitungan matematika yang kompleks, hiburan dan banyak tugas lain yang bermanfaat.Aplikasi ini sangat berguna untuk belajar bahasa pemrograman PHP. Anda harus membeli kompilasi dalam aplikasi.Koneksi Internet diperlukan. - Alat pemrograman besar di AppStore. - bahasa pemrograman Anda untuk iOS menakjubkan * FITUR * - Kompilasi dan jalankan program Anda. - input teks sebelum menjalankan program dan output teks. - Peningkatan editor kode sumber dengan sintaks highlight, nomor baris, auto lekukan, pencarian dan mengganti, membatalkan sejarah, tema warna dan keyboard tambahan. - Impor dan ekspor program dengan iTunes atau melalui email. -. referensi bahasa online dan beberapa contoh program yang * PEMBATASAN * - Koneksi internet diperlukan untuk mengkompilasi dan menjalankan program. - Graphics, jaringan, sistem file dan masukan real-time tidak didukung. - waktu berjalan maksimum dari sebuah program adalah 15 detik. - Tombol panah pada keyboard bluetooth tidak bekerja. - Gunakan Copy ketika keyboard tersembunyi dan Paste ketika itu terlihat. Carilah "JavaScript Programming Language" pada AppStore juga. Terima kasih untuk menggunakan aplikasi!==================================== PHP adalah server-tujuan umum sisi bahasa scripting awalnya dirancang untuk pengembangan web untuk menghasilkan halaman Web dinamis. Ini adalah salah satu dari yang pertama maju bahasa scripting server-side untuk dimasukkan ke dalam dokumen sumber HTML, daripada memanggil file eksternal untuk memproses data. Pada akhirnya, kode ditafsirkan oleh server Web dengan modul prosesor PHP yang menghasilkan halaman web yang dihasilkan. Hal ini juga telah berkembang untuk menyertakan kemampuan antarmuka baris perintah dan dapat digunakan dalam aplikasi grafis mandiri. PHP dapat digunakan pada kebanyakan server Web dan juga sebagai shell mandiri pada hampir setiap sistem operasi dan platform gratis.Sebuah pesaing Microsoft Active Server Pages (ASP) script mesin server-side dan bahasa yang sama, PHP yang terinstal pada lebih dari 20 juta situs web dan 1 juta server web. PHP awalnya diciptakan oleh Rasmus Lerdorf pada tahun 1995. Pelaksanaan utama PHP sekarang diproduksi oleh Grup PHP dan berfungsi sebagai acuan formal untuk bahasa PHP. PHP adalah perangkat lunak bebas yang dirilis di bawah Lisensi PHP, yang tidak sesuai dengan GNU General Public License (GPL) karena pembatasan pada penggunaan jangka PHP. Sementara PHP awalnya berdiri untuk "Personal Home Page", sekarang dikatakan berdiri untuk "PHP: Hypertext Preprocessor"., singkatan rekursifpengembangan PHP dimulai pada tahun 1994 ketika Denmark / Greenland / Canadian programmer Rasmus Lerdorf awalnya dibuat satu set script Perl yang ia sebut "Personal Home Page Tools" untuk mempertahankan homepage pribadinya. Script melakukan tugas-tugas seperti menampilkan resume dan merekam lalu lintas web-page-nya.Lerdorf awalnya mengumumkan rilis PHP pada Usenet kelompok diskusi comp.infosystems.www.authoring.cgi pada tanggal 8 Juni 1995. Ia menulis ulang skrip ini sebagai bahasa pemrograman C Common Gateway Interface (CGI) binari, memperluas mereka untuk menambahkan kemampuan untuk bekerja dengan bentuk web dan untuk berkomunikasi dengan database dan implementasi ini disebut "Personal Home Page / Forms Interpreter" atau PHP / FI. PHP / FI dapat digunakan untuk membangun sederhana, aplikasi Web dinamis. Lerdorf dirilis PHP / FI sebagai "Personal Home Page Tools (PHP Tools) versi 1.0" publik pada tanggal 8 Juni 1995, untuk mempercepat lokasi bug dan memperbaiki kode. Rilis ini sudah memiliki fungsi dasar yang PHP hari ini. Ini termasuk variabel Perl-seperti, bentuk penanganan, dan kemampuan untuk menanamkan HTML. Sintaks ini mirip dengan Perl tetapi lebih terbatas dan sederhana, meskipun kurang konsisten. Sebuah tim pengembangan mulai terbentuk dan, setelah berbulan-bulan bekerja dan pengujian beta, resmi dirilis PHP / FI 2 pada November 1997.

C + + Programming Language

Sebuah bahasa pemrograman C + + klasik untuk iPad, iPhone dan iPod touch. Bahasa pemrograman adalah alat yang sempurna untuk belajar, perhitungan matematika yang kompleks, hiburan dan banyak tugas lain yang bermanfaat. Aplikasi ini sangat berguna untuk belajar bahasa ะก + + programming. - Anda harus membeli kompilasi dalam aplikasi. - Koneksi internet diperlukan. * KRITIK * - Alat pemrograman besar di AppStore. - bahasa pemrograman Anda untuk iOS menakjubkan ! * FITUR * - Kompilasi dan jalankan program Anda. - input teks sebelum menjalankan program dan teks output. - Peningkatan editor kode sumber dengan sintaks highlight, nomor baris, auto lekukan, pencarian dan mengganti, membatalkan sejarah, tema warna dan keyboard tambahan. - Impor dan ekspor program dengan iTunes atau melalui email. -. referensi bahasa online dan beberapa contoh program yang * PEMBATASAN * - Koneksi internet diperlukan untuk mengkompilasi dan menjalankan program. - Graphics, jaringan, sistem file dan masukan real-time tidak didukung. - waktu berjalan maksimum dari sebuah program adalah 15 detik. - Tombol panah pada keyboard bluetooth tidak bekerja. - Gunakan Copy ketika keyboard tersembunyi dan Paste ketika itu terlihat. Carilah "C Programming Language" pada AppStore juga. Terima kasih untuk menggunakan aplikasi! ==================================== C + + (diucapkan "cee plus plus" ) adalah statis diketik, bebas-form, multi-paradigma, dikompilasi, bahasa pemrograman untuk tujuan umum.Hal ini dianggap sebagai bahasa tingkat menengah, karena terdiri dari kombinasi keduanya tingkat tinggi dan fitur bahasa tingkat rendah. Ini dikembangkan oleh Bjarne Stroustrup mulai tahun 1979 di Bell Labs sebagai tambahan untuk bahasa C. Awalnya bernama C with Classes, bahasa ini berganti nama C + + pada tahun 1983. C + + adalah salah satu bahasa pemrograman yang paling populer dengan domain aplikasi termasuk sistem perangkat lunak, perangkat lunak aplikasi, driver perangkat, perangkat lunak tertanam, server kinerja tinggi dan aplikasi-aplikasi client, dan perangkat lunak hiburan seperti video game. Beberapa kelompok menyediakan perangkat lunak C + + compiler bebas dan eksklusif, termasuk GNU Project, Microsoft, Intel dan Embarcadero Technologies. C + + telah sangat mempengaruhi banyak bahasa pemrograman populer lainnya, terutama C # dan Java. C + + juga digunakan untuk desain hardware, di mana desain awalnya dijelaskan dalam C + +, kemudian dianalisis, arsitektur dibatasi, dan dijadwalkan untuk membuat deskripsi hardware tingkat daftar transfer bahasa melalui sintesis tingkat tinggi.Bjarne Stroustrup mulai bekerja pada "C with Classes" pada tahun 1979. Gagasan untuk menciptakan sebuah bahasa baru berasal dari pengalaman Stroustrup dalam pemrograman untuk gelar Ph.D. tesis. Stroustrup menemukan bahwa Simula memiliki fitur yang sangat membantu untuk pengembangan perangkat lunak besar, tetapi bahasa itu terlalu lambat untuk penggunaan praktis, sementara BCPL cepat tetapi tingkat rendah juga akan cocok untuk pengembangan perangkat lunak besar. Ketika Stroustrup mulai bekerja di Bell Labs, ia memiliki masalah menganalisis kernel UNIX sehubungan dengan komputasi terdistribusi. Mengingat Ph.D. pengalaman, Stroustrup berangkat untuk meningkatkan bahasa C dengan fitur Simula-seperti. C dipilih karena itu adalah tujuan umum, cepat, portabel dan banyak digunakan. Pelaksanaan komersial pertama dari C + + dirilis pada tanggal 14 Oktober 1985. Pada tahun 1983, nama bahasa diubah dari C dengan Kelas C + + (+ + menjadi operator increment di C).Pada tahun 1985, edisi pertama dari The C + + Programming Language dirilis, menyediakan referensi penting untuk bahasa, karena belum ada standar resmi. Lepaskan 2.0 dari C + + datang pada tahun 1989 dan edisi kedua diperbarui dari The C + + Programming Language dirilis pada tahun 1991. Fitur baru termasuk multiple inheritance, kelas abstrak, fungsi anggota statis, fungsi anggota const, dan anggota dilindungi. Pada tahun 1990, The Annotated C + + Reference Manual diterbitkan. Karya ini menjadi dasar untuk standar masa depan.



Java Programming Language

Sebuah bahasa pemrograman Java klasik untuk iPad, iPhone dan iPod touch. Bahasa pemrograman adalah alat yang sempurna untuk belajar, perhitungan matematika yang kompleks, hiburan dan banyak tugas lain yang bermanfaat.Aplikasi ini sangat berguna untuk belajar bahasa pemrograman Java. - Anda harus membeli kompilasi dalam aplikasi. - Koneksi internet diperlukan. * KRITIK * - Alat pemrograman besar di AppStore. - bahasa pemrograman Anda untuk iOS menakjubkan! * FITUR * - Kompilasi dan jalankan program Anda. - input teks sebelum menjalankan program dan output teks. - Peningkatan editor kode sumber dengan sintaks highlight, nomor baris, auto lekukan, pencarian dan mengganti, membatalkan sejarah, tema warna dan keyboard tambahan. - Impor dan program ekspor dengan iTunes atau melalui email. - referensi bahasa online dan beberapa contoh program tersebut. * PEMBATASAN * - Koneksi internet diperlukan untuk mengkompilasi dan menjalankan program. - Graphics, jaringan, sistem file dan masukan real-time tidak didukung. - Maksimum waktu berjalan dari sebuah program adalah 15 detik. - Tombol panah pada keyboard bluetooth tidak bekerja. - Gunakan Copy ketika keyboard tersembunyi dan Paste ketika itu terlihat. - Gunakan beberapa kelas pada satu file sumber, bukan file terpisah. Terima kasih untuk menggunakan aplikasi ! ==================================== Java adalah bahasa pemrograman yang awalnya dikembangkan oleh James Gosling di Sun Microsystems (yang sejak bergabung menjadi Oracle Corporation) dan dirilis pada tahun 1995 sebagai komponen inti dari Sun Microsystems 'platform Java. Bahasa berasal banyak sintaks dari C dan C + + namun memiliki model objek sederhana dan fasilitas tingkat rendah lebih sedikit. Aplikasi Java biasanya dikompilasi untuk bytecode (file kelas) yang dapat berjalan pada Java Virtual Machine (JVM) terlepas dari arsitektur komputer. Java adalah tujuan umum, konkuren, berbasis kelas, bahasa berorientasi objek yang khusus dirancang untuk memiliki beberapa dependensi implementasi mungkin. Hal ini dimaksudkan untuk membiarkan pengembang aplikasi "tulis sekali, jalankan di mana saja", yang berarti bahwa kode yang berjalan pada satu platform tidak perlu dikompilasi ulang untuk berjalan di lain. Java saat ini salah satu bahasa pemrograman yang paling populer digunakan, terutama untuk aplikasi web client-server, dengan melaporkan 10 juta pengguna.Kompiler asli dan referensi implementasi Java, mesin virtual, dan perpustakaan kelas yang dikembangkan oleh Sun dari 1995. Pada Mei 2007, sesuai dengan spesifikasi Java Community Process, Sun mengganti lisensi sebagian besar dari teknologi Java di bawah GNU General Public License. Selain itu juga telah mengembangkan implementasi alternatif teknologi Sun ini, seperti GNU Compiler untuk Java dan GNU Classpath. James Gosling, Mike Sheridan, dan Patrick Naughton memulai proyek bahasa Jawa pada bulan Juni 1991. Java pada awalnya dirancang untuk televisi interaktif, tapi itu terlalu maju bagi industri televisi kabel digital pada saat itu. Bahasa ini awalnya disebut Oak setelah pohon ek yang berdiri di luar kantor Gosling, ia pergi dengan nama Hijau kemudian, dan kemudian berganti nama Jawa, dari kopi Jawa, dikatakan dikonsumsi dalam jumlah besar oleh pencipta bahasa itu. Gosling bertujuan untuk mengimplementasikan mesin virtual dan bahasa yang memiliki familiar C / C + + gaya notasi. Sun Microsystems merilis implementasi publik pertama sebagai Java 1.0 pada tahun 1995. Ini menjanjikan "Write Setelah, Run Anywhere" (WORA), memberikan tanpa biaya-run-kali pada platform populer. Cukup aman dan menampilkan keamanan dikonfigurasi, ini memungkinkan pembatasan jaringan dan akses file. Web browser utama segera dimasukkan kemampuan untuk menjalankan applet Java dalam halaman web, dan Jawa dengan cepat menjadi populer. Pada tahun 2006, untuk tujuan pemasaran, Sun berganti nama menjadi versi J2 baru sebagai Java EE, Java ME, dan Java SE, masing-masing.

Sondag 08 Desember 2013

quiss no 1

Penggunaan LISTVIEW






Public Class Form1

   
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        RancangTabel()
        K_barang.Items.Add("TS001")
        K_barang.Items.Add("TS002")
        K_barang.Items.Add("VG001")
        K_barang.Items.Add("VG002")
        N_pembelian.Focus()
    End Sub
    Sub RancangTabel()
        Lv.Columns.Add("No Pembelian", 100, HorizontalAlignment.Center)
        Lv.Columns.Add("Kode Barang", 80, HorizontalAlignment.Center)
        Lv.Columns.Add("Nama Barang", 100, HorizontalAlignment.Center)
        Lv.Columns.Add("Merk", 80, HorizontalAlignment.Center)
        Lv.Columns.Add("Harga", 90, HorizontalAlignment.Center)
        Lv.Columns.Add("Jumlah Beli", 50, HorizontalAlignment.Center)
        Lv.Columns.Add("Total Harga", 80, HorizontalAlignment.Center)
        Lv.View = View.Details
        Lv.GridLines = True
        Lv.FullRowSelect = True

    End Sub
    Sub hapus()
        N_pembelian.text = ""
        K_barang.text = ""
        N_barang.text = ""
        Merk.text = ""
        Harga.text = ""
        J_beli.text = ""
        T_harga.text = ""
    End Sub
    Sub IsiTabel()
        Dim Lst As New ListViewItem
        Lst.Text = N_pembelian.Text
        Lst.SubItems.Add(K_barang.Text)
        Lst.SubItems.Add(N_barang.Text)
        Lst.SubItems.Add(Merk.Text)
        Lst.SubItems.Add(Harga.Text)
        Lst.SubItems.Add(J_beli.Text)
        Lst.SubItems.Add(T_harga.Text)
        lv.Items.Add(Lst)
    End Sub

    Private Sub K_barang_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles K_barang.SelectedIndexChanged
        Dim x As String
        x = Microsoft.VisualBasic.Left(K_barang.Text, 2)
        If x = "TS" Then
            Merk.Text = "TOSHIBA"
        ElseIf x = "VG" Then
            Merk.Text = "V-GEN"
        End If

        Dim y As String
        y = Microsoft.VisualBasic.Mid(K_barang.Text, 3)
        If y = "001" Then
            N_barang.Text = "FLASHDISK 4GB"
        ElseIf y = "002" Then
            N_barang.Text = "FLASHDISK 2GB"
        End If

        Dim z As String
        z = Microsoft.VisualBasic.Left(K_barang.Text, 5)
        If z = "TS001" Then
            Harga.Text = "105000"
        ElseIf z = "TS002" Then
            Harga.Text = "75000"
        ElseIf z = "VG001" Then
            Harga.Text = "90000"
        ElseIf z = "VG002" Then
            Harga.Text = "60000"
        End If
    End Sub

    Private Sub J_beli_Keypress(ByVal sender As System.Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles J_beli.KeyPress
        If e.KeyChar = Chr(13) Then
            T_harga.Text = Val(Harga.Text) * J_beli.Text
        End If
    End Sub

    Private Sub Btnsimpan_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Btnsimpan.Click
        RancangTabel()
        IsiTabel()
        N_pembelian.Focus()
    End Sub

    Private Sub Btnhapussemua_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Btnhapussemua.Click
        Lv.Items.Clear()
    End Sub

    Private Sub Btnbersih_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Btnbersih.Click
        N_pembelian.Text = ""
        K_barang.Text = ""
        N_barang.Text = ""
        Merk.Text = ""
        Harga.Text = ""
        J_beli.Text = ""
        T_harga.Text = ""
    End Sub

    Private Sub Btnhapusdata_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Btnhapusdata.Click
        Lv.Items.Remove(Lv.SelectedItems(0))
    End Sub

    Private Sub Btnkeluar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Btnkeluar.Click
        End
    End Sub
End Class







Nama : dewi jelita Hutasoit
Npm  : 12110594
kelas : TI-P1206

Vrydag 15 November 2013

contoh program matakuliah

Public Class Form1

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

        npm.Items.Add("13111000")
        npm.Items.Add("13111011")
        npm.Items.Add("13112011")
        For x = 1 To 3
            kode_dosen.Items.Add("KD0" & x)
        Next
        For x = 11 To 13
            kode_matkul.Items.Add("KM" & x)
        Next
        Dim i As Integer
        For i = 0 To 100 Step +5
            nilai_tugas.Items.Add(i)
            nilai_uts.Items.Add(i)
            nilai_uas.Items.Add(i)
        Next i
        Dim j As Integer
        For j = 0 To 100
            nilai_hadir.Items.Add(j)
        Next j

    End Sub

    Private Sub npm_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles npm.SelectedIndexChanged

        Dim x As String
        x = Microsoft.VisualBasic.Right(npm.Text, 1)
        If x = "0" Then
            jenjang.Text = "S1"
        ElseIf x = "1" Then
            jenjang.Text = "D3"
        Else
            jenjang.Text = "D1"
        End If

        x = Microsoft.VisualBasic.Mid(npm.Text, 4, 2)
        If x = "10" Then
            jurusan.Text = "Teknik Informatika"
        ElseIf x = "11" Then
            jurusan.Text = "Sistem Informasi"
        ElseIf x = "12" Then
            jurusan.Text = "Manajemen"
        Else
            jurusan.Text = "-"
        End If
        Select Case npm.Text
            Case "13111000"
                nama.Text = "Doni M"
            Case "13111011"
                nama.Text = "Hendra S"
            Case "13112011"
                nama.Text = "Atika"
            Case Else
                nama.Text = "-"
        End Select

    End Sub

    Private Sub kode_matkul_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles kode_matkul.SelectedIndexChanged

        Dim y As String
        y = Microsoft.VisualBasic.Right(kode_matkul.Text, 2)
        If y = "11" Then
            nama_matkul.Text = "Pemograman Visual"
        ElseIf y = "12" Then
            nama_matkul.Text = "Arsitektur Informasi"
        ElseIf y = "13" Then
            nama_matkul.Text = "Struktur Data"
        End If

    End Sub

    Private Sub kode_dosen_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles kode_dosen.SelectedIndexChanged

        Dim z As String
        z = Microsoft.VisualBasic.Right(kode_dosen.Text, 2)
        If z = "01" Then
            nama_dosen.Text = "Mesran S.Kom, M.Kom"
        ElseIf z = "02" Then
            nama_dosen.Text = "Sony Bahagia S.Kom"
        ElseIf z = "03" Then
            nama_dosen.Text = "Sinar Sinurat S.Kom, M.Kom"
        End If

    End Sub

    Private Sub btn_proses_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btn_proses.Click

        nilai_akhir.Text = 0.1 * nilai_hadir.Text + 0.15 * nilai_tugas.Text + 0.3 * nilai_uts.Text + 0.45 * nilai_uas.Text
        If nilai_akhir.Text >= 60 Then
            keterangan.Text = "LULUS"
        Else
            keterangan.Text = "GAGAL"
        End If
        Select Case nilai_akhir.Text
            Case Is >= 80
                nilai_hurf.Text = "A"
            Case 70 To 79
                nilai_hurf.Text = "B"
            Case 60 To 69
                nilai_hurf.Text = "C"
            Case 50 To 59
                nilai_hurf.Text = "D"
            Case Is <= 49
                nilai_hurf.Text = "E"
        End Select

    End Sub

    Private Sub btn_hapus_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btn_hapus.Click

        npm.Text = ""
        nama.Text = ""
        jenjang.Text = ""
        jurusan.Text = ""
        kode_dosen.Text = ""
        nama_dosen.Text = ""
        kode_matkul.Text = ""
        nama_matkul.Text = ""
        nilai_hadir.Text = ""
        nilai_tugas.Text = ""
        nilai_uts.Text = ""
        nilai_uas.Text = ""
        nilai_akhir.Text = ""
        nilai_hurf.Text = ""
        keterangan.Text = ""

    End Sub

    Private Sub btn_keluar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btn_keluar.Click

        Me.Close()

    End Sub

End Class





Hasil Programnya adalah :



Dinsdag 08 Oktober 2013

tak mau pergi

Lirik Lagu Rija Abbas (Ex Rumor) - Tak Mau Pergi

Aku tak ingin menyesal lagi
Seperti dulu yang pernah ku alami
Aku tak mau sakit hati lagi
Yang sakitnya ku rasakan sampai detik ini

Oh Tuhan beri petunjuk-Mu
Untuk mendapatkan kekasih yang tulus mencintaiku

Aku disini tetap menanti
Tak mau pergi tak mau pergi
Aku disini tetap menunggu
Seperti manusia lemah yang berharap
Kau terima cintanya

Aku tak mau sakit hati lagi
Yang sakitnya ku rasakan sampai detik ini

Oh Tuhan beri petunjuk-Mu
Untuk mendapatkan wanita yang tulus mencintaiku

Aku disini tetap menanti
Tak mau pergi tak mau pergi
Aku disini tetap menunggu seperti manusia lemah

Aku disini tetap menanti
Tak mau pergi tak mau pergi
Aku disini tetap menunggu seperti manusia lemah
Seperti manusia lemah yang berharap


Kau terima cintanya