[API实现完美的图片出现效果.docVIP

API实现完美的图片出现效果 作者：罗玉强 在用Visual Basic编程的时候，通常要调用图片，如果图片出现的时候是以各种完美的效果出现的，（如马赛克效果，百叶窗效果等）则你的程序就会显得更加灵活，你的程序就会更加专业化。本文讲述了Visual Basic中如何调用API函数，以及用API函数中的BitBlt函数实现各种完美的图片出现效果的过程。 §1 一般的图片出现效果 　　一般情况下，要使Visual Basic中的图片出现，例如，要显示Picture1中的图片，只需一句代码： Picture1.Visible=True 　　使用以上方法时，图片是突然出现的。也可以编复杂一点的代码，使图片从左到右、从上到下或从中间向四周扩大。例如，使Picture1中的图片从左到右出现，其代码为： Picture1.Width = 0 Picture1.Visible = True For i = 0 To 5000 Step 50 注释：5000代表图片的高度 Picture1.Width = i Next i 使Picture1中的图片从上到下出现的代码为： Picture1.Height = 0 Picture1.Visible = True For i = 0 To 4000 Step 40 注释：4000代表图片的宽度