Sebelumnya saya sudah bikin form dengan batasan hak akses.

1. form menu utama
2. form login
3. form petugas

nah disini saya ingin, ketika saya login sebagai admin semua menu otomatis hidup semua / bisa di akses oleh admin, sebaliknya jika saya login sebagai user ada menu - menu tertentu yang tidak bisa di akses oleh user.

pada form petugas saya membuat id petugas dengan autonomor misal PTG001 dst, dengan fild - fild sebagai berikut id_petugas, nm_petugas, hak_akses, pwd_petugas

Tetapi ketika saya jalankan program saya, dan login sebagi user menu - menu yang seharusnya sudah saya matikan itu ternyata ko' tidak mati. wowkwowk bikin pusing ini kepala

berikut sepengal kode Hak_akses??

Sub Hak_akses(Kode As String)
With MDIFrmmenu
Select Case Kode
Case 1
.mnupetugas.Enabled = False
.mnuproduk.Enabled = False
.mnulappenjualan.Enabled = False
.mnulapkaryawan.Enabled = False
End Select
End With
End Sub

di run program tidak ada error sama sekali..
tolong agan" master - master vb kasih solusinya
maklum masih newbie