[VB6 ] 有關運算式確認碼寫法
從學校畢業到現在已經四五年了，以前有寫過vb(大約 8~9年前)
現在因為工作上需要，需要寫一個小程式
但我卻完全摸不著頭緒
不知版上是否有人可以讓我知這該怎麼寫~~
我要有14碼的數字
前四碼是固定，第5~6碼是檢查碼，第7~14碼是自行輸入的數字
(檢查碼就是經過計算後所得知的數字
以1007 09842316為例：
1007 09842316
x)1212 12121212
a = 1*1+7*2+9*2+8*1+4*2+2*1+3*2+1*1+6*2
= 1 +1+4+1+8+ 8 + 8 + 2 + 6 + 1 +1+2
= 43 Chk1 = 3
1007 09842316
x)1371 37137137
b = 1*1+7*1+9*7+8*1+4*3+2*7+3*1+1*3+6*7
= 1 + 7 + 63+ 8 + 12+ 14+ 3 + 3 +42
= 153 Chk2 = 3
之後所得到的數字：10073309842316
不知這樣的程式該怎麼寫才好
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 210.66.145.136
→
07/08 18:04, , 1F
07/08 18:04, 1F
→
07/08 18:05, , 2F
07/08 18:05, 2F
→
07/08 18:05, , 3F
07/08 18:05, 3F
→
07/08 18:06, , 4F
07/08 18:06, 4F
→
07/08 18:08, , 5F
07/08 18:08, 5F
→
07/08 18:14, , 6F
07/08 18:14, 6F
→
07/11 08:19, , 7F
07/11 08:19, 7F
→
07/11 08:19, , 8F
07/11 08:19, 8F
→
07/11 15:38, , 9F
07/11 15:38, 9F
→
07/12 14:03, , 10F
07/12 14:03, 10F
→
07/12 14:04, , 11F
07/12 14:04, 11F
→
07/15 11:27, , 12F
07/15 11:27, 12F
→
07/15 11:27, , 13F
07/15 11:27, 13F
→
07/15 11:28, , 14F
07/15 11:28, 14F