vb.net字符循环想加 vb for循环

VB怎么实现字符串相加

首先您的题目有个问题就是A到Z的字母分别是10到36

创新互联公司是专业的新余网站建设公司，新余接单;提供成都网站设计、做网站,网页设计,网站设计,建网站,PHP网站建设等专业做网站服务;采用PHP框架,可快速的进行新余网站开发网页制作和功能扩展;专业做搜索引擎喜爱的网站,专业的做网站团队,希望更多企业前来合作!

如果 A字母代表10 那么 Z字母只能代表35

所以实现您的要求的代码如下：

Private Sub Command1_click()

Dim j As Integer

Dim n As Long

For n = 1 To Len(Text1.Text)

Dim b As String

b = Mid(Text1.Text, n, 1)

If IsNumeric(b) Then

j = j + Val(b)

Else

j = j + (Asc(UCase(b)) - 55)

End If

Next n

Text2.Text = j

end sub

1、首先开始编写代码，定义变量，如下图所示。

2、这是一个累加程序，所以会用到相关的累加语句,此题使用For-Next循环语句。具体编写如下图所示。

3、不仅仅需要一个For-Next循环语句，还需要在里面嵌套一个For-Next循环语句。

4、最后将剩下的代码补齐，编写完整的代码如下图所示。

5、然后运行程序，输入一个值检验一下。如果n为8，则1！+2!+3!+4!.......+8!=46233，就完成了。

for循环第一行到最后一行。设置对该列的修改，next。思路就是这样，代码自己想想，有助于你的排错。

把sw.writeline放在循环体里面就好了，至于每行加号码，字符串连接就行

网站标题：vb.net字符循环想加 vb for循环
分享URL：http://6mz.cn/article/doshegi.html