Laman

Minggu, 06 Juli 2014

Program perhitungan nilai akhir dan progress bar VB.NET

aplikasi vb.net nilai akhir dengan tool box label, group box, progress bar, button beserta validasi nya....

Starting Form di tengah Pada VB.NET

Untuk membuat Form berada di tengah ( center windows location) maka caranya aktivkan kursor pada form kemudian ganti propeties yang ada di sebelah kiri yaitu pada Start Position ganti dengan CenterScreen.

Tahapan Membuat aplikasi (hello world) pada VB.NET windows application

Sekarang kita akan membuat aplikasi pada VB.NET windows application, disini saya menggunakan Visual Studio 2005 bila ada yang menggunakan Visual Studio 2008 atau Visual Studio 2010 tidak masalah karena coding dan tahapannya tidak jauh berbeda. oke langsung saja kita mulai tahapannya.
1. Buka program Visual Studio 2005 

Sabtu, 05 Juli 2014

Aplikasi menghitung Luas segi tiga, lingkaran dan balok Pada VB.NET 2005 Console Application

Aplikasi Luas segi tiga, lingkaran dan balok Pada VB.NET 2005 Console Application :

Imports System.Console
Module Module1
    Dim pilihan As Integer
    Dim jawab As Char
    Sub Main()

Source Code Jajar Genjang Pada VB.NET 2005 Console Application

Source Code Jajar Genjang Pada VB.NET 2005 Console Application :

Imports System.Console
Module Module1

    Sub Main()
        Dim A, B, C As Integer
        For A = 1 To 10
            For C = 1 To A
                Write(" ")
            Next C
            For B = 1 To 10
                Write("A")
            Next B
            WriteLine()
        Next A
        ReadLine()
    End Sub

End Module

Deret Angka (0-9) segitiga siku-siku terbalik Pada VB.NET 2005 Console Application

Deret Angka (0-9) segitiga siku-siku terbalik  Pada VB.NET 2005 Console Application :

Segi Tiga Siku-siku Ganjil Pada VB.NET 2005 Console Application

Segi Tiga Siku-siku Ganjil Pada VB.NET 2005 Console Application :

Imports system.Console
Module Module1

    Sub Main()
        Dim A, B As Integer
        For A = 1 To 9 Step 2
            For B = 1 To A Step 2
                Write(B & " ")
            Next B
            WriteLine()
        Next A
        WriteLine()
        ReadLine()
    End Sub

End Module

Aplikasi Rumah Sakit Barcode Pada VB.NET 2005 Console Application

Aplikasi Rumah Sakit Barcode Pada VB.NET 2005 Console Application :

Imports System.Console
Module Module1

Aplikasi Nilai Ujian Mahasiswa Pada VB.NET 2005 Console Application

Aplikasi Nilai Ujian Mahasiswa Pada VB.NET 2005 Console Application :
Imports System.Console
Module Module1

Aplikasi Perumahan Pada VB.NET 2005 Console Application

Aplikasi Perumahan Pada VB.NET 2005 Console Application :

Imports System.Console
Module Module1

    Sub Main()
        Dim no, nama, type As String
        Dim jumlah, daya, stb, stdawal, stdakhir, bkwh As Double
        WriteLine("DAFTAR REKENING LISTRIK PERUMAHAN ALAM SEMESTA BULAN MEI 2003 ")
        WriteLine("------------------------------------------------------------- ")
        Write(" MASUKAN NAMA        : ")
        nama = ReadLine()
        Write(" MASUKAN NO          : ")
        no = ReadLine()
        Write(" MASUKAN TYPE RUMAH  : ")

Aplikasi Nilai akhir Mahasiswa Pada VB.NET 2005 Console Application

Aplikasi Nilai akhir Mahasiswa Pada VB.NET 2005 Console Application :

Imports System.Console
Module Module1

    Sub Main()
        Dim nm, nmmk, ket As String
        Dim ntgs, nabsen, nuts, nuas, ntotal As Double
        WriteLine("NILAI AKHIR MAHASISWA")
        WriteLine("---------------------")
        Write(" MASUKAN NAMA ANDA   : ")
        nm = Readline()
        Write(" NAMA MATA KULIAH    : ")
        nmmk = ReadLine()
        Write(" MASUKAN NILAI TUGAS : ")
        ntgs = ReadLine()
        Write(" MASUKAN NILAI ABSEN : ")
        nabsen = ReadLine()
        Write(" MASUKAN NILAI UTS   : ")
        nuts = ReadLine()
        Write(" MASUKAN NILAI UAS   : ")

kode karcis barcode (Left Right Mid) Pada VB.NET 2005 Console Application

kode karcis kereta (Left Right Mid) barcode Pada VB.NET 2005 Console Application :

Deret Bilangan Ganjil Pada VB.NET 2005 Console Application

Deret Bilangan Ganjil Pada VB.NET 2005 Console Application :

