مشکل در کد

[soniarose]

سلام من کد زیر رو برای ورود افراد به برنامه قرار دادم
ولی میخوام وقتی user, pass درست وارد میشه و فرم شروع باز میشه خود فرم login بسته شه ولی طبق کد من وقتی فرم login بسته میشه فرم بعدی هم به همراه اون بسته میشه لطفا راهنمایی کنید

Dim cmd As New SqlClient.SqlCommand("select count(*) from table2 where name='" & TextBox1.Text & "' and password='" & TextBox2.Text & "'", con)

        Con.Open()

        If cmd.ExecuteScalar = 1 Then

            Form5.Show()

            Me.Close()

        ElseIf cmd.ExecuteScalar = 0 Then

            MsgBox("اطلاعات نام کاربری یا رمز عبور اشتباه است")

        End If

        con.Close()

[fazelm]

سلام من کد زیر رو برای ورود افراد به برنامه قرار دادم
ولی میخوام وقتی user, pass درست وارد میشه و فرم شروع باز میشه خود فرم login بسته شه ولی طبق کد من وقتی فرم login بسته میشه فرم بعدی هم به همراه اون بسته میشه لطفا راهنمایی کنید

Dim cmd As New SqlClient.SqlCommand("select count(*) from table2 where name='" & TextBox1.Text & "' and password='" & TextBox2.Text & "'", con)

        Con.Open()

        If cmd.ExecuteScalar = 1 Then

            Form5.Show()

            Me.Close()

        ElseIf cmd.ExecuteScalar = 0 Then

            MsgBox("اطلاعات نام کاربری یا رمز عبور اشتباه است")

        End If

        con.Close()

اون فرم لوگین فرم اصلیت هست که بسته شدن اون تمام برنامه بسته میشه

برای درست کردن این مشکل یا باید بنویسی :
me.hide()
یا فرم اصلیت رو تغییر بدی
البته راه اول منطقی تره

[majidsoft]

با سلام
البته اگه LOGIN FORM را HIDE کردی هنگام بستن برنامه باید از دستور aplication.exit استفاده کنی یا فرم ورود را dispose کنی

[fazelm]

با سلام
البته اگه LOGIN FORM را HIDE کردی هنگام بستن برنامه باید از دستور aplication.exit استفاده کنی یا فرم ورود را dispose کنی

یا بنویسی :

form1.close()

بجای form1 اسم همون فرم login رو بنویس

[غلامرضا شریفی]

بعد از con.close

Dim form2 AsNew form2
form2.Show()
Me.Hide()

را قرار بده در موقع خروج بايد در رويداد
form2_Disposed فقط end را بنويس از برنامه كامل خارج ميشويد