冰楓論壇

標題: 身分證字號產生器 [打印本頁]

作者: god82718 時間: 2013-7-5 13:32
標題: 身分證字號產生器
VB真的是一個很好玩的東西已經停不下來拉XD

作者: upup 時間: 2013-7-5 15:57
這是啥情形

作者: Enger 時間: 2013-7-10 00:07
提示: 作者被禁止或刪除內容自動屏蔽

作者: 0930698306 時間: 2013-7-17 07:44
提示: 作者被禁止或刪除內容自動屏蔽

作者: 26393870 時間: 2013-8-13 13:37
030 好恐怖的程式...

作者: Lkyb 時間: 2013-10-1 20:45
入面是有源碼嗎= =?

作者: k123502k 時間: 2013-10-23 18:32
這幾天剛好有學到希望有幫助

作者: zhong4699 時間: 2014-1-22 16:55
提示: 作者被禁止或刪除內容自動屏蔽

作者: 123159 時間: 2014-2-4 08:04
來用看看，網路上好像有線上版的

作者: love99067333 時間: 2014-2-10 14:39
VB的嗎有程式碼?

作者: s99471379 時間: 2014-2-20 00:11
是真的有這東西嗎?

作者: Akal 時間: 2014-3-15 16:40
提示: 作者被禁止或刪除內容自動屏蔽

作者: 漢堡 時間: 2014-3-16 21:11
提示: 作者被禁止或刪除內容自動屏蔽

作者: 愛綠茶 時間: 2014-3-23 16:56
提示: 作者被禁止或刪除內容自動屏蔽

作者: qwe123 時間: 2014-4-5 11:31
回覆 1# god82718

辦遊戲帳號的˙神器哈哈哈!!

作者: 發仔兒 時間: 2014-6-5 06:25
哈ㄏ~
對我的新掛好像有幫助 !
快來用 !

作者: dsa225618923 時間: 2014-6-19 12:15
剛學習VB 所以來買各種內碼希望有幫助

作者: love890327 時間: 2014-7-13 12:32
提示: 作者被禁止或刪除內容自動屏蔽

作者: ericrain9860908 時間: 2014-7-27 00:36
非常感謝您的分享喔!

作者: yujie0330 時間: 2014-7-29 08:35
目前正在學習VB製作技巧
謝謝您的分享

作者: asd512849aa 時間: 2014-8-12 12:43
想來學習看看感謝分享

作者: 22865006 時間: 2014-8-15 22:38
ㄎ_ㄎ

作者: xmax 時間: 2014-8-16 10:15
身分證字號產生器 OAO" 跟網路上那個一樣嗎 ~~ 好好奇想看看

作者: 氣質 時間: 2014-9-10 21:28
給員馬?

作者: TaiwanMAX 時間: 2014-9-14 17:18
3Q 大大!

作者: tp6fu6xjp6 時間: 2014-9-15 17:29
哈哈怎麼完呀?

作者: vnf123456 時間: 2014-9-15 22:38
最近在學VB來看看吧

作者: asd1545140 時間: 2014-9-18 22:40
是什麼阿來看看囉

作者: 廖震期@FB 時間: 2014-9-25 21:53
提示: 作者被禁止或刪除內容自動屏蔽

作者: 廖震期@FB 時間: 2014-9-25 21:56
提示: 作者被禁止或刪除內容自動屏蔽

作者: 廖震期@FB 時間: 2014-10-11 08:10
提示: 作者被禁止或刪除內容自動屏蔽

作者: qwas963563 時間: 2014-10-25 08:29
這些有經過處理嗎

作者: 黃信義@G 時間: 2014-11-9 13:44
謝謝大大阿

作者: hell520 時間: 2014-11-25 12:45
提示: 作者被禁止或刪除內容自動屏蔽

作者: yhn95174 時間: 2014-11-26 20:10
看看哈哈

作者: 牛耿蛋 時間: 2014-11-27 21:14
TG

作者: 賴岳霆 時間: 2014-12-7 14:10
看起來很不錯!!

作者: 阿羊ˋ 時間: 2015-3-14 15:19
試試看嚕 !
很有效喔 !

作者: howard572 時間: 2015-3-18 22:21
現在有學到程式語言對ＶＢ就會感到很熟悉

作者: x94cj86 時間: 2015-4-25 19:23
真的很想知道呢

作者: S8551600 時間: 2015-4-28 14:30
申請遊戲的神vb

作者: zz4837242 時間: 2015-5-2 12:19
非常感謝您的分享喔!

作者: litung 時間: 2015-5-6 14:04
以前也有寫過
不過是用 excel 寫的
一次產生十萬組，用來申請楓之谷帳號用的

這也太慘了吧，聽音樂還會被扣coco

作者: 21278051 時間: 2016-7-9 04:11
提示: 作者被禁止或刪除內容自動屏蔽

作者: 刀劍神域 時間: 2016-7-10 17:45
Private Sub Command1_Click()
Randomize
id1 = Chr(Int(Rnd * 26) + 65)
id2 = Int(Rnd * 2) + 1
id3 = Int(Rnd * 10)
id4 = Int(Rnd * 10)
id5 = Int(Rnd * 10)
id6 = Int(Rnd * 10)
id7 = Int(Rnd * 10)
id8 = Int(Rnd * 10)
id9 = Int(Rnd * 10)
msg = id1
Select Case id1

Case Is = "A"
id1 = 10
Case Is = "B"
id1 = 11
Case Is = "C"
id1 = 12
Case Is = "D"
id1 = 13
Case Is = "E"
id1 = 14
Case Is = "F"
id1 = 15
Case Is = "G"
id1 = 16
Case Is = "H"
id1 = 17
Case Is = "I"
id1 = 34
Case Is = "J"
id1 = 18
Case Is = "K"
id1 = 19
Case Is = "L"
id1 = 20
Case Is = "M"
id1 = 21
Case Is = "N"
id1 = 22
Case Is = "O"
id1 = 35
Case Is = "P"
id1 = 23
Case Is = "Q"
id1 = 24
Case Is = "R"
id1 = 25
Case Is = "S"
id1 = 26
Case Is = "T"
id1 = 27
Case Is = "U"
id1 = 28
Case Is = "V"
id1 = 29
Case Is = "W"
id1 = 32
Case Is = "X"
id1 = 30
Case Is = "Y"
id1 = 31
Case Is = "Z"
id1 = 33
End Select

id10 = 10 - ((Mid(id1, 1, 1) + Mid(id1, 2, 1) * 9 + id2 * 8 + id3 * 7 + id4 * 6 + id5 * 5 + id6 * 4 + id7 * 3 + id8 * 2 + id9 * 1) Mod 10)
msg = msg & id2 & id3 & id4 & id5 & id6 & id7 & id8 & id9 & id10
Text1.Text = msg
End Sub

作者: asd38726398 時間: 2016-7-13 21:18
這程式還蠻常見的

作者: airlife917339 時間: 2023-11-11 04:41
這是當年註冊會員必備的程式嗎？來試看看

歡迎光臨冰楓論壇 (https://bingfong.com/)