vb的学习心得-for循环

vb的学习心得-for循环

for是vb的循环语句之一,循环语句的功能是很强大的,可以嵌套或搭配if完成一些复杂操作

1.for循环句式

for 变量 = 初值 to 终值 step 步长

      循环执行的语句

      next

for循环是让变量=初值+n个步长直到达到终值

初值就是最开始的值,终值则为最后的值,步长为每次的长度

强制跳出循环的方法exit for


2.求for的循环次数

for的次数=终值-初值+1

例如 for i=1 to 3 

则为3-1+1=2+1=3次


3.for的使用

连续打印hello world

private sub command1_click()

     for i=0 to 3

     label1.caption=label1.caption+"hello world"+chr(13)

     next

     '最后输出的值为四个helloworld

end sub


4.for的妙用

不用timer控件,用for来实现向右行走的动画效果

准备工做在当前文件夹下创建一个名为img的子文件夹,再在img文件夹下创建一个people文件夹,将这四张图放进去,名名为1-4.gif

打开vb添加command控件和image/picturebox控件我这里用的是image控件vb的学习心得-for循环_第1张图片

 99eb231c344144b08462361ea7728ae9.gif

677f319e63c24c079f900d512cb694dd.gif

 1b12a0e83cf44819b291cc0e61e645cf.gif

 ed2ba3dfec6c4659841cfc372337c2ad.gif

private Declare Sub Sleep Lib “kernel32” Alias “Sleep” (ByVal dwMilliseconds As Long)

private sub command1_click() '当按下按钮1时向右行走

        for i=1 to 4

                 image1.mage1.picture=loadpicture(app.path & "img\people1\" & i &".gif") 'apppath是当前文件夹路径

                image1.left=image.left+70

'可以在这里使用api或者timer达到延迟效果

                call sleep(30)        

        next

end sub

你可能感兴趣的:(VB学习笔记,visualstudio,动画,visual,studio,code)