Form đăng nhập trong vb.net

nguyen · May 10, 2016, 3:16am

e có cái form đăng nhập vs form hệ thống như hình.giờ muốn khi đăng nhập thành công thì chỗ quản lí kia mới được phép hoạt động
trong form load của form hệ thống e cho QuảnLíToolStripMenuItem.Enabled = False
trong nút đăng nhập
Private Sub btndangnhap_Click(sender As Object, e As EventArgs) Handles btndangnhap.Click

    Dim a As New hệ_thống
    Dim ketn As New ketnoi
    If ketn.ktketnoi(txttaikhoan.Text, txtmatkhau.Text) Then
        MessageBox.Show("Bạn đã đăng nhập thành công")
        a.QuảnLíToolStripMenuItem.Enabled = True
        Me.Hide()

    Else
        MessageBox.Show("Lỗi đăng nhập!")
        txttaikhoan.Text = ""
        txttaikhoan.Focus()
    End If
End Sub

trong phần if e cho a.QuảnLíToolStripMenuItem.Enabled = True mà vẫn không được.
AI biết giúp e vơi được không ạ.Thank
P/s:e cho form đăng nhập kế thừa public form hệ thống để sử dụng QuảnLíToolStripMenuItem

Duong_Act · May 10, 2016, 1:17am

Tại vì cậu đã khai báo :

Dim a As new Hethong

Nên a trong là cái Form chính mới được tạo ra chứ không phải Form chính cũ nên không có tác dụng.

=> Có thể gán trực tiếp vào Form chính :

FormChinh.QuảnLíToolStripMenuItem.Enabled = True

Nếu không có thể khai báo một biến dạng Form chính trong Form đăng nhập rồi khi từ Form chính Show Form đăng nhập lên thì gán biến này bằng Form chính :

Trên Form đăng nhập :

Public a As Hethong 'không có = New Hethong'

Trên Form chính :

Dim FrmLogin As FormDangNhap = New FormDangNhap ' tạo một Form đăng nhập mới.'
FrmLogin.a = Me ' gán biến a trong Form đăng nhập là Form chính.'

Bây giờ từ Form đăng nhập có thể điều khiển về Form chính bằng cách :

a.QuảnLíToolStripMenuItem.Enabled = True

nguyen · May 10, 2016, 3:14am

ok để mình thử.thank bạn nhé

nguyen · May 10, 2016, 11:16am

Public a As Hethong ‘không có = New Hethong’
Trên Form chính :

Dim FrmLogin As FormDangNhap = New FormDangNhap ’ tạo một Form đăng nhập mới.’
FrmLogin.a = Me ’ gán biến a trong Form đăng nhập là Form chính.’
a.QuảnLíToolStripMenuItem.Enabled = True
cách này mình làm k được
FormChinh.QuảnLíToolStripMenuItem.Enabled = True(cách này làm cũng k dc
)