Soal No 3 ( Dedi Muhardi "0911085 " )

LISTING PROGRAM Formlogin

Kasus mengenai penggajian karyawan/pegawai,, untuk mengetahui soal nya klik diSINI

Public Class Formlogin

    Private Sub btnOK_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnOK.Click

        If username.Text = "Dedi Muhardi" And password.Text = "0911085" Then

            menuutama.Show()

            Me.Hide()

        Else

            MsgBox("maaf saudara, password yang anda masukkan tidak di temukan")

            username.Text = ""

            password.Text = ""

        End If

    End Sub

    Private Sub Keluar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Keluar.Click

        End

    End Sub

End Class

HASIL PROGRAM Formlogin

 

LISTING PROGRAM menuutama

Public Class menuutama

    Private Sub gajipegawai_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles pegawai.Click

        gajipegawai.Show()

    End Sub

    Private Sub Keluar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Keluar.Click

        End

    End Sub

End Class

HASIL PROGRAM menuutama

LISTING PROGRAM  gajipegawai

Public Class gajipegawai

        

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

        nip.Items.Add("B10")

        nip.Items.Add("B11")

        nip.Items.Add("B12")

        jabatan.Items.Add("mandor")

        jabatan.Items.Add("kepala bagian")

        jabatan.Items.Add("staff")

        status.Items.Add("Belum Menikah")

        status.Items.Add("menikah")

        jalem.Items.Add("1")

        jalem.Items.Add("2")

        jalem.Items.Add("3")

        jalem.Items.Add("4")

        jalem.Items.Add("5")

        jalem.Items.Add("6")

        jalem.Items.Add("7")

        jalem.Items.Add("8")

        jalem.Items.Add("9")

        jalem.Items.Add("10")

        jalem.Items.Add("11")

        jalem.Items.Add("12")

        jalem.Items.Add("13")

        jalem.Items.Add("14")

        jalem.Items.Add("15")

        jalem.Items.Add("16")

        jalem.Items.Add("17")

        jalem.Items.Add("18")

        jalem.Items.Add("19")

        jalem.Items.Add("20")

        jalem.Items.Add("21")

        jalem.Items.Add("22")

        jalem.Items.Add("23")

        jalem.Items.Add("24")

    End Sub

Soal No 2 ( Dedi Muhardi "0911085 " )

LISTING PROGRAM HAL 32

untuk melihat soal nya klik diSINI

Public Class Form1

    Sub buattabel()

        Lv.Columns.Add("NPM", 80, HorizontalAlignment.Center)

        Lv.Columns.Add("NAMA", 180, HorizontalAlignment.Left)

        Lv.Columns.Add("JURUSAN", 90, HorizontalAlignment.Left)

        Lv.Columns.Add("JENJANG", 90, HorizontalAlignment.Left)

        Lv.Columns.Add("TAHUN MASUK", 110, HorizontalAlignment.Left)

        Lv.Columns.Add("NILAI ANGKA", 110, HorizontalAlignment.Left)

        Lv.Columns.Add("NILAI HURUF", 110, HorizontalAlignment.Left)

        Lv.Columns.Add("BOBOT", 80, HorizontalAlignment.Left)

        Lv.View = View.Details

        Lv.GridLines = True

        Lv.FullRowSelect = True

    End Sub

    Sub isitabel()

        Dim lst As New ListViewItem

        lst.Text = npm.Text

        lst.SubItems.Add(nama.Text)

        lst.SubItems.Add(jurusan.Text)

        lst.SubItems.Add(jenjang.Text)

        lst.SubItems.Add(tahunmasuk.Text)

        lst.SubItems.Add(angka.Text)

        lst.SubItems.Add(huruf.Text)

        lst.SubItems.Add(bobot.Text)

        Lv.Items.Add(lst)

    End Sub

Membuat Aplikasi Absensi Menggunakan Visual Basic

Membuat Aplikasi Absensi Menggunakan Visual Basic

Siapa yang enggak tahu  sih tentang absensi ?, sekolah  bahkan perusahan tak terlepas dari yang anamanya absensi ini ,  kalau biasanya absensi hanya menggunakan secarik kertas tapi kali ini kita coba aplikasikan dengan program komputer , ya …biar lebih keren lah,,,,he….he… .
Sebenernya Aplikasi ini bisa dibuat menggunakan banyak program
misalnya

