Tampilkan postingan dengan label Pemrograman. Tampilkan semua postingan
Tampilkan postingan dengan label Pemrograman. Tampilkan semua postingan

Jumat, 19 Agustus 2016

Perkembangan HTML (Hypertext Markup Language)

Pengertian HTML

HTML atau HyperText Markup Language adalah sebuah bahasa pemrograman yang digunakan untuk membuat sebuah website sehingga dari halaman website tersebut dapat menampilkan informasi yang berguna bagi para pengguna internet.

Baca Juga: Pengertian dan Fungsi HTML (Hypertext Markup Language)

HTML Versi 4.0 dan Seterusnya

HTML 4.0 sebuah bahasa pemrograman web yang diperkenalkan oleh World Wide Web Consortium (W3C) pada bulan Desember tahun 1997, yang antara lain menyertakan fitur CSS (Cascading Style Sheets), yang mendukung pembuatan aplikasi yang dinamis. HTML menjadi sangat fenomenal karena banyak orang yang mulai menggunakan HTML.


Tahun 1999 muncul HTML 4.1. Setelah kemunculan HTML 4.1, XHTML 1 lahir. Secara prinsip spesifikasi pada XHTML sama seperti pada HTML 4.01. Hal yang membedakan adalah sintaks bahasanya. XHTML menerapkan aturan yang lebih ketat daripada HTML, yakni mengharuskan pembuat dokumen harus mengikuti aturan XML (eXtended Markup Language). Selain itu, dalam penulisan dokumen semua tag dan atribut dalam dokumen harus ditulis dengan menggunakan huruf kecil, sementara pada HTML, tag dan atribut boleh ditulis dengan huruf capital, huruf kecil, ataupun kombinasi. XHTML 1.0 diteruskan dengan XHTML 2.0. Namun, versi yang terbaru ini kurang mendapat tanggapan dari para vendor.

Baca Juga: Pengertian Website dan Sejarah Website

HTML Versi 5 (HTML5)

HTML5 (angka 5 dan HTML tidak dipisahkan oleh spasi) dikembangkan oleh badan lain yaitu WHATMG (Web Hypertext Application Technology Working Group). Spesifikasi HTML5 belum final saat ini, tetapi diyakini oleh banyak orang akan menjadi standar yang diterima di masa depan. Walaupun belum final, HTML5 telah menebar pesona. Beberapa browser (lihat Tabel 1.1) sudah mendukung HTML5.

Senin, 15 Agustus 2016

Pengertian Web Master dan Tugas seorang Web Master

Pengertian Web Master

Web Master adalah sebuah pekerjaan yang mengharuskan sesorang untuk mengerti akan semua hal mulai dari desain dari sebuah website, program dari sebuah web dan keamanan server akan tetapi tidak terlalu mencampuri masing-masing divisi dari sebuah website, yaitu cukup dengan mempertanggung jawabkan atas jalannya sebuah website. menjadi seorang web master juga harus mengetahui informasi dari semua website sehingga jika terjadi masalah dalam website tersebut dapat segera ditangani.

Baca Juga: Pengertian dan Tugas Web Administrator


Tugas Seorang Web Master

Pada dasarnya seorang web master bertugas untuk menjaga jalannya sebuah website. Lancar da tidaknys sebuah website akan menjadi tanggung jawab penuh oleh seorang web master. Web master akan segera memperbaiki coding dari sebuah website apabila ada link dari website yang mengalami kerusakan. Selain itu seorang web master juga harus menjaga keamanan / security dari sebuah website tersebut.

Baca Juga: Pengertian dan Tugas Sebagai Web Programmer

Untuk menjadi seorang web master profesional sesorang harus menguasahi ilmu dasar tentang komputer dan pemrograman diantaranya:

  • HTML, DHTML
  • CGI Perl, PHP, MySQL, ASP, Java
  • Penguasaan terhadap macam - macam Sistem Operasi Komputer baik server maupun client
  • Kemanan Server
  • Jaringan Komputer (LAN, WAN dan Internet)

Sabtu, 13 Agustus 2016

Pengertian dan Tugas Web Administrator

Pengertian Web Administrator

Web Administrator adalah sebuah pekerjaan yang memfokuskan diri untuk memperbaiki sebuah server baik itu instalasi sampai dengan masalah trobleshooting pada komputer server. Web Administrator akan menjaga kelangsungan dan kelancaran dari server untuk tetap bisa berjalan sehingga jika terjadi problem/masalah pada server, web administrator harus siap untuk memperbaikinya.

Baca Juga: Pengertian dan Tugas Sebagai Web Programmer

Tugas Web Administrator

Seorang Web Administrator bertugas untuk memaintenance atau memperbaiki suatu server, mengerti akan sistem operasi server baik instalasi sampai trobleshooting (masalah). Untuk itu seorang web administrator harus benar - benar siap kapan saja.


Baca Juga: Pengertian Web Designer dan Syarat Untuk Menjadi Web Designer Profesional

Keahlian yang harus dikuasai sebagai Web Administrator

Untuk memaksimalkan pekerjaannya seorang web administrator harus menguasahi beberapa hal, diantaranya:

  • OS Unix (LInux, FreeBSD, dll) - Seorang web administrator harus menguasahi macam-macam sistem operasi basis linux, baik itu instalasi maupun trobleshootingnya.
  • OS NT - Seorang web administrator harus menguasahi macam-macam sistem operasi basis windows, baik itu instalasi maupun trobleshootingnya.
  • Jaringan (LAN, WAN, Intranet) - Seorang web administrator harus mempunyai bekal pengetahuan bidang jaringan komputer
  • Keamanan Server - Seorang web administrator harus paham tentang sistem sekurity dan keamanan pada server

Pengertian dan Tugas Sebagai Web Programmer

Pengertian Web Programmer

Web programmer adalah sebuah pekerjaan dalam bidang teknologi informasi yang mana didalam pekerjaan tersebut seorang web programmer akan melakukan pengcodingan dan pemrograman sebuah website. Web Programmer akan membuat script atau coding untuk membuat halaman web akan terlihat lebih dinamis dan menarik. Sebuah website yang biasa akan terlihat sangat membosankan dengan tampilan yang standart untuk itu web programmer akan membuat coding agar website yang diciptakan terlihat lebih dinamis.


