如何用vb.net實現(xiàn)用戶登陸界面的操作？

select * from t1 where name=** and password=** and style=**

10年積累的網(wǎng)站設(shè)計制作、成都做網(wǎng)站經(jīng)驗，可以快速應(yīng)對客戶對網(wǎng)站的新想法和需求。提供各種問題對應(yīng)的解決方案。讓選擇我們的客戶得到更好、更有力的網(wǎng)絡(luò)服務(wù)。我雖然不認(rèn)識你，你也不認(rèn)識我。但先網(wǎng)站設(shè)計后付款的網(wǎng)站建設(shè)流程，更有蘭坪免費網(wǎng)站建設(shè)讓你可以放心的選擇與我們合作。

如果查詢到的表是空的，說明登陸錯誤，否則成功

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

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

基于VB.NET的windows窗體程序如何連接sql2008數(shù)據(jù)庫，制作一個登錄界面

這個問題好寬泛，簡單說下步驟吧：

簡單來說，直接連接需要使用SQLConnection、SQLDataAdapter、SQLCommand、Datatable四個控件，先寫好連接字符串，然后建立連接，寫好SQL語句，通過DataAdapter從數(shù)據(jù)庫讀取數(shù)據(jù)到Datatable。這樣只有在SQL服務(wù)器中附加數(shù)據(jù)庫才能實現(xiàn)訪問。還可以使用DSN實現(xiàn)數(shù)據(jù)庫連接，控件依次更換為ODBCConnection、ODBCDataAdapter、ODBCCommand、datatable、基本步驟和上面說的一樣。

SQL語句就是從數(shù)據(jù)庫查用戶名對應(yīng)的密碼，將數(shù)據(jù)從數(shù)據(jù)庫讀取到DataTable后，與用戶輸入的密碼比對，相符則登陸成功，否則提示錯誤。

過程中的細節(jié)問題歡迎追問

vb.net 用戶登錄

哈哈簡單哪

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

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

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

源代碼：

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

源代碼：

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

用vb.net ，后臺用access 做一個登錄窗口

建個模塊， Dim varcnn As OleDb.OleDbConnection ReadOnly Property cnn() As OleDb.OleDbConnection

Get

If varcnn Is Nothing OrElse varcnn.State ConnectionState.Open Then Dim cnstr As String = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=""" My.Application.Info.DirectoryPath "\Contact.mdb"";Persist Security Info=True"

varcnn = New OleDbConnection(cnstr)

varcnn.Open()

End If

Return varcnn

End Get

登錄窗體，新建一個就行了。代碼Public Class LoginForm1

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

Using cmd As New OleDb.OleDbCommand("select password from tbuser where userid =?", cnn)

cmd.Parameters.Add("?", OleDbType.VarChar).Value = Me.UsernameTextBox.Text

Dim obj As Object = cmd.ExecuteScalar

If (Not IsDBNull(obj)) AndAlso (obj IsNot Nothing) AndAlso obj = PasswordTextBox.Text Then

Me.DialogResult = Windows.Forms.DialogResult.OK

Else MessageBox.Show("密碼不正確！") Return

End If

End Using Me.Close()

End Sub Private Sub Cancel_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Cancel.Click

Me.DialogResult = Windows.Forms.DialogResult.Cancel

Me.Close()

End SubEnd Class 項目屬性里點查看應(yīng)用程序事件，寫代碼Namespace My ' 以下事件可用于 MyApplication:

'

' Startup: 應(yīng)用程序啟動時在創(chuàng)建啟動窗體之前引發(fā)。

' Shutdown: 在關(guān)閉所有應(yīng)用程序窗體后引發(fā)。如果應(yīng)用程序異常終止，則不會引發(fā)此事件。

' UnhandledException: 在應(yīng)用程序遇到未處理的異常時引發(fā)。

' StartupNextInstance: 在啟動單實例應(yīng)用程序且應(yīng)用程序已處于活動狀態(tài)時引發(fā)。

' NetworkAvailabilityChanged: 在連接或斷開網(wǎng)絡(luò)連接時引發(fā)。

Partial Friend Class MyApplication

Private Sub MyApplication_Startup(ByVal sender As Object, ByVal e As Microsoft.VisualBasic.ApplicationServices.StartupEventArgs) Handles Me.Startup

Dim f As New LoginForm1

If Not f.ShowDialog = DialogResult.OK Then

End

End If

End Sub End ClassEnd Namespace

你測試一下吧。

新聞標(biāo)題：關(guān)于vb.net實現(xiàn)登錄界面的信息
網(wǎng)站路徑：http://chinadenli.net/article46/hipeeg.html

成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián)，為您提供外貿(mào)網(wǎng)站建設(shè)、網(wǎng)站內(nèi)鏈、網(wǎng)站收錄、品牌網(wǎng)站建設(shè)、手機網(wǎng)站建設(shè)、網(wǎng)站策劃

廣告

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