Keindahan Pulau ACEH

Pulau Banyak Aceh Singkil

Aceh Singkil sebagai salah satu Kabupaten Daerah Tujuan Wisata di Provinsi Nanggroe Aceh Darussalam mempunyai potensi  yang cukup besar bagi pengembangan sektor pariwisata karena memiliki keindahan, kekayaan alam dan kehidupan sosial budaya serta peninggalan – peninggalan sejarah yang semuanya dapat dijadikan objek wisata. Alam Aceh Singkil yang begitu menakjubkan dan mempesona belum dapat di manfaatkan secara maksimal, banyak sekali potensi wisata yang selama ini terpendam, diantaranya adalah wisata bahari yang saat ini sudah mulai dikembangkan.

Perkembangan Intel

Perkembangan Intel

Perkembangan processor dimulai sejak diciptakannya dioda tabung oleh seorang ilmuwan Inggris Sir John Ambrose Fleming pada tahun 1904. Kemudian dikembangkan lagi oleh ilmuwan-ilmuwan lain. Namun pada tahun 1960-an ditemukan komponen semikonduktor (transistor) yang menggeser kedudukan dioda tabung saat itu.

Pada tahun 1968 Gordon Moore, Robert Noyce dan Andy Grove menemukan Intel Corp. untuk menjalankan bisnis “INTegrated ELectronics” yang semula bernama M&N Electronics yang merupakan singkatan dari Moore dan Noyce Produk pertama dari Intel adalah chip Static Random Acces Memory (SRAM) 3101 Schottky bipolar 64 bit pada akhir 1969-an.

Pertama kali processor dikenalkan pada tahun 1971 oleh Intel Company, yaitu intel 4040 4-bit yang didesain oleh Federico Faggin. Sebuah chip yang memiliki ukuran lebar seperdelapan inchi dan panjang seperenambelas inchi, terdiri dari 2.300 MOS (metal oxide semiconductor) transistors. Kemudian pada tahun 1972 processor jenis ini dikembangkan lagi menjadi intel 8080 8-bit dengan menggunakan 4.500 transistor dengan kinerja 10 kali lipat. Pada tahun 1978 diperkenalkan processor 16-bit intel 8086 dengan transistor sebanyak 29.000 buah. Yang kemudian berkembang menjadi intel 8087, 8088 dengan 8-bit bus.

Contoh Pemrograman Visual Basic

Contoh program sederhana dalam bahasa Visual Basic .NET yang dipakai untuk menghitung jumlah pembayaran dari m_item buah barang dengan harga m_price per item ditambah 5% pajak penjualan: ^[2].

  Dim m_item, m_price, tax, total As double
  m_item = double.Parse(textBox1.Text)
  m_price = double.Parse(textBox2.Text)
  tax = 0.05
  total = m_item * m_price * (1 + tax)
  label5.Text = total.ToString()
  MessageBox.Show("Well Done.")

Hubungan dengan Visual Basic klasik

Apakah Visual Basic .NET dianggap sebagai sebuah versi Visual Basic atau benar-benar bahasa yang berbeda merupakan sebuah topik perdebatan yang hangat. Hal ini dikarenakan sintaksis bahasa Visual Basic .NET tidak mengalami perubahan yang sangat drastis, dan hanya menambahkan beberapa dukungan fitur baru seperti penanganan eksepsi secara terstruktur dan ekspresi yang bisa di-short-circuit-kan.

Visual Basic. NET