Tugas Seorang Web Programmer

Web Programmer adalah orang yang bertugas melakukan pengcodingan dan pemrograman sebuah website agar terlihan lebih dinamis dan agar web tersebut dapat terlihat mudah bagi seorang web admin. Jika situs yang akan dibuat mempunya fasilitas interaksi antara pengunjung dan situs misalnya menyangkut dengan transaksi, input output data dan database maka seorang Web Programmer yang akan mengerjakannya dengan membuat aplikasi-aplikasi yang berkerja diatas situs (web).

Baca Juga: Pengertian Web Designer dan Syarat Untuk Menjadi Web Designer

Ilmu yang harus dikuasai orang seorang web programmer

Untuk menjadi seorang web programmer profesional seorang web programmer harus menguasahi dasar-dasar ilmu komputer dan pemrograman yaitu:

  • CGI Perl, PHP, MySQL (Unix base)
  • ASP (NT base)
  • Java Script dan Applet

Senin, 11 April 2016

Pengertian dan Fungsi HTML (HyperText Markup Language)

Pengertian HTML (HyperText Markup Language)

HTML atau HyperText Markup Language adalah sebuah bahasa pemrograman yang digunakan untuk membuat sebuah website sehingga dari halaman website tersebut dapat menampilkan informasi yang berguna bagi para pengguna internet.

HTML sendiri terdiri dari komponen beberapa script yang terbentuk menjadi sebuh tag penyusun dokumen html. Untuk dapat belajar HTML memang gampang-gampang susah karena jika terjadi salah pengetikan sedikit saja maka akan mengalami eror pada dokumen tersebut.

HTML tersusun dari kumpulan text yang disertai dengan link sehingga memudahkan pengguna dalam mengakses sebuah informasi. Dengan HTML kita bisa mengatur model tulisan, header pada web, body bahkan isi dari sebuah website.

Baca Juga: Pengertian dan Fungsi Domain


Fungsi HTML (Hypertext markup Language)

HTML berfungsi untuk mengelola, menghubungkan, menampilkan serangkaian informasi dan data sehingga dokumen-dokumen tersebut mudah untuk diakses melalui jaringan internet. Selain itu fungsi utama dari HTML itu sendiri adalah sebagai berikut:
  • Berfungsi untuk membuat halaman sebuah website
  • Berfungsi untuk menampilkan informasi dari database ke dalam sebuah browser
  • Berfungsi untuk menghubungkan link ke halaman lain di dalam sebuah website dengan menggunakan kode tertentu (hypertext)

Rabu, 06 Januari 2016

Langkah Membuat Website Pertama

Setelah pada artikel sebelumnya, penulis sudah Memperkenalkan HTML, kali ini kita akan belajar membuat website pertama menggunakan HTML. Teman-teman tentu sudah tidak sabar untuk membuat website pertama. Baiklah, ikuti langkah-langkah berikut ini :

Membuat Website Pertama Menggunakan HTML

  1. Buka Notepad++ dengan cara klik Start --> All Programs --> Notepad ++ --> Notepad ++
  2. Kemudian ketikan nama kalian, sebagai contoh penulis akan menuliskan TutorialKomputerLengkap.Com
    Tampilan Notepad ++
    Tampilan Notepad ++
  3. Simpan halaman tulisan tadi dengan menekan CTRL + S, kemudian simpan menggunakan extensi *.html. Agar lebih mudah, penulis menganjurkan teman-teman untuk menyimpanya di dekstop.
  4. Coba buka file yang sudah dibuat tadi menggunakan Web Browser, dan akan muncul tulisan yang diketikan pada notepad tadi. 

Cukup sekian dulu tutorial kali ini, nantikan tutorial selanjutnya...

Halaman Utama Belajar Bahasa Pemrograman

Pengertian HTML, Mengenal Lebih Jauh Tentang HTML

Pengertian HTML

Hyper Text Markup Language (HTML) adalah sebuah bahasa markah yang digunakan untuk membuat sebuah halaman web, menampilkan berbagai informasi di dalam sebuah penjelajah web Internet dan pemformatan hiperteks sederhana yang ditulis dalam berkas format ASCII agar dapat menghasilkan tampilan wujud yang terintegerasi. Jadi HTML bukan sebuah bahasa pemrograman, HTML hanya bahasa untuk memberi format pada teks dan bentuk dari elemen website agar dapat tampil sedemikian rupa.

Lebih Lanjut Tentang HTML

Untuk mengetahui lebih lanjut tentang HTML, coba buka web tutorialkomputerlengkap.com, kemudian klik kanan klik Inspeksi Elemen. Selanjutnya akan muncul script html seperti pada gambar dibawah ini

Elemen HTML
Elemen HTML
Coba perhatikan pada baris pertama terdapat script <!DOCTYPE HTML>. Itu menandakan bahwa halaman yang sedang kita buka adalah halaman HTML.
Kemudian pada baris kedua terdapat script <HTML> itu juga menandakan bahwa itu adalah halaman HTML.
Kemudian pada baris dibawahnya adalah isi dari HTML tersebut. Didalamnya terdapat tag-tag atau perintah yang digunakan untuk memberikan pemformatan pada isi website, seperti pemberian format teks, pemberian format gambar, menetukan background, sampai dengan membuat menu.
Jangan pedulikan script diatas, script itu terlalu rumit untuk saat ini. Tetapi pelan-pelan kita akan mempelajarinya sampai bisa membuat seperti yang diatas.

Selasa, 05 Januari 2016

Yang Harus Dipersiapkan Untuk Belajar Pemrograman Web

Sebelum mempelajari pemrograman web ada beberapa tools yang harus dipersiapkan, guna menunjang pembelajaran, antara lain dibawah ini :

Tools Yang Harus Dipersiapkan Untuk Belajar Web

1. Web Browser

