Kamis, 09 April 2015

Haiiii brooooo shareeee for youuu....



Langkah-langkah megoperasikan aplikasi visual studio 2010:

1.       Membuka aplikasi visual studio 2010 dengan cara double klik pada dekstop
Kemudian akan muncul tampilan sbb:


2.kemudian pilih new project pada layar tersebu, kemudian akan tampil layar sbb:






3.kemudian double klik windows form application   visual basic seperti yang tertera pada gambar di atas, setelah anda memilih icon tersebut maka akan muncul tampilan sbb:



4. jika menu properties belum aktip maka kita dapat mengaktipkannya dengan cara klik menu view yang tertera di menu bar kemudian pilih properties atau bisa juga dengan cara tekan f4 pada keyboard.

5. Sekarang kita sudah berada di lembar kerja aplikasi visual studio (VB) 2010 dan langkah-langkah pertama yang akan kita lakukan adalah dengan cara double klik pada formnya kemudian mengubah nama form dengan nama LATIHAN 1, dimana form yang belum dirubah berbentuk seperti gambar berikut:











Dan setelah dirubah dengan nama LATIHAN 1 dengan cara ketik di coodingnya yaitu: me.text=”LATIHAN 1”  maka nama formnya akan berubah menjadi seperti gambar berikut:


 

6. selanjutnya kita akan klik label pada menu yang ada pada properties kemudian double klik pada form tersebut sehingga akan tampil seperti gambar berikut:







7. kemudian kita akan mengganti nama label dengan nama “Belajar pemrograman VB 2010” dengan ketik pada codingnya label1.text=”belajar pemrograman VB 2010”  seperti yang terlihat pada gambar dibawah:



Setelah di run akan muncul seperti gambar berikut:








8.kemudian kita membuat label 2 seperti cara membuat label 1 di atas dengan ketik di coding yaitu: ”label2.text=”masukan kalimat kedalam textbox dibawah”


 


Setelah di run akan muncul output sbb:






9. kemudian kita buat label 3 dan button1, dimana coding untuk label 3 dikosongkan dan kita ketik di coding yaitu label3.text=” “  dan untuk button 1 kita rubah namanya dengan ketik di coding yaitu:button1.text=”proses”


Dan setelah di run akan muncul output sbb:











10. kemudian membuat button pada form dengan mengklik button pada properties kemudian double klik pada button dan ketik pada coding yaitu label3.text=textbox1.text
setelah itu kita membuat 4 radio button yang ada di properties pada form LATIHAN 1 dengan ketik di coding dibawah

Setelah di run akan muncul output sbb:

           





Agar tulisan yang kita input menghasilkan output berwarna maka kita double klik pada  setiap radio button pada form kemudian ketik di codingnya seperti gambar dibawah:




Setelah di run akan muncul output sbb: sesuai pilihan warna yang diinginkan.

                                                                          
                                                                              






11. kemudian ketik coding
Public Class Form1
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Me.Text = "LATIHAN 1"
        Label1.Text = "Belajar pemrograman VB 2010"
        Label2.Text = "masukan kalimat ke dalam textbox dibawah"
        Label3.Text = "....... "
        Button1.Text = "proses"
        GroupBox1.Text = "jenis hurup"
        GroupBox2.Text = "warna"
        RadioButton1.Text = "merah"
        RadioButton2.Text = "kuning"
        RadioButton3.Text = "hijau"
        RadioButton4.Text = "biru"
        RadioButton1.ForeColor = Color.Red
        RadioButton2.ForeColor = Color.Yellow
        RadioButton3.ForeColor = Color.Green
        RadioButton4.ForeColor = Color.Blue
        CheckBox1.Text = "italic"
        CheckBox2.Text = "bold"
        CheckBox3.Text = "underline"
        CheckBox4.Text = "strike out"






    End Sub
    Private Sub Label2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Label2.Click

    End Sub

    Private Sub Label3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Label3.Click

    End Sub

    Private Sub TextBox2_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs)

    End Sub

    Private Sub Label1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Label1.Click

    End Sub



    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Label3.Text = TextBox1.Text
    End Sub

    Private Sub RadioButton1_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles RadioButton1.CheckedChanged
        Label3.ForeColor = Color.Red
    End Sub

    Private Sub RadioButton2_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles RadioButton2.CheckedChanged
        Label3.ForeColor = Color.Yellow

    End Sub

    Private Sub RadioButton3_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles RadioButton3.CheckedChanged
        Label3.ForeColor = Color.Green
    End Sub

    Private Sub RadioButton4_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles RadioButton4.CheckedChanged
        Label3.ForeColor = Color.Blue
    End Sub

    Private Sub CheckBox1_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CheckBox1.CheckedChanged
        Label3.Font = New Font(Label3.Font.Name, Label3.Font.Size, Label3.Font.Style Xor FontStyle.Italic)
    End Sub

    Private Sub GroupBox2_Enter(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles GroupBox2.Enter

    End Sub

    Private Sub CheckBox2_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CheckBox2.CheckedChanged
        Label3.Font = New Font(Label3.Font.Name, Label3.Font.Size, Label3.Font.Style Xor FontStyle.Bold)
    End Sub

    Private Sub CheckBox3_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CheckBox3.CheckedChanged
        Label3.Font = New Font(Label3.Font.Name, Label3.Font.Size, Label3.Font.Style Xor FontStyle.Underline)
    End Sub

    Private Sub CheckBox4_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CheckBox4.CheckedChanged
        Label3.Font = New Font(Label3.Font.Name, Label3.Font.Size, Label3.Font.Style Xor FontStyle.Strikeout)
    End Sub
End Class







12. terakhir setelah di run maka akan tampil output sbb:

Selamat mencoba semoga berhasil dan mohon maaf jika penjelasan di atas ada kekeliruan karena itu keterbatasan saya.

Tidak ada komentar:

Posting Komentar