虚荣数字背后的逻辑

时间:2014-11-25 18:41:32

标签: vb6 logic

几个月前我开始学习编程。完全喜欢它的想法和概念。我正在学习vb6中的编程,因为我听说它很容易学习。

我想制作一个基本程序,其中输入的电话号码为其提供虚荣号码。在我开始收集计划背后的想法和逻辑之前,这听起来很容易。

我似乎无法弄清楚它背后的逻辑来拯救我的生命。我用谷歌搜索并做了一些研究,但却无法找到关于这个主题的任何内容

如果有人能向我解释我如何处理这个想法,我非常感谢

提前致谢

1 个答案:

答案 0 :(得分:0)

您需要定义一个虚荣号码,否则我们无法回答。为了讨论,我假设最后4位是两对。

这是VBScript。 Vbscript是合法的VB6。但是,您必须设置对 Microsoft VBScript正则表达式5.5 的引用。

xmlstring = "2756-1122"
Set regEx = New RegExp
regEx.Pattern = "\d\d\d\d-(\d)\1(\d)\2"
regEx.IgnoreCase = True
regEx.Global = True
Msgbox regEx.Test(xmlstring)

测试该数字是4位数字,短划线,然后是两对数字。

\ d 匹配数字字符。相当于[0-9]。

\ num 匹配num,其中num是正整数。回顾记住的比赛的参考。例如,“(.)\1”匹配两个连续的相同字符。