点击图片随机变化图片怎么弄前端

点击图片随机变化图片前端具体弄法如下：

1、先控制图片的定位都是有css的一个position属性来做的，图片就是去改变定位中的left值。

2、接着在JavaScript里面写随机数逻辑运算。

3、准备一组图片，将图片加入程序，再根据写的逻辑就能随机变化了。

在窗体上添加图像控件数组img1（0）,img1（1）,img1（2）,img1（3）,在属性窗体中把这个控件的Picture属性设置为Card1.bmp，然后往窗体上添加cmdChange的控件按钮，并编写Click事件：

Private Sub cmdChange_Click()

dim ingchange as integer,i as integer

dim file(3) as string

file(0)="文件位置"

file(1)="文件位置"

file(2)="文件位置"

file(3)="文件位置"

for i=0 to 3

ingchange=int(4*RND)

select case ingchange

case 0

img1(i).Picture=LoadPicture(file(0))

case 1

img1(i).Picture=LoadPicture(file(1))

case 2

img1(i).Picture=LoadPicture(file(2))

case 3

img1(i).Picture=LoadPicture(file(3))

End Select

Next

当然了，上面的程序有可能产生两张图片一样。

外接程序>外接程序管理器>把VB 6 资源编辑器启动起来,然后就可以到 工具>资源编辑器里添加资源了(添加图片当然要选择那个添加位图的按钮了~ ^^)

比如加入了一张图片,这时它在资源中的编号是101(能看到吧~),这时就可以用Picture1.Picture = LoadResPicture(101, vbResBitmap)语句来加载图片了~随机载入嘛~用随机函数生成资源号就行了~这个简单~不用我说了吧~

要先到外接程序管理器里把资源编辑器启动起来才能用~安装完成后一般是默认不启动滴~

---