Foxtable(狐表)用户栏目专家坐堂 → 用户掩码无法显示


  共有6147人关注过本帖树形打印复制链接

主题:用户掩码无法显示

美女呀,离线,留言给我吧!
采菊东篱下
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:八尾狐 帖子:1881 积分:10374 威望:0 精华:0 注册:2019/4/6 8:45:00
用户掩码无法显示  发帖心情 Post By:2022/5/22 22:25:00 [只看该作者]

我下载了论坛的例子跟着做,可TextBox1、TextBox2的掩码无法显示
这是论坛的例子
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:密码框.table


这个是我做的效果
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:用户掩码.foxdb




 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:111381 积分:566969 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/5/22 22:37:00 [只看该作者]


 回到顶部
美女呀,离线,留言给我吧!
采菊东篱下
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:八尾狐 帖子:1881 积分:10374 威望:0 精华:0 注册:2019/4/6 8:45:00
  发帖心情 Post By:2022/5/23 23:33:00 [只看该作者]

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:用户掩码523.foxdb

软件用户列表中的密码、密码确认列无法变为动态掩码(注:密码长度为6-8位数),窗口的保存按钮,点击多次出现重复录入软件用户列表。

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:111381 积分:566969 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/5/24 8:48:00 [只看该作者]

参考:http://www.foxtable.com/webhelp/topics/2262.htm

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:用户掩码523.zip



 回到顶部
美女呀,离线,留言给我吧!
采菊东篱下
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:八尾狐 帖子:1881 积分:10374 威望:0 精华:0 注册:2019/4/6 8:45:00
  发帖心情 Post By:2022/5/25 10:28:00 [只看该作者]

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:用户掩码525.foxdb

我希望输入密码ABC123456,密码ABC12345不执行错误提示,因为我已截取了字符,否则这代码没意思。
Dim txt2 As WinForm.TextBox = e.Form.Controls("TextBox2")
Dim txt5 As WinForm.TextBox = e.Form.Controls("TextBox5")
Dim txt6 As WinForm.TextBox = e.Form.Controls("TextBox6")
If txt2.text.length  > 0 AndAlso txt2.text.length < 6 AndAlso txt6.text.length  > 0 AndAlso txt6.text.length < 6 Then
    txt2.text = Nothing
    txt6.text = Nothing
    MessageBox.Show("密码必须 6-8 位包含字母或数字 !","提示", MessageBoxButtons.OK,MessageBoxIcon.Question)
ElseIf txt2.text.length > 8 AndAlso txt6.text.length > 8 Then
    txt2.text = Left(txt2.text,8)
    txt6.text = Left(txt6.text,8)
End If
If Left(txt5.text,8) <> Left(txt6.text,8) Then
    txt2.text = Nothing
    txt6.text = Nothing
    MessageBox.Show("密码设置必须等于确认密码")
End If
[此贴子已经被作者于2022/5/25 12:48:34编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:111381 积分:566969 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/5/25 10:41:00 [只看该作者]

项目没有TextBox5、6。搞不清楚这3个控件是什么东西

 回到顶部
美女呀,离线,留言给我吧!
采菊东篱下
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:八尾狐 帖子:1881 积分:10374 威望:0 精华:0 注册:2019/4/6 8:45:00
  发帖心情 Post By:2022/5/25 10:52:00 [只看该作者]

有啊,分别重叠在TextBox1、TextBox2下,设置为不可见,但它们是存在的。

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:111381 积分:566969 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/5/25 12:03:00 [只看该作者]

If txt2.text <> txt6.text Then
    txt2.text = Nothing
    txt6.text = Nothing
    MessageBox.Show("密码设置必须等于确认密码")
End If

 回到顶部
美女呀,离线,留言给我吧!
采菊东篱下
  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:八尾狐 帖子:1881 积分:10374 威望:0 精华:0 注册:2019/4/6 8:45:00
  发帖心情 Post By:2022/5/25 12:47:00 [只看该作者]

我原来就是象你这样写的,试过不行才改为截取字符,结果一样,都一定要前后输入一样才通过,那截取字符代码根本不起作用了!

 回到顶部
美女呀,离线,留言给我吧!
采菊东篱下
  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:八尾狐 帖子:1881 积分:10374 威望:0 精华:0 注册:2019/4/6 8:45:00
  发帖心情 Post By:2022/5/25 12:54:00 [只看该作者]

设置TextBox5、TextBox6是方便判断的,因为TextBox1、TextBox2已用掩码显示,怎样比较是否相等。

 回到顶部
总数 14 1 2 下一页