千家信息网

VB语言for循环的实例应用

发表于:2025-02-05 作者:千家信息网编辑
千家信息网最后更新 2025年02月05日,这篇文章主要介绍"VB语言for循环的实例应用",在日常操作中,相信很多人在VB语言for循环的实例应用问题上存在疑惑,小编查阅了各式资料,整理出简单好用的操作方法,希望对大家解答"VB语言for循环
千家信息网最后更新 2025年02月05日VB语言for循环的实例应用

这篇文章主要介绍"VB语言for循环的实例应用",在日常操作中,相信很多人在VB语言for循环的实例应用问题上存在疑惑,小编查阅了各式资料,整理出简单好用的操作方法,希望对大家解答"VB语言for循环的实例应用"的疑惑有所帮助!接下来,请跟着小编一起来学习吧!

本节知识目标:

在文本框中输入一个数字,点击输出按钮,在窗体上打印出五角星点阵的正方形。从中体会双重for循环的力量。

效果图

for循环的格式:

声明一个自定义变量i

for 初始化自定义变量i to 变量i的最后一个值 step 步长数

这里是进入循环的代码

next 自定义变量i

举例:

dim i as integer

for i=0 to 10 step 1

print i

next i

结果:

0

1

...

10

结论:

初始变量 <= 终止值 才会 进入for循环

每次循环都会改变初始变量的值的是什么?

当程序运行到next i 的时候,会在原初始变量值的基础上加上 步长。

初始化的意思就是指第一次赋值。

案例:

用五角星输出正方形。

案例代码:

Cls '清空屏幕上的print输出

Dim i As Integer

Dim j As Integer

'外部的for循环代表输出多少行

For j = 1 To Val(Text1.Text) Step 1

'内部的for循环代表输出一行五角星

For i = 1 To Val(Text1.Text) Step 1

Print "★";

Next i

Print '这里的print代表换行

Next j

注意:这里的使用冒号:将下一行的print的输出连接起来。

提示:也可以使用字符串连接的方式进行输出。

本节知识源代码:

Private Sub Command1_Click()ClsDim i As IntegerDim j As Integer
For j = 1 To Val(Text1.Text) Step 1
For i = 1 To Val(Text1.Text) Step 1 Print "★"; Next i Print Next j
End Sub

到此,关于"VB语言for循环的实例应用"的学习就结束了,希望能够解决大家的疑惑。理论与实践的搭配能更好的帮助大家学习,快去试试吧!若想继续学习更多相关知识,请继续关注网站,小编会继续努力为大家带来更多实用的文章!

0