哪里有用VB做电子相册的教程

你说的太简单难道素书上的教程写啲8够详细..?
以下是一个简易相册.本人亲自调试通过.
当然你要先准备一个VB编程工具.6.0的差不多勒..
新建工程,然后放一个图片框,两个label,一个时间控件timer,在form上面.
位置随便你自己喜欢怎么摆.
偶假设有5张相片.根据需要你可以自己添加.
再在代码区填入以下代码.
Dim x&
Private Sub Form_Load()
Label2.Caption = "上一张"
Label1.Caption = "下一张"
Timer1.Interval = 1
Picture1.Picture = LoadPicture("E:\图片制作\图片收藏夹\{93764A90-2DD3-4BFF-B341-662AF1E3FB39}.JPG")
x = 0
End Sub

Private Sub Label1_Click()
x = x + 5
x = x + 1
Label2.Visible = True
End Sub

Private Sub Label2_Click()
x = x + 5
x = x - 1
End Sub

Private Sub Timer1_Timer()
If x = 0 Then
Label1.Visible = True
Label2.Visible = False
x = x - 5
Picture1.Picture = LoadPicture("E:\图片制作\图片收藏夹\{93764A90-2DD3-4BFF-B341-662AF1E3FB39}.JPG")
ElseIf x = 1 Then
Label1.Visible = True
x = x - 5
Picture1.Picture