vb随机显示图片

原创 2013年12月05日 17:03:22
根目录下建一个文件夹PIC,在PIC下存放5张图片,
名称分虽是1,2,3,4,5
然后添加一个timer1控件,一个image1控件,
它的interval设5000(即5秒)


写如下代码


Private Sub Form_Load()
Dim i As Integer
Image1.Picture = LoadPicture(App.Path & "pic\1.bmp")
End Sub




Private Sub Timer1_Timer()
i = Int(Rnd * 5 + 1)
Image1.Picture = LoadPicture(App.Path & "\pic\" & i & ".bmp")
End Sub
版权声明:本文为博主原创文章,未经博主允许不得转载。 举报

相关文章推荐

vb随机显示10个数,并显示最大的数

首先设计窗体,如图所示:  设计好窗体写代码,首先要定义变量 Dim i As Integer Dim j As Integer Dim a(10) As Integer               ...

bf533 tft480_272 显示一张照片

由于没有bf533的仿真器,只能

精选:深入理解 Docker 内部原理及网络配置

网络绝对是任何系统的核心,对于容器而言也是如此。Docker 作为目前最火的轻量级容器技术,有很多令人称道的功能,如 Docker 的镜像管理。然而,Docker的网络一直以来都比较薄弱,所以我们有必要深入了解Docker的网络知识,以满足更高的网络需求。

UBoot开机图片显示

By Toradex胡珊逢 1). 简介 在之前的文章中,我们已经介绍了如何在 Linux中添加开机图片,实现定制化的开机 Logo 显示。或许你也已经注意到了,在设备刚上电启动的时候,L...

vb实现随机图形

一·实验目的    为了实现随机生成不同的图形,满足题目需要,实现vb语言程序的运作,最后画出那令人满意的随机的不同图形。 二·实验内容    在窗体上画一个commandbutton按钮,...

SERVLET显示图片

1. 工具类 package com.chis.web.util; import java.awt.image.BufferedImage; import java.io.FileInputStr...

显示图片

// 显示图片.cpp : 定义控制台应用程序的入口点。 // #include "stdafx.h" #include "opencv2/opencv.hpp" int _tmain(int a...

图片显示

activity.xml   LinearLayout xmlns:android="http://schemas.android.com/apk/res/android"       xmlns:...

图片显示

数据表: create table images (  iid int identity(1001,1) primary key,  imageurl varchar(50),  image...

MFC显示图片

//MFC显示各种图片

android显示图片的原理

android显示图片的原理,设计到几个方面: 1.图片的
返回顶部
收藏助手
不良信息举报
您举报文章:深度学习:神经网络中的前向传播和反向传播算法推导
举报原因:
原因补充:

(最多只允许输入30个字)