Kamis, 09 Juni 2011

Membuat Menu

Klik kanan project anda>>Add->New Item-> pilih “MDI Parent Form”
Maka tampil seperti ini

Kemudian bila diinginkan, ubah nama menu tersebut sesuai nama yang akan ditampilkan

Lalu ketikkan coding berikut , dengan sebelumnya klik 2X pada desisgn untuk masuk ke coding

Imports System.Windows.Forms

Public Class MDIParent1

Private Sub ShowNewForm(ByVal sender As Object, ByVal e As EventArgs)Handles NewToolStripMenuItem.Click, NewToolStripButton.Click, NewWindowToolStripMenuItem.Click

crystal_report_view.Show()

End Sub

End Class

Keterangan :

crystal_report_view.Show()

Bagian potongan sintax diatas adalah nama form yang akan ditampilkan didalam menu ketika user akan membukanya.

Membuat Form Login

Pada kesempatan kali ini kiata akan latihan membuat form login dengan sederhana, data langsung di input dalam coding bkn dlm database

Klik kanan pada project yg kita buat >>add>>new item

Pilih windows form>>form login>>add


Maka akan terbentuk sbb :

Klik 2X button OK, kemudian masukkan sintak berikut :

Public Class LoginForm1

Private Sub OK_Click(ByVal sender As System.Object, ByVal e AsSystem.EventArgs) Handles OK.Click

If UsernameTextBox.Text = "arief wicaksono" And PasswordTextBox.Text = "wongateleng" Then

MDIParent1.Show()

Me.Visible = False

Else

MsgBox("login gagal,coba ulangi lagi")

End If

End Sub

Private Sub Cancel_Click(ByVal sender As System.Object, ByVal e AsSystem.EventArgs) Handles Cancel.Click

Me.Close()

End Sub

End Class

Selanjutnya kita coba

 
cursor: url("http://kursor_anda.gif"), default;