Pertemuan 3, 23 februari 2015 : : Menghitung kalkulasi bensin

Pertama buka vb.netnya, kemudian buat program baru.dengan cara KLIK – NEW - PROJECT
Maka tampilan awal akan seperti gambar dibawah ini.



Pada jendela tampilan diatas pilih Windows Form Application,dan pada Nama,ganti dengan nama project yang ingin kita buat yaitu kalkulasi. pada Location pilih folder untuk menyimpan project lalu KLIK OK.maka akan tampil seperti gambar dibawah ini.




Kemudian Tool yang akan kita gunakan:
· 3 Label
· 3 Textbox
· 3 Button
Label 1 ubah properties text menjadi Full tank (liter)
Label 2 ubah properties text menjadi jarak yang bias dicapai (km)
Label 3 ubah properties text menjadi km/liter
Textbox1 text=(kosongkan)
Textbox2 text=(kosongkan)
Textbox3 text=(kosongkan)
Textbox1 namet=txtTank
Textbox2 name=txtJarak
Textbox3 name=txtBensin
Button1 ubah properties text menjadi kalkulasi
Button2 ubah properties text menjadi clear
Button3 ubah properties text menjadi exit
Button1 ubah properties name menjadi btnkalkulasi
Button2 ubah properties name menjadi btnclear
Button3 ubah properties name menjadi btnexit

Langsung saja membuat Desainya ok seperti gambar di bawah ini tinggal narik narik tool ke form lalu
ganti text nya dan name di propeties



Selanjutnya kita mulai membuat script kodenya.
Double Klik pada btnkalkulasi yang kalkulasi maka form baru akan tampil.lalu masukan kode script dibawah ini
Private Sub btnkalkulasi_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnkalkulasi.Click
txtBensin.Text = CInt(txtTank.Text) / CInt(txtJarak.Text)
End Sub
End Class
Seperti gambar dibawah ini


Selanjutnya kita mulai membuat script kodenya.

Double Klik pada btnclear yang kalkulasi maka form baru akan tampil.lalu masukan kode script dibawah ini

Private Sub btnClear_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnClear.Click
txtBensin.Clear()
txtJarak.Clear()
txtTank.Clear()
End Sub



Selanjutnya kita mulai membuat script kodenya.
Double Klik pada btnkalkulasi yang kalkulasi maka form baru akan tampil.lalu masukan kode script dibawah ini

Public Class Form1
Private Sub btnExit_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnExit.Click
Me.Close()
End Sub



Setelah selesai Coba di RUN atau tekan F5 pada keyboard anda.LIHAT HASILNYA.
Hasilnya seperti gambar dibawah ini yahhhhh!!! :)





Menghitung jumlah kursi yg di pesan dan total harga

- Buatlah dsign VB.net seperti di bawah



- Pilih hitung dan akan masuk ke halaman source code




- Lalu Masukan sorce code :
- Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim Hasil, Kursi, A, B, C, D As Integer
A = TextBox1.Text
B = TextBox2.Text
C = TextBox3.Text
D = TextBox4.Text
TextBox10.Text = TextBox1.Text * 150000
TextBox9.Text = TextBox2.Text * 90000
TextBox8.Text = TextBox3.Text * 70000
TextBox7.Text = TextBox4.Text * 50000
TextBox5.Text = A + B + C + D
TextBox6.Text = A * 150000 + B * 90000 + C * 70000 + D * 50000
End Sub

- Pilih clear dan akan masuk ke halaman source code




- Lalu Masukan sorce code :
- Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
TextBox1.Clear()
TextBox2.Clear()
TextBox3.Clear()
TextBox4.Clear()
TextBox7.Clear()
TextBox8.Clear()
TextBox9.Clear()
TextBox10.Clear()
TextBox5.Clear()
TextBox6.Clear()
End Sub

- Pilih exit dan akan masuk ke halaman source code



- Lalu Masukan sorce code :
- Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
Close()
End Sub
Kemudian coba run kaya gini gak? :)




Menampilkan salam dengan inputan nama
- Buatlah dsign VB seperti dibawah ini

- Pilih show generating dan akan masuk ke halaman source code



- Lalu masukan source code :
- Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Label.Text = "Hello " & TextName.Text
TextName.Clear()
End Sub

- Pilih exit dan akan masuk ke halaman source code


- Lalu masukan source code :
- Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
Close()
End Sub
Kemudian coba run yahhh :)

Menampilkan Hari dan Tanggal Lahir
- Buatlah dsign VB.net seperti di bawah

- Pilih Show Date dan akan masuk ke halaman source code


- Lalu Masukan sorce code :
- Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Label5.Text = TextBox1.Text & ", " & TextBox2.Text & " " & TextBox3.Text & ", " & TextBox4.Text()
End Sub
- Pilih Clear dan akan masuk ke halaman source code

- Lalu Masukan sorce code :
- Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
TextBox1.Clear()
TextBox2.Clear()
TextBox3.Clear()
TextBox4.Clear()
Label5.Text = String.Empty
End Sub
- Pilih Exit dan akan masuk ke halaman source code

