网创优客建站品牌官网
为成都网站建设公司企业提供高品质网站建设
热线:028-86922220
成都专业网站建设公司

定制建站费用3500元

符合中小企业对网站设计、功能常规化式的企业展示型网站建设

成都品牌网站建设

品牌网站建设费用6000元

本套餐主要针对企业品牌型网站、中高端设计、前端互动体验...

成都商城网站建设

商城网站建设费用8000元

商城网站建设因基本功能的需求不同费用上面也有很大的差别...

成都微信网站建设

手机微信网站建站3000元

手机微信网站开发、微信官网、微信商城网站...

建站知识

当前位置:首页 > 建站知识

vb.net中注册界面 用vb编写登录界面代码

请问用VB.NET中 如何将注册窗口的用户名和密码传递给登录窗口的用户名和密码?拜托了

建立一个模块,在其中定义全局变量

当阳ssl适用于网站、小程序/APP、API接口等需要进行数据传输应用场景,ssl证书未来市场广阔!成为创新互联建站的ssl证书销售渠道,可以享受市场价格4-6折优惠!如果有意向欢迎电话联系或者加微信:13518219792(备注:SSL证书合作)期待与您的合作!

Public a as string

public b as string

然后在注册,登陆界面分别引用就好了

求一份VB.NET的注册页面的代码

创建完相应的用户名,密码控件之后,输入以下代码:

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("登录失败,请确认用户名和密码")

End If

End Sub

End Class

VB.NET 2008 速成版 注册

页面打不开?难道防火墙阻拦?一般不会取消对VS2008的支持吧,要不再你卸载界面下卸载看看有没有注册选项,vs2008专业版在卸载的时候有注册选项的


本文名称:vb.net中注册界面 用vb编写登录界面代码
网站URL:http://bjjierui.cn/article/dodidej.html

其他资讯