vb.net注冊(cè)界面設(shè)計(jì) vb設(shè)計(jì)注冊(cè)頁(yè)面

如何用vb設(shè)計(jì)一個(gè)用戶注冊(cè)界面

Private Sub Command1_Click()

中方ssl適用于網(wǎng)站、小程序/APP、API接口等需要進(jìn)行數(shù)據(jù)傳輸應(yīng)用場(chǎng)景，ssl證書(shū)未來(lái)市場(chǎng)廣闊！成為成都創(chuàng)新互聯(lián)的ssl證書(shū)銷售渠道，可以享受市場(chǎng)價(jià)格4-6折優(yōu)惠！如果有意向歡迎電話聯(lián)系或者加微信：18982081108（備注：SSL證書(shū)合作）期待與您的合作！

Static i As Integer

If Text1.Text = "" And Text2.Text = "" Then

MsgBox "請(qǐng)輸入用戶名和密碼", vbOKOnly, "提示"

Text1.SetFocus

Exit Sub

End If

If Text1.Text = "admin" And Text2.Text = "admin" Then

MsgBox "用戶名密碼正確", vbOKOnly, "提示"

i = 0

Else

Text1.SelStart = 0

Text1.SelLength = Len(Text1.Text)

Text1.SetFocus

If i 3 Then

MsgBox "用戶名或密碼錯(cuò)誤，請(qǐng)重新輸入", vbOKOnly, "提示"

i = i + 1

End If

If i = 3 Then

MsgBox "輸入3次錯(cuò)誤用戶名或密碼，程序?qū)⑼顺?, vbOKOnly, "提示"

Unload Me

End If

End If

End Sub

Private Sub Form_Load()

Label1.Caption = "用戶名"

Label2.Caption = "密 碼"

Text1.Text = ""

Text2.Text = ""

Text2.PasswordChar = "*"

Command1.Caption = "確定"

End Sub

求教vb.net用戶注冊(cè)功能大概應(yīng)該怎么實(shí)現(xiàn)。

你去學(xué)習(xí)如何建立窗體，如何調(diào)出窗體，隱藏窗體，等等，就可以了。如果這個(gè)些不會(huì)，你就沒(méi)法做成注冊(cè)的。

求一份VB.NET的注冊(cè)頁(yè)面的代碼

創(chuàng)建完相應(yīng)的用戶名，密碼控件之后，輸入以下代碼：

Imports System.Data.OleDb

Public Class Form1

Private Sub cmdok_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmdok.Click

Dim m_username As String

Dim m_userpwd As String

Dim cmd_result As MsgBoxResult

Dim m_da As New OleDbDataAdapter

Dim m_ds As New DataSet

Dim m_command As New OleDbCommand

Dim strsql As String

m_username = txtusername.Text

m_userpwd = txtuserpwd.Text

strsql = " select * from user_info where username='" m_username "' and userpwd='" m_userpwd "'"

OleDbConnection1.Open()

m_command.CommandType = CommandType.Text

m_command.CommandText = strsql

m_command.Connection = OleDbConnection1

m_da.SelectCommand = m_command

m_da.Fill(m_ds, "user_info")

If m_ds.Tables("user_info").Rows.Count 0 Then

cmd_result = MsgBox("歡迎登錄", MsgBoxStyle.OKOnly, "提示")

Else

MsgBox("登錄失敗，請(qǐng)確認(rèn)用戶名和密碼")

End If

End Sub

End Class

vb.net界面設(shè)計(jì) 的工具欄里的一些基本圖標(biāo)，比如打開(kāi)、保存、復(fù)制怎么添加??？

用格式轉(zhuǎn)換器(格式工廠)把ico格式轉(zhuǎn)換成其他可識(shí)別的格式

然后在添加

下一步(你的意思是要在界面設(shè)計(jì)中 往窗體上添加工具欄嗎?)

工具箱中 ---- 菜單和工具欄 ----- MenuStrip

窗體上方出現(xiàn) '請(qǐng)?jiān)俅捂I入'(vs2010中) 的框框 點(diǎn)一下就可以放"打開(kāi)"什么的了

右面屬性中找到Image屬性.可以更改你自己的圖片了.

知道了嗎?

還有疑問(wèn)你就追問(wèn) ````赫赫

怎么用VB設(shè)計(jì)一個(gè)登陸界面？

1.首先添加2個(gè)label控件，一個(gè)caption為用戶名，一個(gè)為密碼然后分別在2個(gè)label控件后面添加一個(gè)text控件，

2.將text的text屬性設(shè)置為空再添加2個(gè)button按鈕，一個(gè)名為登陸，一個(gè)名為取消簡(jiǎn)要代碼如下：

private sub text2_change() sswordchar="*"end subprivate sub button1_click()if text1.text="text" and text2.text="123456" then '這里寫驗(yàn)證代碼... ?'通過(guò)驗(yàn)證后要干么elsemsgbox("用戶名或者密碼不正確！")end if end subprivate sub button2_click()endend sub

網(wǎng)站題目：vb.net注冊(cè)界面設(shè)計(jì) vb設(shè)計(jì)注冊(cè)頁(yè)面
當(dāng)前路徑：http://muchs.cn/article16/dosdhgg.html

成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián)，為您提供定制開(kāi)發(fā)、關(guān)鍵詞優(yōu)化、網(wǎng)站收錄、云服務(wù)器、靜態(tài)網(wǎng)站、自適應(yīng)網(wǎng)站

廣告

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