Sunday, December 16, 2012

TUTORIAL MEMBUAT MENU UTAMA


1.      Pilih menu project -> MDI Form

2.      Pilih menu Tols -> Menu Editor
3.      Atur properties pada Menu Editor
= Untuk Memilih menu ke bawah
= Untuk membuat menu dan sub menu
Caption
Name
Form
Frm
…..Biodata
Fbiodata
…..Mata Kuliah
Fmk
…..Nilai
Fnilai
Laporan
Laporan
…..Data Mahasiswa
L_biodata
.....Nilai Siswa
L_nilai
About
About
Klik OK

Code program untuk menampilkan form

Private Sub biodata_Click()
Form2.Show
End Sub
Private Sub biodata_Lap_Click()
'DataReport1.Show
CR.ReportFileName = App.Path & "\Laporan_Biodata.rpt"
CR.WindowState = crptMaximized
CR.RetrieveDataFiles
CR.Action = 1
End Sub
Private Sub keluar_Click()
psn = MsgBox("Anda yakin mau keluar?", vbYesNo + 32, "Konfirmasi")
    If psn = vbYes Then
    End
    End If
End Sub
Private Sub matakulliah_Click()
Form1.Show
End Sub
Private Sub matakulliah_Lap_Click()
DataReport2.Show
End Sub

No comments:

Post a Comment