16 12
发新话题
打印

人品计算器,算算你的人品?

本帖已经被作者加入个人空间

人品计算器,算算你的人品?

人品计算器,算算你的人品?

附件



附件: 17renpin.swf (2006-7-17 15:58, 44.69 KB)
该附件被下载次数 529

TOP

姓名:Nothing
人品得分:27
评价:你的人品太差了。你应该有干坏事的嗜好吧?

TOP

姓名:nothiNG
人品得分:95
评价:你的人品太好了..你就是当代活雷锋啊...

TOP

我才3分,晕倒!

TOP

姓名:joan
人品得分:24
评价:你的人品之低下实在让人惊讶啊...

呵呵~~我是很惊讶啊

TOP

姓名:Joan
人品得分:92
评价:你的人品太好了..你就是当代活雷锋啊...

hehe~~~又让我惊讶了一次

TOP

姓名:李世民
人品得分:1
评价:算了,跟你没什么人品好谈的...

不会吧,不过李世民也曾经杀兄害弟,找个人品最好的

姓名:舜
人品得分:8
评价:是我不好...不应该跟你谈人品问题的...

不可能吧

TOP

姓名:风雨声中
人品得分:31
评价:你的人品真差!肯定经常做偷鸡摸狗的事...


不会吧

TOP

公布原理

下面是VB代码
复制内容到剪贴板
代码:
    Dim a As Long
    For i = 1 To Len(Text1.Text)
        a = a + AscW(Mid(Text1.Text, i, 1))
    Next
    MsgBox a Mod 100
换个头像,看见广告就眼红,直接封ID。

TOP

姓名:netice
人品得分:32
评价:你的人品真差!肯定经常做偷鸡摸狗的事...


够晕!!!!!


姓名:雷锋
人品得分:2
评价:算了,跟你没什么人品好谈的...


更晕!!!!



姓名:小泉纯一郎
人品得分:85
评价:你的人品不错..应该一表人才吧?


晕死了!!!!!!!!!




姓名:netIce
人品得分:0
评价:你一定不是人吧?怎么一点人品都没有?!

死都不成啊!!!!!!!!!!!!

[ 本帖最后由 netice 于 2006-10-10 09:28 编辑 ]

TOP

 16 12
发新话题