請用vb.net寫一個模擬的登錄界面

解決方案資源管理器中右鍵菜單，添加，WINDOWS窗體，彈出的對話框中，左欄已安裝的模板中選擇WINDOWS FORMS ，右邊中找到 登錄窗體。添加 。程序會添加一個登錄界面。很方便。你試下。

崇禮網(wǎng)站制作公司哪家好，找創(chuàng)新互聯(lián)！從網(wǎng)頁設計、網(wǎng)站建設、微信開發(fā)、APP開發(fā)、響應式網(wǎng)站開發(fā)等網(wǎng)站項目制作，到程序開發(fā)，運營維護。創(chuàng)新互聯(lián)2013年開創(chuàng)至今到現(xiàn)在10年的時間，我們擁有了豐富的建站經(jīng)驗和運維經(jīng)驗，來保證我們的工作的順利進行。專注于網(wǎng)站建設就選創(chuàng)新互聯(lián)。

如何用vb做登錄界面

Dim Rs0 As New ADODB.Recordset

Dim Conn As New ADODB.Connection

Sql = "select * from 密碼表 where 用戶名='" Trim(Text1.Text) "' and 密碼='" Trim(Text2.Text) "'"

If Rs0.State = 1 Then Rs0.Close

Rs0.CursorLocation = adUseClient

Rs0.Open Sql, Conn

If Not Rs0.EOF And Not Rs0.BOF Then

Label1.Caption = "登 錄 成 功"

Else

Label1.Caption = "用戶名或密碼錯誤"

Exit Sub

End If

vb.net 用戶登錄

哈哈簡單哪

第一步：登陸網(wǎng)頁代碼

第二步：登陸以后判斷是否登陸成功

有兩種方法：1.獲取網(wǎng)頁代碼，判斷網(wǎng)頁字符有無”登陸成功”字樣

源代碼：

2.就是判斷網(wǎng)頁是否跳轉到了某一頁

源代碼：

兩種方法結合起來用，可以判斷網(wǎng)頁是否無法連接

用vb.net做一個系統(tǒng)的登錄界面，如何與access相連接？

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

Dim str As String = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" Application.StartupPath() "汽車出租管理系統(tǒng).mdb" Dim con As SqlClient.SqlConnection = New SqlClient.SqlConnection(str)

Try

con.Open()

Dim b As String = "Select * From Table1 Where 用戶名='" UsernameTextBox.Text "' And 密碼 = '" PasswordTextBox.Text "' "And 是否管理員 = '" True "'"

Dim sqlcmd As SqlClient.SqlCommand = New SqlClient.SqlCommand(b, con)

Dim dr As SqlClient.SqlDataReader

dr = sqlcmd.ExecuteReader

If dr.Read = True Then '判斷一條記錄為真

Form1.Show()

Me.Hide()

Else

MessageBox.Show("輸入信息有誤！", "提示")

PasswordTextBox.Text = ""

End If

Catch ex As Exception

MessageBox.Show(ex.Message)

End Try

當前標題：vb.net動態(tài)登錄界面 vb設置登錄程序
當前鏈接：http://www.chinadenli.net/article36/dopjjsg.html

成都網(wǎng)站建設公司_創(chuàng)新互聯(lián)，為您提供云服務器、微信公眾號、品牌網(wǎng)站設計、小程序開發(fā)、企業(yè)建站、域名注冊

廣告

聲明：本網(wǎng)站發(fā)布的內容（圖片、視頻和文字）以用戶投稿、用戶轉載內容為主，如果涉及侵權請盡快告知，我們將會在第一時間刪除。文章觀點不代表本網(wǎng)站立場，如需處理請聯(lián)系客服。電話：028-86922220；郵箱：631063699@qq.com。內容未經(jīng)允許不得轉載，或轉載時需注明來源： 創(chuàng)新互聯(lián)