Imports System.Console
Module Module1

    Sub Main()
        Dim bil, ganjil As Integer
        Dim f As Integer
        Write("masukan banyaknya deret : ")
        f = ReadLine()
        For bil = 1 To f
            ganjil = (2 * bil - 1)
            Write(ganjil & " ")
        Next
        ReadLine()
    End Sub

End Module

Segitiga Siku-siku Pada VB.NET 2005 Console Application

Segitiga Siku-siku Pada VB.NET 2005 Console Application :

Imports system.console
Module Module1

    Sub Main()
        Dim bil, k As Integer
        For bil = 1 To 10
            For k = 1 To bil
                Write("*")
            Next k
            WriteLine()
        Next bil
        WriteLine()
        ReadLine()
    End Sub

End Module

Deret bilangan penjumlahan angka genap Pada VB.NET 2005 Console Application

Deret bilangan penjumlahan angka genap Pada VB.NET 2005 Console Application :
Imports System.Console
Module Module1

    Sub Main()
        Dim q, i, b, j As Integer
        Write(" masukan banyaknya deret  : ")
        q = ReadLine()
        For i = 1 To q
            b = i * 2
            j = j + b
            If i = q Then
                Write(b & "=")
            Else
                Write(b & "+")
            End If
        Next
        WriteLine(j)
        ReadLine()
    End Sub

Deret Bilangan terbalik Pada VB.NET 2005 Console Application

Deret Bilangan terbalik Pada VB.NET 2005 Console Application :

Imports System.Console
Module Module1

    Sub Main()
        Dim bil As Integer
        For bil = 10 To 1 Step -1
            Write(bil & " ")
        Next
        ReadLine()
    End Sub

If (Condition) Then - 3 kondisi Pada VB.NET 2005 Console Application

If (Condition) Then - 3 kondisi Pada VB.NET 2005 Console Application :

Imports system.Console
Module module1
    Sub main()
        Dim nama, ket, mk As String
        Dim nilai As Integer

If (condition) then-bilangan terkecil Pada VB.NET 2005 Console Application

If (condition) then-bilangan terkecil Pada VB.NET 2005 Console Application :

Imports System.Console
Module Module1

    Sub Main()
        Dim Bil1, Bil2, bil As Double
        Write("MASUKAN BIL 1 : ")
        Bil1 = ReadLine()
        Write("MASUKAN BIL 2: ")
        Bil2 = ReadLine()
        If Bil1 > Bil2 Then
            bil = Bil2
        Else
            bil = Bil1
        End If
        WriteLine("BILANGAN TERKECILNYA ADALAH: " & bil)
        ReadLine()
    End Sub

End Module

Deret Angka Ke bawah / Vertical Pada VB.NET 2005 Console Application

Deret Angka Ke bawah Pada / Vertical VB.NET 2005 Console Application :

Imports System.Console
Module Module1

    Sub Main()
        Dim x = 1
20:     WriteLine(x)
        If x = 5 Then GoTo 40
        x = x + 1
        GoTo 20
40:     ReadLine()
        End
    End Sub

End Module

Jumat, 04 Juli 2014

Logika (for next goto step) Pada VB.NET 2005 Console Application

Logika (for next goto step) Pada VB.NET 2005 Console Application :
Imports System.Console
Module Module1

    Sub Main()
        Dim i As Integer
        For i = 10 To 1 Step -2
            If i = 5 Then GoTo 100
            Write("PUSING ")
        Next i
100:
        ReadLine()
    End Sub

End Module

Deret Angka Pada VB.NET 2005 Console Application

Deret Angka  Pada VB.NET 2005 Console Application
Imports System.Console
Module Module1

    Sub Main()
        Dim i As Integer
        For i = 2 To 10
            Write(i - 2)
        Next i
        ReadLine()
    End Sub

End Module

Operasi Bilangan Pada VB.NET 2005 Console Application

Operasi Penjumlahan,perkalian,pengurangan dan pembagian Pada VB.NET 2005 Console Application :
Imports System.Console
Module Module1

Logika GoTo2 Pada Vb.net 2005 Console Application

Logika GoTo2 Pada Vb.net 2005 Console Application :
Imports System.Console
Module Module1

    Sub Main()
        Dim i, j, k As Integer
        Clear()
        Write("SAYA")
        GoTo 50
        Write("SEDANG")
50:     For i = 1 To 3
            j = j + i
            If i = 1 Then GoTo 100
            Write("LAGI")
            k = i + j
        Next i
100:    Write(i + j + k)
        Write(k)
        ReadLine()
        End
    End Sub

End Module

Logika Go to 1 Pada VB.NET 2005 Console Application

Logika GoTo1 Pada Vb.net 2005 Console Application :

Imports System.Console
Module Module1

    Sub Main()
        Dim i As Integer
        For i = 1 To 10 Step 4
            If i >= 8 Then GoTo 100
            Write("Kamu ")
        Next i