Mozilla Firefox
Mozilla Firefox
Hal yang harus disediakan adalah Web Browser, web browser digunakan untuk melakukan pengetesan terhadap halaman web yang telah dibuat. Sebenarnya di windows sendiri sudah ada web browser bawaan yaitu Internet Explorer. Tetapi penulis tidak menganjurkan teman-teman untuk menggunakan Internet Explorer, karena web browser ini kurang lengkap. Beberapa web browser yang penulis rekomendasikan antara lain :
- Mozilla Firefox
- Chrome
- Safari

2. Text Editor

Notepad ++
Notepad ++
Sebenarnya ada cara mudah untuk membuat website yaitu menggunakan aplikasi yang sudah didesain untuk membuat desain, seperti Dreamwaver. Tetapi untuk lebih memahami script yang ditulis, penulis menyarankan untuk menggunakan text editor terlebih dahulu. Text editor sangat penting untuk membantu dalam memahami script. Karena jika menggunakan text editor setiap tag atau perintah diketikan, jadi secara tidak langsung ini akan membantu dalam pemahaman dan penyelesian masalah. Beberapa text edito yang penulis sarankan adalah :
- Notepad ++
- Sublime Text

3. Localhost

XAMPP
XAMPP
Localhost digunakan untuk menjalankan server didalam komputer kita. Localhost berguna untuk menguji bahasa pemrograman yang berjalan disisi server serperti PHP. Sebenarnya, untuk belajar HTML dan CSS, kita belum membutuhkan ini. Kita akan memakai Localhost ketika mulai mempelajari bahasa pemrograman PHP. Localhost yang penulis sarankan adalah XAMPP. Penulis sendiri belum pernah menggunakan localhost selain XAMPP. Alasan penulis menggunakanya adalah karena tools yang satu ini sudah sangat lengkap, bahkan sudah mendukung MySQL. Paket yang disediakan XAMPP sudah lebih dari cukup untuk belajar pemrograman web.

Itulah Tools Yang Harus Dipersiapkan Sebelum Belajar Pemrograman Web. Untuk teman-teman yang akan belajar website, silahkan dipersiapkan tools-tools diatas. Jika tidak ada halangan, penulis juga akan membuat artikel tentang Tutorial Belajar Website Dari Nol. Sekian dan terima kasih.


Baca Juga :

Rekomendasi Bahasa Pemrograman Yang Mudah Dipelajari Pemula

Bahasa pemrograman adalah sebuah bahasa yang digunakan didalam komputer untuk memberikan perintah atau intruksi kepada komputer untuk melakukan hal tertentu. Dengan bahasa pemrograman kita dapat memerintahkan komputer untuk melakukan suatu pekerjaan, misalnya perhitungan atau membuat data. Dengan bahasa pemrograman kita juga dapat membuat aplikasi sendiri, seperti aplikasi kalkulator, penghitungan gaji, sampai pembuatan data karyawan.
Ada banyak jenis bahasa pemrograman yang dapat digunakan di komputer, masing-masing memiliki fungsi dan kelebihan serta kekuranganya sendiri. Saat ini penulis tidak akan membahas terlalu jauh tentang fungsi bahasa pemrograman. Penulis akan memberikan rekomendasi bahasa pemrograman yang mudah dipelajari, terutama untuk pemula. Berikut listnya

Rekomendasi Bahasa Pemrograman Untuk Pemula

1. Bahasa Pascal

Pertama kali penulis diajarkan bahasa pemrograman dikampus adalah bahasa pascal. Bahasa pascal dipilih sebagai pengantar karena mudah dipahami, syntax-syntaxnya juga seperti menggunakan bahasa inggris sehingga lebih mudah dipahami. Bagi teman-teman yang baru mengenal dunia pemroggraman, penulis sarankan untuk belajar bahasa ini terlebih dahulu. Aplikasi yang penulis gunakan untuk belajar bahasa ini adalah Turbo Pascal.

2. Bahasa Java

Bahasa Java adalah bahasa pemrograman yang paling banyak digunakan saat ini. Bahasa Java banyak digunakan untuk membuat aplikasi berbasis mobile. Seiring dengan semakin Boomingnya Android, bahasa ini makin banyak diminati orang untuk membuat aplikasi android. Bagi teman-teman yang tertarik untuk belajar membuat aplikasi android, bisa langsung mencoba mempelajari bahasa Java.

3. Bahasa C/C++

Jika berbicara mengenai bahasa pemrograman C atau C++ ini adalah salah satu bahasa yang juga tidak kalah saing mengenai penggunaan dari para programmer dunia. C++ sendiri merupakan pengembangan atau bisa dibilang turunan dari basa C itu sendiri, jika kita melihat syntax-syntax dari PHP maka akan mirip sekali dengan bahasa C itu sendiri, benar demikian, karena bahasa pemrograman PHP juga dikembangkan atau merupakan turunan dari bahasa C.

4. Bahasa PHP

Pertama kali penulis mengenal pemrogaman adalah pemrograman web, dengan bahasa pemrograman yang digunakan adalah bahasa PHP. PHP sendiri merupakan bahasa pemrograman yang berjalan disisi server, sehingga pengguna tidak akan melihat script ini. Bagi teman-teman yang ingin belajar membuat website, bisa mempelajari bahasa PHP ini, untuk membuat website menjadi dinamis dan pembaharuan konten menjadi lebih mudah.

5. Bahasa Basic

Bahasa Basic adalah bahasa pemrograman yang digunakan pada aplikasi Visual Basic. Aplikasi Visual Basic sendiri merupakan sebuah aplikasi yang berguna untuk membuat aplikasi baru berbasis dekstop dengan menggunakan bahasa basic sebagai perintahnya. Aplikasi yang dibuat menggunakan Visual Basic berbasis GUI. Bahasa ini juga sangat mudah dipelajari, dan bagi teman-teman yang tertarik untuk membuat aplikasi berbasis dekstop bisa mempelajari bahasa ini.

Untuk memudahkan teman-teman dalam belajar bahasa pemrograman, sebaiknya pelajari terlebih dahulu satu bahasa pemrograman sampai benar-benar mahir, setelah itu barulah mempelajari bahasa pemrograman lainya. Karena setiap bahasa pemrograman memiliki kemiripan dalam penggunaanya.


