以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  窗口文本控件  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=23747)

--  作者:llyynn1207
--  发布时间:2012/9/18 17:21:00
--  窗口文本控件
在窗口文本中输入字符(也就是平时的密码)显示出来的是 ****** 怎么样实现??
--  作者:llyynn1207
--  发布时间:2012/9/18 17:33:00
--  
谢谢啦~~~ 我问的问题都很小白 不好意思哦~
--  作者:lin_hailun
--  发布时间:2012/9/18 17:37:00
--  
 
图片点击可在新窗口打开查看此主题相关图片如下:qq截图201209181736kk5.png
图片点击可在新窗口打开查看

--  作者:llyynn1207
--  发布时间:2012/9/18 17:46:00
--  
下一个问题。。。如图所示
点击确认 按钮 事件 自动检索 文本框1与文本框2中的内容在表B 中是否存在,如果文本框1与文本框2中的内容均在对应的表B中有并正确 则登录成功进入下一个界面。如果文本框1中在表B中不存在,这提示无此用户。如果文本框1存在表B而文本框2内容不存在对应的密码,则提示密码错误请重新输入。这个应该怎么样编写事件。。。

图片点击可在新窗口打开查看此主题相关图片如下:qq截图20120918173530.png
图片点击可在新窗口打开查看

图片点击可在新窗口打开查看此主题相关图片如下:qq截图20120918174506.png
图片点击可在新窗口打开查看

--  作者:狐狸爸爸
--  发布时间:2012/9/18 20:10:00
--  

这个不需要这么复杂的。

 

确定按钮的代码:

 

Dim nm As String = e.Form.Controls("姓名输入框").Value
Dim ps As String = e.Form.Controls("密码输入框").Value
Dim dr As DataRow = DataTables("表B").Find("用户名 = \'" & nm & "\'")
If dr Is Nothing Then
    MessageBox.show("用户不存在","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)
ElseIf dr("密码") <> ps Then
    MessageBox.show("密码错误","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)
End If

[此贴子已经被作者于2012-9-18 20:10:39编辑过]