Lalu Masukan sorce code :
- Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
Close()
End Sub
Sekrang coba Running masukkan data anda lalu tekan show date apa yang terjadi :)

Selamat mencoba tutorialnya :) 

Pertemuan 2, 16 february 2015 : Mengenal Visual basic 2010 dan Tutorial aplikasi Pembuatan menu makanan

Mengenal vb.net

Ada pepatah mengatakan tak kenal maka tak tahu, artinya kalau tidak
kenal maka harus kenalan dulu supaya tahu.
Nah sekarang saya akan sedikit perkenalkan dulu tentang VB.net ini.
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 menganut paradigma bahasa pemrograman berorientasi objek yang dapat dilihat sebagai evolusi dari Microsoft Visual Basic versi sebelumnya yang diimplementasikan di atas .NET Framework.

Apa saja yang anda perlukan untuk memulai belajar VB.NET ?

Ini yang anda perlu siapkan ketika anda ingin belajar VB.NET.

1. Komputer

·         processor 1.6 Ghz atau lebih tinggi

·         OS yang didukung Windows XP,VISTA,7,8,server2003,2008

·         Memori min 1 Gb dan saya sarankan memory diatas 2 Gb untuk kelancaran dan kenyamanan waktu membuat kode program

·         Hardisk min yang kosong 5 Gb

2. Code Editor

·         Visual Studio 2003

·         Visual Studio 2005

·         Visual Studio 2008

·         Visual Studio 2010

·         Visual Studio 2012

·         Visual Studio 2013

Pada tutorial ini saya menggunakan Visual Studio 2010 untuk prakteknya, dan pada tutorial ini saya akan fokuskan dulu pada pembuatan aplikasi Windows Formnya.



Tutorial Aplikasi pembuatan menu makanan


1. Pertama buka vb net 2010 atu bebas yang penting vb.net jalan

2. Pilih di menu Windows Form Application Visual basic

3. Isi pada kolom Nama, Trus OK

4. Buat Form seperti tampilan berikut



5. Kodenya seperti ini

Public Class Form1

Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
ListBox1.Items.Add(”Pagi”)
ListBox1.Items.Add(”Siang”)
ListBox1.Items.Add(”Malam”)
End Sub

Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
CheckedListBox1.Items.Add (”Tiwul”)
CheckedListBox1.Items.Add (”Nasi”)
CheckedListBox1.Items.Add (”Baso”)
Dim pilihan As String
pilihan = “Pilihanya….” + ListBox1.SelectedItem
TextBox1.Text = ListBox1.SelectedItem
MessageBox.Show(pilihan, “Menu saat ini adalah”, MessageBoxButtons.OK, MessageBoxIcon.Information)
End Sub

Private Sub Button2_Click (sender As System.Object, e As System.EventArgs) Handles Button2.Click
End
End Sub

Private Sub Button3_Click (sender As System.Object, e As System.EventArgs) Handles Button3.Click
Dim jumlah As Integer
jumlah = CheckedListBox1.CheckedItems.Count
MessageBox.Show(CStr(jumlah), “Pilihan Berjumlah”,
MessageBoxButtons.OK, MessageBoxIcon.Information)
If jumlah = 2 Then
CheckedListBox1. Items. Add (”Cukup”)
End If
End Sub
End Class

Coba di Debug ( Run ), jika benar hasilnya seperti ini






Deskripsi

Pada perusahaan dagang atau seperti restoran maupun toko kecil, transaksi penjualan memegang peranan penting yang menentukan tercapai tidaknya tujuan perusahaan oleh karena itu, diperlukan suatu sistem informasi yang baik agar proses transaksi berjalan dengan semestinya. Informasi yang tepat dan lengkap dapat mengarahkan dan memperlancar kegiatan operasional badan usaha tersebut salah satu toko

makanan yang menjual berbagai menu atau jenis makanan . Sejauh ini banyak proses transaksi dan jumlah peminat untuk membeli buku di toko tersebut masih dilakukan secara system manual (dalam buku), sehingga mempersulit dalam mengakses data yang disimpan baik masalah transaksi penjualan, pembelian, menu makan pemesanan lainnya.

Referensi :

http://ekosuhartono.blogdetik.com/contoh-program-sederhana-memilih-menu-makan-dengan-vbnet-10

http://kode.ilmuwebsite.com/2014/08/tahap-awal-belajar-visual-basic-net.html

http://id.wikipedia.org/wiki/Visual_Basic_.NET

Pertemuan 1, 9 February 2015 : Perkembangan Teknologi Internet

Perkembangan teknologi dan kecanggihan integrasi jaringan telah membuat #internet menjadi salah satu bagian penting dari kehidupan masyarakat dunia. Hal ini sepertinya bukan sebuah pernyataan yang berlebihan. Tengok saja betapa besarnya manfaat internet yang dirasakan oleh sebagian besar masyarakat kalangan menengah ke atas yang banyak memanfaatkan internet dalam aktivitas sehari-hari.