Baca Juga :

Kamis, 31 Desember 2015

Menggunakan ComboBox Di Visual Basic

Hampir sama dengan Option dan CheckBox, ComboBox juga berfungsi memberikan pilihan. ComboBox hanya mengijinkan user untuk memiliki 1 pilihan. ComboBox memberikan pilihan dalam bentuk list atau daftar, pilihan dilakukan dengan mengklik salah satu daftar tersebut. Baiklah untuk lebih jelasnya, mari kita coba membuat Aplikasi Huruf Mutu Mahasiswa berikut ini

Membuat Aplikasi Huruf Mutu Mahasiswa


1. Buatlah desain aplikasi seperti pada gambar dibawah ini

2. Ganti Properties tools yang telah dibuat menjadi seperti dibawah ini

Tools
Nama
Properties
Label
Label1
Caption : HURUF MUTU MAHASISWA
Label2
Caption : NPM
Label3
Caption : NAMA MAHASISWA
Label4
Caption : JURUSAN
Label5
Caption : NILAI QUIS
Label6
Caption : NILAI TUGAS
Label7
Caption : UTS
Label8
Caption : UAS
Label9
Caption : NILAI AKHIR
Label10
Caption : HURUF MUTU YANG DIDAPATKAN
ComboBox
Combo1
Name : CboNpm
Text : Pilih Npm
TextBox
Text1
Name : TxtNama
Text : -
Text2
Name : TxtJurusan
Text : -
Text3
Name : TxtNilaiQuis
Text : -
Text4
Name : TxtNilaiTugas
Text : -
Text5
Name : TxUts
Text : -
Text6
Name : TxtUas
Text : -
Text7
Name : TxtNilaiAkhir
Text : -
Text8
Name : TxtMutu
Text : -
Command Button
Command1
Name : CmdProses
Caption : Proses
Command2
Name : CmdBatal
Caption : Batal
Command3
Name : CmdExit
Caption : Exit

3. Masukan script dibawah ini pada kotak dialog script

Private Sub CboNpm_Click()
    Dim Nama, Jurusan As String
    Select Case CboNpm.Text
        Case "15100001"
            Nama = "Stevanus Prihanuji"
            Jurusan = "Sistem Informasi"
        Case "15100002"
            Nama = "Fergiawan Listianto"
            Jurusan = "Sistem Informasi"
        Case "15100003"
            Nama = "Renita Fitri Andriyanti"
            Jurusan = "Sistem Informasi"
        Case "15100004"
            Nama = "Evi Setyorini"
            Jurusan = "Sistem Informasi"
        Case "15100005"
            Nama = "Anggi Maharani"
            Jurusan = "Sistem Informasi"
        Case "15100006"
            Nama = "Oktafiani"
            Jurusan = "Sistem Informasi"
        Case "15100007"
            Nama = "Desi Yulianti"
            Jurusan = "Sistem Informasi"
        Case "15100008"
            Nama = "Ahmad Yudi"
            Jurusan = "Sistem Informasi"
        Case "15100009"
            Nama = "Opi Laraswati"
            Jurusan = "Sistem Informasi"
        Case "15100010"
            Nama = "Laili Rizkia Putri"
            Jurusan = "Sistem Informasi"
        Case "15100011"
            Nama = "Tia Anggraeni"
            Jurusan = "Sistem Informasi"
        Case "15100012"
            Nama = "Fisuryani"
            Jurusan = "Sistem Informasi"
        Case "15100014"
            Nama = "Ita Indriyani"
            Jurusan = "Sistem Informasi"
        Case "15100015"
            Nama = "M Arif Rizki"
            Jurusan = "Sistem Informasi"
        Case "15100016"
            Nama = "Mirzon Prananda"
            Jurusan = "Sistem Informasi"
        Case "15100017"
            Nama = "Desi Auliani"
            Jurusan = "Sistem Informasi"
        Case "15100018"
            Nama = "Tri Setia Ningsih"
            Jurusan = "Sistem Informasi"
        Case "15100023"
            Nama = "Anggun Destriyanti"
            Jurusan = "Sistem Informasi"
        Case "15100024"
            Nama = "Rizah Anggraeni"
            Jurusan = "Sistem Informasi"
        Case "15100025"
            Nama = "Rahmat Darmawan"
            Jurusan = "Sistem Informasi"
        Case "15100026"
            Nama = "Reza Anggara"
            Jurusan = "Sistem Informasi"
        Case "15100027"
            Nama = "Rio Adi Pradhana"
            Jurusan = "Sistem Informasi"
        Case "15100030"
            Nama = "Hermin Sukmiati"
            Jurusan = "Sistem Informasi"
        Case "15100031"
            Nama = "Artika Kustriyani"
            Jurusan = "Sistem Informasi"
        Case "15100032"
            Nama = "Intan Ratnasari"
            Jurusan = "Manajemen Informatika"
        Case "15100033"
            Nama = "Dona Ari Wijaya"
            Jurusan = "Sistem Informasi"
        Case "15100034"
            Nama = "Dimas Bima Ananta"
            Jurusan = "Sistem Informasi"
        Case "15100036"
            Nama = ""
            Jurusan = "Sistem Informasi"
        Case "15100037"
            Nama = "Jefri Erlamsyah"
            Jurusan = "Sistem Informasi"
        Case "15100038"
            Nama = "Panji Wahyu Trihantoro"
            Jurusan = "Sistem Informasi"
        Case "15100039"
            Nama = "Yusuf Sugianto"
            Jurusan = "Sistem Informasi"
        Case "15100040"
            Nama = "Bagas Anggara"
            Jurusan = "Sistem Informasi"
        Case "15100041"
            Nama = "Rudi Rizkiyanto"
            Jurusan = "Sistem Informasi"
    End Select
    TxtNama = Nama
    TxtJurusan = Jurusan
    TxtNilaiQuis.SetFocus
End Sub