Microsoft Visual Basic .NET adalah sebuah alat untuk mengembangkan dan membangun aplikasi yang bergerak di atas sistem .NET Framework, dengan menggunakan bahasa BASIC. Dengan menggunakan alat ini, para programmer dapat membangun aplikasi Windows Forms, Aplikasi web berbasis ASP.NET, dan juga aplikasi command-line. Alat ini dapat diperoleh secara terpisah dari beberapa produk lainnya (seperti Microsoft Visual C++, Visual C#, atau Visual J#), atau juga dapat diperoleh secara terpadu dalam Microsoft Visual Studio .NET. Bahasa Visual Basic .NET sendiri juga

Langkah Awal Pengerjaan Visual Basic

Tutorial ini adalah untuk benar-benar pemula dengan Visual Basic. Ini akan mengajarkan Anda benar dari awal, bagaimana membuat program pertama Anda dalam Visual Basic. Pelajaran 1 akan memberikan pengenalan Visual Basic dan akan mengajarkan anda dasar-dasar. Pelajaran 2 akan mengajarkan Anda tentang variabel. Dalam Pelajaran 3 Anda akan belajar lebih banyak tentang Acara dan properti.

VISUAL STUDIO dan NET Framework

	Visual Studio adalah Integrated Development Environment (IDE) di mana pengembang bekerja saat membuat program di salah satu dari banyak bahasa, termasuk Visual Basic, untuk NET Framework.. Framework. NET adalah pengembangan dan lingkungan eksekusi yang memungkinkan bahasa pemrograman yang berbeda dan perpustakaan untuk bekerja sama mulus untuk membuat Windows, Web, Mobile, dan aplikasi Office.

PERGAULAN

Lok cerita tentang masalh pergaulan ku sich gak pernah mandang dari materi ny, aku mau bertemen dengan siapa saja yang memang mau & bisa bertemen dengan aku,, yang memang aku orang ny sederhana2 aja,,,,,,,,,,,

Banyak cerita tentang pergaulan aku, baik itu di lingkungan masyarakat, di sekolah bahkan sama keluarga juga…….

KUMPULAN KATA BIJAK/ MOTIVASI

Kumpulan Kata Bijak Motivasi

KATA-KATA BIJAK KEHIDUPAN | KATA BIJAK PARA TOKOH

Contoh yang baik adalah nasehat terbaik.

Jika kita melayani, maka hidup akan lebih berarti.

Apabila di dalam diri seseorang masih ada rasa malu dan takut untuk berbuat suatu kebaikan, maka jaminan bagi orang tersebut adalah tidak akan bertemunya ia dengan kemajuan selangkah pun.

MASA SMA

Hemmmmm……………. Lok masa SMA ni paling Gokil menurut aku !!!!!!!!!!!!!!!!!!!

Seruh banget lah pokok nya,,,, lok aku tebak temen2 pasti seru juga kan masa SMA ny ????

Knpa aku bilang seru ?????????? hayo coba tebak,,, hayo ???????????????

Masuk  di SMA kami di saring lgi, dilakukan seleksi ujian tertulis,, gak mudah juga lho masuk

di sekolah kami, , , , , setelah selesai seleksi ujian itu,,, 3 hari kmudian tibalah pengumuman

seleksi tersebut siapa yang lulus dan tdk lulus….. dengan penuh rasa cemas aku mencoba melihat nomor ujian aku di papan pengumuman dan................................

MASA SMP

Waaaduh……….kok diingat lagi masa ini, teringat masa2 yang senang dan juga sebaliknya………

Dulu aku tidak menyangka bisa sekolah di NEGERI. Kenapa begitu,,,,, ha………… ni baru aku certain,, jangan kemana-mana seru ni…………

Gini cerita ny,,, dulu aku di suruh sekolah di Pesantren sama Ibunda ku, Ibu aku sangat ingin salah satu anak ny bersekolah di pesantren, namun aku menolak karena memang aku tidak niat, lama kelamaan aku mencoba jelasin sama k 2 orang Tua aku dan Alhamdulillah mereka mengerti, dan aku jdi deh sekolah di SMP NEGERI 1 GUNUNG MERIAH KAB. ACEH SINGKIL.

KELUARGA

KELUARGA adalah yang ke 2 bagiku setelah Tuhan ku ALLAH,

Kami adalah keluarga yang bahagia terdiri dari 6 bersaudara, aku adlah anak k 2 yang pertama adalh abg

ku yang sekarang ny sedang melanjutkan pendidikan di kota serambi MEKAH BANDA ACEH,

LATAR BELAKANG

Semua kegiatan ku sehari-hari aku lakukan penuh dengan rasa sabar, Web.Desainku.Net adalah sebuah situs penyedia jasa pembuatan website Profesional dengan harga yang terjangkau untuk semua kalangan, baik untuk kepentingan personal maupun bisnis.