Monday, December 15, 2014

Yuk! Belajar Pemrograman Visual Basic dot Net Di Mesran.Net

Posted by Unknown at 1:19 AM 0 comments
Selesaikanlah Kasus Berikut :
JUDUL SOAL : Tugas Praktikum PENJUALAN KREDIT MOBIL (Pelajaran di Kelas)

Desain Program
















Berikut Jawaban Program :

Sunday, December 14, 2014

Penggunaan Keypress pada Visual Basic Net 2008

Posted by Unknown at 9:07 PM 2 comments
      Disini Saya akan menjelaskan bagaimana cara penggunaan tombol keypress pada Vb 2008.

kalau biasanya kita menggunakan Event Click dan mengikutsertakan Button  pada Vb 2008 untuk menghasilkan Event yang kita inginkan muncul di Textbox lain,Disini dengan menggunakan Event Keypress,kita hanya perlu menekan ENTER ,maka Event yang kita inginkan akan muncul di Textbox yang lain.

                      Misal terdapat 2 TextBox

Kursor aktif di TextBox1, sehingga akan di ENTER di TextBox1 akan muncul ke TextBox2, maka pada layar design anda harus double click TextBox1, kemudian pilih Event Keypress sehingga menjadi berikut ini :

Buat Design dulu ya !!!














Double Click Pada Textbox1





Pada Event TextChanged pilih Event Keypress


 Maka Akan muncul tampilan seperti Di atas.

Public Class Form1

    Private Sub TextBox1_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TextBox1.KeyPress
        Dim Tombol As Integer = Asc(e.KeyChar)
        If Tombol = 13 Then TextBox2.Focus()
    End Sub

End Class

Penjelasan:

Dim Tombol As Integer berguna untuk mendefinisikan variabel tombol sebagai jenisnya Integer dan kemudian di isikan nilai ASC dari karakter yang ditekan ( Asc(e.Keychar) )

If Tombol = 13 Then, berguna untuk membandingkan apabila yang ditekan yaitu tombol ENTER (13 untuk mewakili ASC dari ENTER), apabila ENTER yang ditekan, maka TextBox2 di Fokuskan dengan perintah TextBox2.Focus()

 

Blog Komputer Template by Ipietoon Blogger Template | Cerita Komputer