Private Sub CmdBatal_Click()
    CboNpm.SetFocus
    CboNpm.Text = ""
    TxtNama.Text = ""
    TxtJurusan.Text = ""
    TxtNilaiQuis.Text = ""
    TxtNilaiTugas.Text = ""
    TxtUts.Text = ""
    TxtUas.Text = ""
    TxtNilaiAkhir.Text = ""
    TxtMutu.Text = ""
    TxtNilaiAkhir.BackColor = vbWhite
    TxtMutu.BackColor = vbWhite
End Sub

Private Sub CmdKeluar_Click()
    Unload Me
End Sub

Private Sub CmdProses_Click()
    Dim NA As Integer
    Dim Mutu As String
    TxtNilaiAkhir = Val(Val(TxtNilaiQuis) + Val(TxtNilaiTugas) + Val(TxtUts) + Val(TxtUas)) / 4
 
    Select Case TxtNilaiAkhir.Text
        Case Is > 80
            Mutu = "A"
        Case Is > 70
            Mutu = "B"
        Case Is > 60
            Mutu = "C"
        Case Is > 50
            Mutu = "D"
        Case Is < 50
            Mutu = "E"
    End Select
    TxtMutu = Mutu
    TxtNilaiAkhir.BackColor = vbRed
    TxtMutu.BackColor = vbRed
End Sub

Private Sub Form_Load()
    CboNpm.AddItem "15100001"
    CboNpm.AddItem "15100002"
    CboNpm.AddItem "15100003"
    CboNpm.AddItem "15100004"
    CboNpm.AddItem "15100005"
    CboNpm.AddItem "15100006"
    CboNpm.AddItem "15100007"
    CboNpm.AddItem "15100008"
    CboNpm.AddItem "15100009"
    CboNpm.AddItem "15100010"
    CboNpm.AddItem "15100011"
    CboNpm.AddItem "15100012"
    CboNpm.AddItem "15100014"
    CboNpm.AddItem "15100015"
    CboNpm.AddItem "15100016"
    CboNpm.AddItem "15100017"
    CboNpm.AddItem "15100018"
    CboNpm.AddItem "15100023"
    CboNpm.AddItem "15100024"
    CboNpm.AddItem "15100025"
    CboNpm.AddItem "15100026"
    CboNpm.AddItem "15100027"
    CboNpm.AddItem "15100030"
    CboNpm.AddItem "15100031"
    CboNpm.AddItem "15100032"
    CboNpm.AddItem "15100033"
    CboNpm.AddItem "15100034"
    CboNpm.AddItem "15100036"
    CboNpm.AddItem "15100037"
    CboNpm.AddItem "15100038"
    CboNpm.AddItem "15100039"
    CboNpm.AddItem "15100040"
    CboNpm.AddItem "15100041"
End Sub

Private Sub TxtNilaiQuis_KeyPress(KeyAscii As Integer)
    If KeyAscii = 13 Then
        TxtNilaiTugas.SetFocus
    End If
End Sub

Private Sub TxtNilaiTugas_KeyPress(KeyAscii As Integer)
    If KeyAscii = 13 Then
        TxtUts.SetFocus
    End If
End Sub

Private Sub TxtUas_KeyPress(KeyAscii As Integer)
    If KeyAscii = 13 Then
        Dim NA As Integer
        Dim Mutu As String
        TxtNilaiAkhir = Val(Val(TxtNilaiQuis) + Val(TxtNilaiTugas) + Val(TxtUts) + Val(TxtUas)) / 4
 
        Select Case TxtNilaiAkhir.Text
            Case Is > 80
                Mutu = "A"
            Case Is > 70
                Mutu = "B"
            Case Is > 60
                Mutu = "C"
            Case Is > 50
                Mutu = "D"
            Case Is < 50
                Mutu = "E"
        End Select
        TxtMutu = Mutu
        TxtNilaiAkhir.BackColor = vbRed
        TxtMutu.BackColor = vbRed
    End If
End Sub

Private Sub TxtUts_KeyPress(KeyAscii As Integer)
    If KeyAscii = 13 Then
        TxtUas.SetFocus
    End If
End Sub

4. Jalankan aplikasinya dengan menekan F5

Selamat Mencoba


Baca Juga :

Rabu, 30 Desember 2015

Source Code Aplikasi Data Mahasiswa Dengan Visual Basic

Buat tampilan seperti dibawah ini

Kemudian masukan script dibawah ini

Private Sub CmdBatal_Click()
    TxtNama.SetFocus
    TxtNama.Text = ""
    TxtNpm.Text = ""
    TxtJurusan.Text = ""
    TxtPrody.Text = ""
    TxtTahunMasuk.Text = ""
    TxtNomorUrut.Text = ""
End Sub

Private Sub CmdKeluar_Click()
    Unload Me
End Sub

Private Sub CmdLagi_Click()
    TxtNama.SetFocus
    TxtNama.Text = ""
    TxtNpm.Text = ""
    TxtJurusan.Text = ""
    TxtPrody.Text = ""
    TxtTahunMasuk.Text = ""
    TxtNomorUrut.Text = ""
End Sub

Private Sub CmdProses_Click()
    Dim Kode, KodeJurusan, KodePrody, Jurusan, Prody, TahunMasuk, NomorUrut As Variant
   
    Kode = TxtNpm
   
    TahunMasuk = "20" & Left(Kode, 2)
    TxtTahunMasuk = TahunMasuk
   
    KodeJurusan = Mid(Kode, 3, 1)
    Select Case KodeJurusan
        Case "1"
            Jurusan = "Sistem Informasi"
        Case "2"
            Jurusan = "Teknik Informatika"
        Case "3"
            Jurusan = "Manajemen Informatika"
        Case "4"
            Jurusan = "Komputer Akuntansi"
    End Select
    TxtJurusan = Jurusan
   
    KodePrody = Mid(Kode, 4, 2)
    Select Case KodePrody
        Case "01"
            Prody = "Strata Satu"
        Case "02"
            Prody = "Diplomat Empat"
        Case "03"
            Prody = "Diplomat Tiga"
        Case "04"
            Prody = "Diplomat Dua"
    End Select
    TxtPrody = Prody
   
    NomorUrut = Right(Kode, 3)
    TxtNomorUrut = NomorUrut
End Sub

Source Code Aplikasi Entri Data Penjualan Laptop

