Question

VB随机出现2张图片怎么编程

Answer 1

把要出现的图片文件名按序号规律编写，如Pic1、Pic2、Pic3等，用RND函数生成随机数1、2、3等序列，设随机数变量为A，则图片文件名为PicName="Pic" & A，用这个加载图片即可。
其间还要判断生成的2个随机数是否相等，如相等则重新生成，直到不等为止。

Answer 2

产生随机数：1或2
Dim n As Integer
Randomize
n = Int((2 * Rnd) + 1)
If n = 1 Then
MsgBox "显示图片1"
Else
MsgBox "显示图片2"
End If