用VB编程切换明星脸。程序运行时,显示第一张明星照片,单击照片显示第二...
发布网友
发布时间：2024-10-23 09:27
共1个回答
热心网友
时间：2024-10-26 22:31
2、用dir函数读取这个文件夹的文件明存在一个字符串数组中。
数组（ubound（数组））=“路径” & dir(路径 & "\*.jpg")
数组（ubound（数组））=“路径” & dir()
3、申明一个long全局变量。
4、在窗体上放一个picturebox
5、在form_load中给这个图形框读取数组中第一张图，并且赐值long变量=1
6、在picture_click事件中使数值变量+1，并且使picture读取数组中的对应图片。
picture。picutre=loadpicture（数组（数值变量））
完成