Buat tampilan seperti dibawah ini

Kemudian masukan script dibawah ini

Private Sub CboKode_Click()
    Dim Merk, Harga, Kode As Variant
   
    Kode = Mid(CboKode.Text, 7, 5)
    Select Case Kode
    Case "MC965"
        Merk = "Apple MC965 MacBook Air"
        Harga = 12800000
    Case "MC966"
        Merk = "Apple MC966 MacBook Air"
        Harga = 15800000
    Case "MC968"
        Merk = "Apple MC968 MacBook Air"
        Harga = 9900000
    Case "MC969"
        Merk = "Apple MC969 MacBook Air"
        Harga = 11900000
    Case "MC700"
        Merk = "Apple MC700 MacBook Pro"
        Harga = 10800000
    Case "MC721"
        Merk = "Apple MC721 MacBook Pro"
        Harga = 15900000
    Case "MC723"
        Merk = "Apple MC723 MacBook Pro"
        Harga = 19300000
    Case "MC724"
        Merk = "Apple MC724 MacBook Pro"
        Harga = 13700000
    Case "MC311"
        Merk = "Apple MC311 MacBook Pro"
        Harga = 24200000
    Case "MC313"
        Merk = "Apple MC313 MacBook Pro"
        Harga = 11900000
    Case "MC314"
        Merk = "Apple MC314 MacBook Pro"
        Harga = 14700000
    Case "MC318"
        Merk = "Apple MC318 MacBook Pro"
        Harga = 17600000
    Case "MC322"
        Merk = "Apple MC322 MacBook Pro"
        Harga = 21300000
    End Select
    TxtMerk = Merk
    TxtHarga = Harga
End Sub

Private Sub CmdKeluar_Click()
    Unload Me
End Sub

Private Sub CmdLagi_Click()
    CboKode.SetFocus
    CboKode.Text = "Pilih Kode Laptop"
    TxtMerk.Text = ""
    TxtHarga.Text = ""
    TxtJual.Text = ""
    TxtHargaJual.Text = ""
    TxtDiskon.Text = ""
    TxtTotal.Text = ""
End Sub

Private Sub CmdProses_Click()
    Dim HS, Jual, Jumlah, Diskon, Total As Variant
    HS = Val(TxtHarga)
    Jual = Val(TxtJual)
    Jumlah = HS * Jual
    TxtHargaJual = Jumlah
   
    Select Case Jumlah
        Case Is > 140000000
            Diskon = Jumlah * 0.15
        Case Is > 135000000
            Diskon = Jumlah * 0.1
        Case Is > 130000000
            Diskon = Jumlah * 0.05
        Case Is > 125000000
            Diskon = Jumlah * 0.02
        Case Is <= 125000000
            Diskon = Jumlah * 0
    End Select
    TxtDiskon = Diskon
   
    Total = Jumlah - Diskon
    TxtTotal = Total
End Sub

Private Sub Form_Load()
    CboKode.AddItem "Apple MC965 MacBook Air"
    CboKode.AddItem "Apple MC966 MacBook Air"
    CboKode.AddItem "Apple MC968 MacBook Air"
    CboKode.AddItem "Apple MC969 MacBook Air"
    CboKode.AddItem "Apple MC700 MacBook Pro"
    CboKode.AddItem "Apple MC721 MacBook Pro"
    CboKode.AddItem "Apple MC723 MacBook Pro"
    CboKode.AddItem "Apple MC724 MacBook Pro"
    CboKode.AddItem "Apple MC311 MacBook Pro"
    CboKode.AddItem "Apple MC313 MacBook Pro"
    CboKode.AddItem "Apple MC314 MacBook Pro"
    CboKode.AddItem "Apple MC318 MacBook Pro"
    CboKode.AddItem "Apple MC322 MacBook Pro"
End Sub

Source Code Perhitungan Gaji Karyawan Dengan Visual Basic

Buat tampilan seperti dibawah ini

Kemudian masukan script dibawah ini
Private Sub CmdBatal_Click()
    TxtNama.SetFocus
    TxtNama = ""
    TxtNik = ""
    TxtGolongan = ""
    TxtKodeStatus = ""
    TxtStatus = ""
    TxtTahun = ""
    TxtJabatan = ""
    TxtBagian = ""
    TxtGajiPokok = ""
    TxtTunjangan = ""
    TxtTotalGaji = ""
End Sub

Private Sub CmdKeluar_Click()
    Unload Me
End Sub

Private Sub CmdLagi_Click()
    TxtNama.SetFocus
    TxtNama = ""
    TxtNik = ""
    TxtGolongan = ""
    TxtKodeStatus = ""
    TxtStatus = ""
    TxtTahun = ""
    TxtJabatan = ""
    TxtBagian = ""
    TxtGajiPokok = ""
    TxtTunjangan = ""
    TxtTotalGaji = ""
End Sub

Private Sub CmdProses_Click()
    Dim Golongan, KodeBagian, KodeStatus, Status, Tahun, Jabatan, Bagian, GajiPokok, Tunjangan As Variant
   
    Golongan = Mid(TxtNik.Text, 5, 1)
    TxtGolongan = Golongan
   
    KodeStatus = Mid(TxtNik.Text, 7, 1)
    TxtKodeStatus = KodeStatus
   
    If KodeStatus = "S" Then
        Status = "Single"
    ElseIf KodeStatus = "M" Then
        Status = "Menikah"
    ElseIf KodeStatus = "J" Then
        Status = "Janda"
    ElseIf KodeStatus = "D" Then
        Status = "Duda"
    End If
    TxtStatus = Status
   
    Tahun = Left(TxtNik.Text, 4)
    TxtTahun = Tahun
   
    Select Case Golongan
        Case "A"
            Jabatan = "Manager"
            GajiPokok = 4000000
            Tunjangan = 1025000
        Case "B"
            Jabatan = "Ka. Seksi"
            GajiPokok = 3500000
            Tunjangan = 975000
        Case "C"
            Jabatan = "Staff"
            GajiPokok = 3000000
            Tunjangan = 925000
    End Select
    TxtJabatan = Jabatan
    TxtGajiPokok = GajiPokok
    TxtTunjangan = Tunjangan
   
    KodeBagian = Right(TxtNik.Text, 3)
    Select Case KodeBagian
        Case "KEU"
            Bagian = "Accounting"
        Case "ADM"
            Bagian = "Administrasi"
        Case "SDM"
            Bagian = "General Affair"
        Case "EDP"
            Bagian = "IT Unit"
        Case "SPM"
            Bagian = "Security"
    End Select
    TxtBagian = Bagian
   
    TxtTotalGaji = GajiPokok + Tunjangan
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

