vba登录界面代码

邱削蚁4572Excel不同用户登录显示不同内容 -
阚郊径15743363234 ______ 楼主,你好!这个可以尝试使用VBA程序处理,当然,如果工作表禁用宏,那也可能会导致此功能失效. 一、VBA程序代码如下:(主要是根据不同个登录账户显示不同的工作表,如果想要单独改变单元格里面显示不同的内容,也可以根据此...

邱削蚁4572vb代码;登录窗口输入用户名和密码 -
阚郊径15743363234 ______ 设Command1是登陆按钮,Text1是用户名框,Text2是密码框,代码如下. ------------------------------- Private Sub Command1_Click() If Not (Text1.Text = 改为用户名 And Text2.Text = 改为密码) Then MsgBox ＂输入错误＂ Text1.Text = ＂＂ Text2.Text = ＂＂ End If End Sub

邱削蚁4572关于VB设计中一个用户登录界面的代码 -
阚郊径15743363234 ______ 我好像看出来一点问题,,,Adodc1.Recordset.Fields(1).Value对应是应该是数据库里的“密码”这个字段.而你是用Adodc1.Recordset.Fields(1).Value Combo1.Text 进行比较,肯定是比不来出什么正确的结果的,它俩天生就不相等.所以程序会继续向下运行.用户名应该 对应Adodc1.Recordset.Fields(0).Value

邱削蚁4572vb语言写一个登入界面 -
阚郊径15743363234 ______ '添加好控件,把代码复制到窗体模块可以了吧.'label1,Label2,Text1'Command1:确定,command2:重输 Private Sub Form_Load() Text1.PasswordChar = ＂*＂ Text1.MaxLength = 6 Command1.Enabled = False Command2.Visible = False ...

邱削蚁4572vb用户登录界面代码 -
阚郊径15743363234 ______ 第二窗体名称.show 如果满意的话,请将我该回答采纳.

邱削蚁4572一个Vba问题,在线等逐步解释 -
阚郊径15743363234 ______ Private Sub Login_Click() Dim str As String Dim rs As New ADODB.Recordset Dim fd As ADODB.Field Set cn = CurrentProject.Connection logname = Trim(Me!Username) '原文拼写错误,应该是username.赋值用户名 Pass = Trim(Me!Pass...

邱削蚁4572vb登陆界面的代码,写好点,我很菜的
阚郊径15743363234 ______ 建立窗体一、窗体二 在窗体一上建text1(用户名)text2(密码),command1( 确认)command2(取消) 在窗体一上代码如下 Private Sub Command1_Click()If Text1 = ＂123＂ Then '登录名If Text2 = ＂123＂ Then '登录密码Form2....

邱削蚁4572VB中登录界面代码解释 -
阚郊径15743363234 ______ '将两个文本框输入的用户名和密码取出来,组合成一个字符串,赋值给sqlsql = ＂select 用户名,密码 from 用户 Where 用户名='＂ & Text1.Text & ＂' and 密码='＂ & Text2.Text & ＂'＂ Set rs = conn.Execute(sql) '执行sql指令,结果赋值给rs数据...

邱削蚁4572VB登录窗口制作代码和流程 -
阚郊径15743363234 ______ 两个编辑框,一个用于填用户名,一个用于填密码,接着判断用户输入的账户和密码是否正确

邱削蚁4572VB登陆界面编写
阚郊径15743363234 ______ 假设你用户名textbox名为 txtUsername 密码的为 txtPassword 在确认键的点击事件里写 dim usr as string dim psd as string usr=＂用户名＂ psd=＂密码＂ if txtusername<>＂＂ and txtpassword<>＂＂ then if txtusername.text=usr and txtpassword.text=psd then '登录成功的代码 如: frmMain.show ' unload me else msgbox ＂帐号或密码错误!＂ end if else msgbox ＂帐号密码不能为空!＂ end if