Visual Basic校驗碼發生器

Question

我已經被要求在Visual Basic上創建一個程序，它從一個文本框中獲取一個8位數的數字並生成一個校驗數字以形成一個9位數的校驗碼。

程序應該將文本框中的第一個數字乘以10，第二個乘以9，第三乘以8等等，直到您將第二位數字乘以2爲止。從中您將所有一起回答，把它們除以九，然後得到答案。從剩下的，我認爲你從9中減去它，然後你得到數字。

任何人都可以給我任何指示，如何隔離數字（我認爲中點的參與），乘以各種數字並計算餘數。

Answer 1

您可以在一個循環 （不知道該版本的Visual Basic）

MyString=Text1.text 
StringLen = Len(MyString) 
total=0 

for a=1 to StringLen 
result=Left(MyString, StringLen-1) 
if a=1 
total=resultx10 
elseif a=2 
total=total+resultx9 
.. 
.. 
.. 
endif 
next 

希望這有助於

使用LEN和Visual Basic的左功能