Selasa, 29 Desember 2015

Source Code Membuat Aplikasi Perhitungan Tiket Sederhana Dengan Visual Basic

Buat tampilan seperti dibawah ini

Kemudian masukan script dibawah ini
Private Sub CmdBatal_Click()
    TxtNama.SetFocus
    TxtNama = ""
    TxtNik = ""
    TxtGolongan = ""
    TxtKodeStatus = ""
    TxtStatus = ""
    TxtTahun = ""
    TxtJabatan = ""
    TxtBagian = ""
    TxtGajiPokok = ""
    TxtTunjangan = ""
    TxtTotalGaji = ""
End Sub

Private Sub CmdKeluar_Click()
    Unload Me
End Sub

Private Sub CmdLagi_Click()
    TxtNama.SetFocus
    TxtNama = ""
    TxtNik = ""
    TxtGolongan = ""
    TxtKodeStatus = ""
    TxtStatus = ""
    TxtTahun = ""
    TxtJabatan = ""
    TxtBagian = ""
    TxtGajiPokok = ""
    TxtTunjangan = ""
    TxtTotalGaji = ""
End Sub

Private Sub CmdProses_Click()
    Dim Golongan, KodeBagian, KodeStatus, Status, Tahun, Jabatan, Bagian, GajiPokok, Tunjangan As Variant
   
    Golongan = Mid(TxtNik.Text, 5, 1)
    TxtGolongan = Golongan
   
    KodeStatus = Mid(TxtNik.Text, 7, 1)
    TxtKodeStatus = KodeStatus
   
    If KodeStatus = "S" Then
        Status = "Single"
    ElseIf KodeStatus = "M" Then
        Status = "Menikah"
    ElseIf KodeStatus = "J" Then
        Status = "Janda"
    ElseIf KodeStatus = "D" Then
        Status = "Duda"
    End If
    TxtStatus = Status
   
    Tahun = Left(TxtNik.Text, 4)
    TxtTahun = Tahun
   
    Select Case Golongan
        Case "A"
            Jabatan = "Manager"
            GajiPokok = 4000000
            Tunjangan = 1025000
        Case "B"
            Jabatan = "Ka. Seksi"
            GajiPokok = 3500000
            Tunjangan = 975000
        Case "C"
            Jabatan = "Staff"
            GajiPokok = 3000000
            Tunjangan = 925000
    End Select
    TxtJabatan = Jabatan
    TxtGajiPokok = GajiPokok
    TxtTunjangan = Tunjangan
   
    KodeBagian = Right(TxtNik.Text, 3)
    Select Case KodeBagian
        Case "KEU"
            Bagian = "Accounting"
        Case "ADM"
            Bagian = "Administrasi"
        Case "SDM"
            Bagian = "General Affair"
        Case "EDP"
            Bagian = "IT Unit"
        Case "SPM"
            Bagian = "Security"
    End Select
    TxtBagian = Bagian
   
    TxtTotalGaji = GajiPokok + Tunjangan
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

Source Code Membuat Aplikasi Penjualan Tiket Kereta Api

Buat tampilan seperti dibawah ini

Kemudian masukan script dibawah ini
Private Sub CmdKeluar_Click()
    Unload Me
End Sub

Private Sub CmdLagi_Click()
    TxtKt.SetFocus
    TxtKt = ""
    TxtHt = ""
    TxtJk = ""
    TxtJb = ""
    TxtJt = ""
    TxtTotal = ""
End Sub

Private Sub CmdProses_Click()
    Dim Kode, Harga, Jenis, Berangkat As Variant
   
    Kode = Left(TxtKt.Text, 3)
    Select Case Kode
        Case "BIM"
            Harga = 50000
            Jenis = "BIMA"
            Berangkat = "16.00"
        Case "EKO"
            Harga = 35000
            Jenis = "EKONOMI"
            Berangkat = "19.00"
        Case "MUT"
            Harga = 23000
            Jenis = "MUTIARA"
            Berangkat = "17.00"
        Case "SEN"
            Harga = 15000
            Jenis = "SENJA"
            Berangkat = "20.00"
    End Select
    TxtHt = Harga
    TxtJk = Jenis
    TxtJb = Berangkat
    TxtJt.SetFocus
End Sub

Private Sub TxtJt_KeyPress(KeyAscii As Integer)
    If KeyAscii = 13 Then
        TxtTotal = Val(TxtHt.Text) * Val(TxtJt.Text)
    End If
End Sub

Source Code Membuat Aplikasi Data Buku Sederhana Dengan Visual Basic

Buat Tampilan Seperti Dibawah ini

Kemudian masukan script dibawah ini

Private Sub CmdBatal_Click()
    CboKode.SetFocus
    CboKode = "Pilih Kode Buku"
    TxtJudul = ""
    TxtPengarang = ""
    TxtTerbit = ""
    TxtPenerbit = ""
    TxtHarga = ""
End Sub

Private Sub CmdKeluar_Click()
    Unload Me
End Sub

Private Sub CmdLagi_Click()
    CboKode.SetFocus
    CboKode = "Pilih Kode Buku"
    TxtJudul = ""
    TxtPengarang = ""
    TxtTerbit = ""
    TxtPenerbit = ""
    TxtHarga = ""
End Sub