Tak ada hari yang dilewati tanpa menggenggam #smartphone di tangan, tanpa menggunakan fasilitas browser di laptop serta tanpa aktivitas bisnis lainnya yang membutuhkan integrasi jaringan internet. Internet bukan saja menjadi hak monopoli bagi kalangan eksekutif, namun sudah merambah dan mempengaruhi kepentingan masyarakat dari berbagai kalangan.

Apakah Anda sudah mengetahui sejarah perkembangan internet? Pasti banyak dari Anda yang belum mengetahui sejarah awal perkembangan internet hingga menjadi sistem teknologi raksasa seperti sekarang ini. Untuk itu mari luangkan sedikit waktu senggang anda untuk membaca ulasan mengenai sejarah perkembangan internet di dunia dan di Indonesia.

Dari Mana Internet Berasal?

Cikal bakal internet modern berasal dari jaringan komputer yang dibentuk oleh departemen pertahanan Amerika Serikat pada tahun 1969. Proyek jaringan komputer milik Amerika Serikat itu disebut  ARPANET (Advanced Research Project Agency Network). ARPANET dibuat untuk kepentingan militer dengan tujuan mengatasi masalah serangan nuklir dan mempercepat penyebaran informasi militer. Prinsip kerja ARPANET adalah menghubungkan beberapa software dan hardware komputer berbasis UNIX agar bisa melakukan komunikasi dalam jarak tertentu melalui saluran telepon.

Perkembangan pesat ARPANET membuat sistem ini diperkenalkan secara umum pada tahun 1972. ARPANET kemudian dibagi menjadi dua kelompok yakni MILNET untuk kepentingan militer dan ARPANET baru untuk kepentingan lainnya seperti sarana komunikasi di beberapa universitas. Gabungan dari kedua jenis jaringan tersebut adalah DARPA internet yang kini lebih populer dengan sebutan internet.

Internet masa kini sudah jauh lebih canggih dan dapat menjadi sarana komunikasi yang menghubungkan masyarakat dari belahan dunia mana pun. Sebuah teknologi besar yang lahir dari kepentingan akan sarana komunikasi militer akhirnya menjadi salah satu sarana yang menunjang komunikasi dan berbagai aktivitas masyarakat dunia.

Internet mempermudah seseorang untuk mengakses informasi dalam beragam bentuk seperti tulisan, gambar, suara, file audio visual atau bentuk informasi lainnya. Lalu bagaimana perkembangan internet sejak pertama kali masuk ke Indonesia?

Masa “Pra-sejarah” Internet di Indonesia

Hingga tahun 1985, upaya untuk membangun jaringan komputer dengan koneksi internet sudah mulai dilakukan di sekitar Eropa. Kala itu Eropa membuat EuropaNET dan EBONE sebagai sistem yang mengintegrasikan jaringan komputer berteknologi internet di kawasan Eropa. Perkembangan teknologi ini kemudian diikuti oleh sejumlah negara-negara kawasan Asia seperti Jepang, Cina, Korea dan India. Pada akhir dekade 80-an untuk pertama kalinya teknologi internet menjangkau kawasan negara Indonesia.

Pada awal perkembangannya di Indonesia, internet baru mencakup kegiatan yang bersifat hobi dan non-komersial. Pada awal tahun 1990-an hanya komunitas akademisi, mahasiswa serta ahli telekomunikasi saja yang menjadi segmentasi pengguna internet. Meski demikian, pembangunan infrakstruktur untuk menyambut teknologi internet tetap dilakukan secara gencar dan teliti.

Selanjutnya muncullah IndoNET sebagai salah satu Internet Service Provider (ISP) pertama di Indonesia yang menyediakan layanan jaringan internet. Momen tersebut merupakan salah satu momen berharga yang menorehkan sejarah baru dalam bidang penggunaan Internet di Indonesia.

Internet Indonesia di Masa Kini

Di masa kini, Indonesia menjadi salah satu negara yang memiliki jumlah pengguna internet terbesardi kawasan Asia. Gaya hidup masyarakat mulai bergeser dan memanfaatkan sejumlah fasilitas yang disediakan internet. Semua kalangan umur mulai dari anak kecil hingga orang-orang tua tak mau ketinggalan dalam memanfaatkan keberadaan jaringan internet. Bahkan sejumlah lembagaakademis pun turut membuat sistem teknologi baru yang mendukung proses pembelajaran agar tak kalah dengan pengaruh internet sebagai media hiburan.

Perkembangan internet di Indonesia juga turut membawa angin segar bagi perkembangan ISP. Sejumlah provider berlomba-lomba menarik perhatian para pengguna internet dengan menjanjikan tarif murah dan kecepatan koneksi yang prima.

Internet memang telah menjadi fasilitas yang mempengaruhi gaya hidup masyarakat. Namun perlu diingat bahwa hubungan sosial antar manusia tetap tak dapat ditandingi dengan kehebatan internet. Sebab manusia tidak dapat hidup sebagai internet geek yang anti-sosial dan hanya hidup mengandalkan kecanggihan internet.

Referensi :
https://www.maxmanroe.com/mengenal-sejarah-perkembangan-internet.html