当前位置: 源码素材网 » VB源码 » 算法相关 » 详情页

VB 求1到100的整数和

VB 求1到100的整数和,求整数相加的,数学相关函数的VB应用范例:
  Private Sub Command1_Click()
  Dim intI, intSum As Integer
   intI = 1
   intSum = 0
  L1: intSum = intSum + intI
   intI = intI + 1
   If intI <= 100 Then
   GoTo L1 '跳转到L1
  End If
   Text1.Text = intSum
  End Sub

  • 相关标签:数学算法
  • 调试环境:VB6.0
  • 文件大小:1.71K
  • 资源评级:
  • 更新时间:2020-07-14
  • 相关链接:暂无演示

源码测试截图:

VB 求1到100的整数和运行截图

相似源码:数学算法 VB源码下载:VB 求1到100的整数和 测试截图

下载声明:

本站资源仅供学习参考,禁止用于非法途径。若“VB 求1到100的整数和”源代码侵犯了您的权益,请尽快告诉我们。