Private Sub CmdProses_Click()
    Dim Kode, KodeBuku, KodePenerbit, KodeTahun, Tahun, Penerbit, Judul, Pengarang, Harga As Variant
   
    Kode = CboKode
    KodeBuku = Mid(Kode, 3, 3)
    Select Case KodeBuku
        Case "SIM"
            Judul = "Sistem Informasi Manajemen"
            Pengarang = "Yati Nur Oktavia"
            Harga = 75900
        Case "EDP"
            Judul = "Elektronik Data Processing"
            Pengarang = "Imam Tarmizi"
            Harga = 62000
        Case "MNJ"
            Judul = "Manajemen"
            Pengarang = "Valentina Mariana Adiwianti"
            Harga = 42000
        Case "CDR"
            Judul = "Corel Draw"
            Pengarang = "Riyan Suhandi"
            Harga = 53000
        Case "RPL"
            Judul = "Rekayasa Perangkat Lunak"
            Pengarang = "Sinta Umpu Singa"
            Harga = 83000
    End Select
    TxtJudul = Judul
    TxtPengarang = Pengarang
    TxtHarga = Harga
   
    KodePenerbit = Left(Kode, 1)
    Select Case KodePenerbit
        Case "A"
            Penerbit = "Andi Offset Yogyakarta"
        Case "I"
            Penerbit = "Indah Surabaya"
        Case "S"
            Penerbit = "Indah Surabaya"
        Case "E"
            Penerbit = "Elek Media Komputindo"
        Case "M"
            Penerbit = "Maxicom"
    End Select
    TxtPenerbit = Penerbit
   
    KodeTahun = Right(Kode, 2)
    Select Case KodeTahun
        Case "01"
            Tahun = "20" & KodeTahun
        Case "02"
            Tahun = "20" & KodeTahun
        Case "03"
            Tahun = "20" & KodeTahun
        Case "04"
            Tahun = "20" & KodeTahun
        Case "05"
            Tahun = "20" & KodeTahun
    End Select
    TxtTerbit = Tahun
End Sub

Private Sub Form_Load()
    CboKode.AddItem "A-SIM-01"
    CboKode.AddItem "I-EDP-02"
    CboKode.AddItem "S-MNJ-03"
    CboKode.AddItem "E-CDR-04"
    CboKode.AddItem "M-RPL-05"
End Sub

Rabu, 23 Desember 2015

3 Situs Belajar Pemrograman Web Gratis Yang Bakal Membuatmu Handal

Perkembangan internet membawa dampak positif dan negatif bagi kehidupan manusia. Untuk saat ini kita tidak akan membahas tentang dampak negatif yang ditimbulkan oleh internet. Kita akan membahas tentang salah satu dampak positif dari internet, yaitu mempermudah kita dalam belajar. Diinternet ada banyak situs yang menyediakan informasi tentang pembelajaran, khususnya tentang komputer dan pemrograman seperti tutorialkomputerlengkap.com. Bagi yang suka pemrograman ada situs-situs yang dapat menjadi media pembelajaran untuk belajar pemrograman secara otodidak.

Nah dari banyak situs tersebut, penulis memiliki rekomendasi untuk teman-teman yang akan belajar pemrograman khususnya pemrograman web untuk belajar dari situs berikut ini :

3 Situs Belajar Bahasa Pemrograman Yang Wajib Dikunjungi

1. Codecademy

Codecademy

Codecademy adalah situs untuk belajar website yang sangat menarik. Disamping tampilanya yang sangat interaktif, situs ini juga memiliki sistem seperti game RPG. Jadi kita akan memiliki level, dan level itu akan meningkat seiring dengan meningkatnya kemampuan kita. Kita akan disuguhkan materi untuk dipelajari, setelah selesai mempelajari materi kita akan dihadapkan pada ujian yang akan menaikan level kita. Tidak hanya itu, situs tersebut juga dapat mengoreksi kode yang kita tuliskan, apabila kita tidak menuliskan kode sesuai dengan yang diperintahkan, maka situs akan menunjukan jika terjadi kesalahan pada program yang ditulis.
Pada level awal, kita akan diajarkan tentang elemen-elemen website, kemudian pada level selanjutnya kita akan mulai mempelajari tentang dasar-dasar pemrograman web, kemudian berlanjut lagi hingga tahap akhir. Jika mengikuti dengan seksama, setelah lulus dari level akhir kita akan bisa membuat sebuah halaman website yang menarik.
Bahasa pemrograman yang diajarkan di situs ini diantaranya adalah HTML, HTML5, CSS, JavaScritp, JQuery, PHP, Ruby, Phyton. Dengan banyaknya bahasa pemrograman yang didukung, serta kemudahanya, penulis menempatkan Codecademy di urutan pertama dalam daftar ini. Bagi teman-teman yang ingin langsung mencoba silahkan langsung kunjungi situs Codecademy.

2. W3Schools

W3Schools
W3Schools merupakan daftar situs lainya yang wajib dikunjungi oleh para calon web programer. Situs ini menyediakan materi bahasa pemrograman yang cukup lengkap, diantaranya HTML, HTML5, CSS, JavaScritp, JQuery, PHP, SQL, ADO, XML, ASP, ASP.Net dan Ajax. Selain menyediakan materi pemrograman yang sangat lengkap, situs ini juga memiliki tampilan yang sangat interaktif, hampir sama dengan Codecademy, bahkan hasil dari kode program yang ditulis dapat langsung ditampilkan sehingga kita dapat mengetahui kesalahan yang terjadi. Situs ini juga memiliki dukungan yang sangat baik seperti forum tanya jawab. Bagi teman-teman yang ingin mencoba bisa mengunjugi situs W3Schools.

3. CodeSchool

CodeSchool
Hampir sama dengan situs Codecademy, memiliki tampilan yang interaktif. Sistem pembelajaran di CodeSchool juga mirip dengan Codecademy, hanya saja dukungan bahasa pemrograman yang disediakan lebih sedikit. Bahasa pemrograman yang disediakan antara lain HTML, CSS, Ruby JavaScript dan Objective C. Bagi yang ingin mencoba silahkan kunjungi langsung CodeSchool.

Itulah 3 situs Belajar Pemrograman Web yang penulis rekomendasikan. Apabila dipelajari dengan baik, dijamin setelah menyelesaikan materi teman-teman dapat menjadi web programer yang hebat. Sekian artikel ini, semoga bermanfaat.


Baca Juga :