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的左功能