100:
        Write("Kesini")
        ReadLine()
    End Sub

End Module

Aplikasi Kalkulator Sederhana Console VB.NET 2005


Disini kita akan membuat aplikasi kalkulator sederhana console VB.NET 2005 langsung saja ketik source code dibawah :
Module Module1

Tahapan Membuat Aplikasi Console Di VB.NET 2005 (Hello world)

Sebelum membuat aplikasi GUI (graphical user interface) yang kompleks biasanya programmer pemula akan belajar membuat aplikasi Console untuk mengasah logika yang menjadi dasar-dasar logika pemrograman pada sebuah aplikasi pemrograman disini kita akan membuatnya pada bahasa pemrograman VB.NET 2005 oke langsung saja kita kita mulai tahapannya.
1. Buka Aplikasi Visual Studio 2005 yang sudah terinstall

Tahapan dalam Pemrograman

Langkah-langkah yang dilakukan dalam menyelesaikan masalah dalam
pemrograman dengan komputer adalah:
1. Definisikan Masalah
Berikut adalah hal-hal yang harus diketahui dalam analisis masalah
supaya kita mengetahui bagaimana permasalahan tersebut:
a. Kondisi awal, yaitu input yang tersedia.
b. Kondisi akhir, yaitu output yang diinginkan.
c. Data lain yang tersedia.
d. Operator yang tersedia.
e. Syarat atau kendala yang harus dipenuhi.

Struktur Dasar Algoritma

Algoritma berisi langkah-langkah penyelesaian suatu masalah. Langkah-langkah
tersebut dapat berupa runtunan aksi (sequence), pemilihan aksi
(selection), pengulangan aksi (iteration) atau kombinasi dari ketiganya. Jadi
struktur dasar pembangunan algoritma ada tiga, yaitu:

Kaidah-Kaidah Umum Pembuatan Flowchart Program

Dalam pembuatan flowchart Program tidak ada rumus atau patokan yang
bersifat mutlak. Karena flowchart merupakan gambaran hasil pemikiran
dalam menganalisis suatu masalah dengan komputer. Sehingga flowchart
yang dihasilkan dapat bervariasi antara satu pemrogram dengan yang
lainnya.
Namun secara garis besar setiap pengolahan selalu terdiri atas 3 bagian
utama, yaitu:
􀂙 Input,
􀂙 Proses pengolahan dan
􀂙 Output

Penyajian Algoritma

Penyajian algoritma secara garis besar bisa dalam 2 bentuk penyajian yaitu
tulisan dan gambar. Algoritma yang disajikan dengan tulisan yaitu dengan
struktur bahasa tertentu (misalnya bahasa Indonesia atau bahasa Inggris)
dan pseudocode. Pseudocode adalah kode yang mirip dengan kode
pemrograman yang sebenarnya seperti Pascal, atau C, sehingga lebih tepat

Kamis, 03 Juli 2014

Menilai Sebuah Algoritma

Ketika manusia berusaha memecahkan masalah, metode atau teknik yang
digunakan untuk memecahkan masalah itu ada kemungkinan bisa banyak
(tidak hanya satu). Dan kita memilih mana yang terbaik di antara teknikteknik
itu. Hal ini sama juga dengan algoritma, yang memungkinkan suatu
permasalahan dipecahkan dengan metode dan logika yang berlainan. Yang
menjadi pertanyaan adalah bagaimana mengukur mana algoritma yang

Belajar Memprogram dan Belajar Bahasa Pemrograman

Belajar memprogram tidak sama dengan belajar bahasa pemrograman.
Belajar memprogram adalah belajar tentang metodologi pemecahan
masalah, kemudian menuangkannya dalam suatu notasi tertentu yang
mudah dibaca dan dipahami. Sedangkan belajar bahasa pemrograman
berarti belajar memakai suatu bahasa aturan-aturan tata bahasanya,

Mekanisme Pelaksanaan Algoritma oleh Pemroses

Komputer hanyalah salah satu pemroses. Agar dapat dilaksanakan oleh
komputer, algoritma harus ditulis dalam notasi bahasa pemrograman
sehingga dinamakan program. Jadi program adalah perwujudan atau
implementasi teknis algoritma yang ditulis dalam bahasa pemrograman
tertentu sehingga dapat dilaksanakan oleh komputer.
Kata “algoritma” dan “program” seringkali dipertukarkan dalam
penggunaannya. Misalnya ada orang yang berkata seperti ini: “program
pengurutan data menggunakan algoritma selection sort”. Atau pertanyaan

Kamis, 02 Januari 2014

Membuka Password Windows 7 Karena Lupa

Lupa adalah hal wajar bagi manusia, tapi bagaimana kalau lupa password windows 7 dan mereset password windows 7, ini tahapannya :
  • Masukan DVD/USB bootable windows 7 
  • Restart Komputer
  • Masuk ke Mode Repair