求助一个判断问题

已注销186622

写一个可以判断是否是16或者32位数字组合的代码，
字母区分大小写


补充内容 (2013-8-25 16:18):
不区分也行

Hoibben

没人写？看看哈，里边有注释，记得最佳哦。。。

睿思Online

数字组合 然后又字母区分大小是什么意思呢？

Hoibben

kyseven 发表于 2013-8-25 16:15
数字组合 然后又字母区分大小是什么意思呢？

还好卤煮先说的是数字组合再说字母区分大小写，如果变成字母组合再说数字区分大小写你就更凌乱了。。。

Lonelysoul

[e]
.版本 2

.判断开始 (取文本长度 (编辑框1.内容) ＜ 16)
    信息框 (“您输入位数小于16位”, 16, “错误”)
.判断 (取文本长度 (编辑框1.内容) ＞ 32)
    信息框 (“您输入位数大于32位”, 16, “错误”)[/e]
有木有帮助，如有帮助，最佳给我！

已注销186622

精易学者 发表于 2013-8-25 16:20
[e]
.版本 2

必须是数字和字母组合，不过谢谢你

ma8803

[e]
.版本 2

.子程序 内容判断, 逻辑型
.参数 文本, 文本型
.参数 是否区分大小写, 逻辑型, 可空
.局部变量 temp, 整数型
.局部变量 有字母, 逻辑型
.局部变量 有数字, 逻辑型
.局部变量 有大写, 逻辑型
.局部变量 有其他文本, 逻辑型
.局部变量 循环次, 整数型
.局部变量 字符局, 整数型

temp ＝ 取文本长度 (文本)
.如果真 (是否为空 (是否区分大小写))
    是否区分大小写 ＝ 假
.如果真结束
.如果真 (temp ≠ 16 且 temp ≠ 32)  ' 如果不是16位或32位  直接返回加
    返回 (假)
.如果真结束
.计次循环首 (temp, 循环次)
    字符局 ＝ 取代码 (文本, 循环次)
    .如果 (字符局 ≥ 取代码 (“0”, ) 且 字符局 ≤ 取代码 (“9”, ))
        有数字 ＝ 真
    .否则
        .如果 (字符局 ≥ 取代码 (“a”, ) 且 字符局 ≤ 取代码 (“z”, ))
            有字母 ＝ 真
        .否则
            .如果 (字符局 ≥ 取代码 (“A”, ) 且 字符局 ≤ 取代码 (“Z”, ))
                有大写 ＝ 真
            .否则
                有其他文本 ＝ 真
            .如果结束

        .如果结束

    .如果结束

.计次循环尾 ()
.如果 (是否区分大小写)
    .如果 (有字母 且 有数字 且 有大写 且 有其他文本 ＝ 假)
        返回 (真)
    .否则
        返回 (假)
    .如果结束

.否则
    .如果 (有数字 且 有其他文本 ＝ 假 且 (有字母 或 有大写))
        返回 (真)
    .否则
        返回 (假)
    .如果结束
[/e]
返回真 就表示是 16位 或32位  仅仅是 字母和数字组成的
返回假 就不正确
如果不需要区分大小写 第二个参数就不填写

ma8803

[e]
.版本 2

.程序集 窗口程序集1

.子程序 内容判断, 逻辑型
.参数 文本, 文本型
.参数 是否区分大小写, 逻辑型, 可空
.局部变量 temp, 整数型
.局部变量 有字母, 逻辑型
.局部变量 有数字, 逻辑型
.局部变量 有大写, 逻辑型
.局部变量 有其他文本, 逻辑型
.局部变量 循环次, 整数型
.局部变量 字符局, 整数型

temp ＝ 取文本长度 (文本)
.如果真 (是否为空 (是否区分大小写))
    是否区分大小写 ＝ 假
.如果真结束
.如果真 (temp ≠ 16 且 temp ≠ 32)  ' 如果不是16位或32位  直接返回加
    返回 (假)
.如果真结束
.计次循环首 (temp, 循环次)
    字符局 ＝ 取代码 (文本, 循环次)
    .如果 (字符局 ≥ 取代码 (“0”, ) 且 字符局 ≤ 取代码 (“9”, ))
        有数字 ＝ 真
    .否则
        .如果 (字符局 ≥ 取代码 (“a”, ) 且 字符局 ≤ 取代码 (“z”, ))
            有字母 ＝ 真
        .否则
            .如果 (字符局 ≥ 取代码 (“A”, ) 且 字符局 ≤ 取代码 (“Z”, ))
                有大写 ＝ 真
            .否则
                有其他文本 ＝ 真
            .如果结束

        .如果结束

    .如果结束

.计次循环尾 ()
.如果 (是否区分大小写)
    .如果 (有字母 且 有数字 且 有大写 且 有其他文本 ＝ 假)
        返回 (真)
    .否则
        返回 (假)
    .如果结束

.否则
    .如果 (有数字 且 有其他文本 ＝ 假 且 (有字母 或 有大写))
        返回 (真)
    .否则
        返回 (假)
    .如果结束

.如果结束
[/e]

ma8803

这个是代码

天中小和尚

判断.zip (1.18 KB, 下载次数: 2)

2013-8-25 17:41 上传

点击文件名下载附件
纯源码   无模块   系统核心支持库