最近2018中文字幕在日韩欧美国产成人片_国产日韩精品一区二区在线_在线观看成年美女黄网色视频_国产精品一区三区五区_国产精彩刺激乱对白_看黄色黄大色黄片免费_人人超碰自拍cao_国产高清av在线_亚洲精品电影av_日韩美女尤物视频网站

RELATEED CONSULTING
相關(guān)咨詢
選擇下列產(chǎn)品馬上在線溝通
服務(wù)時(shí)間:8:30-17:00
你可能遇到了下面的問題
關(guān)閉右側(cè)工具欄

新聞中心

這里有您想知道的互聯(lián)網(wǎng)營(yíng)銷解決方案
vb.net注冊(cè)界面 vb設(shè)計(jì)注冊(cè)界面

請(qǐng)問用VB.NET中 如何將注冊(cè)窗口的用戶名和密碼傳遞給登錄窗口的用戶名和密碼?拜托了

建立一個(gè)模塊,在其中定義全局變量

成都創(chuàng)新互聯(lián)-專業(yè)網(wǎng)站定制、快速模板網(wǎng)站建設(shè)、高性價(jià)比廣德網(wǎng)站開發(fā)、企業(yè)建站全套包干低至880元,成熟完善的模板庫,直接使用。一站式廣德網(wǎng)站制作公司更省心,省錢,快速模板網(wǎng)站建設(shè)找我們,業(yè)務(wù)覆蓋廣德地區(qū)。費(fèi)用合理售后完善,10多年實(shí)體公司更值得信賴。

Public a as string

public b as string

然后在注冊(cè),登陸界面分別引用就好了

VB.NET 2008 速成版 注冊(cè)

頁面打不開?難道防火墻阻攔?一般不會(huì)取消對(duì)VS2008的支持吧,要不再你卸載界面下卸載看看有沒有注冊(cè)選項(xiàng),vs2008專業(yè)版在卸載的時(shí)候有注冊(cè)選項(xiàng)的

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

創(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注冊(cè)界面 vb設(shè)計(jì)注冊(cè)界面
分享路徑:http://fisionsoft.com.cn/article/dddigoh.html