()Private Sub Command1_Click
Pic1(cnt).Visible = False
If cnt < 4 Then cnt = cnt + 1 Else
Pic1(cnt).Visible = True
End Sub

()Private Sub Form_Load
For i = 1 To 4
Pic1(i).Visible = False
Next i
End Sub

ريحانه جون حالا كه ميخواي برنامه بذاري تو سايت
به نظر من بهتره يه عكسم از فرم برنامه بذاري تا هم طراحيش واضح تر باشه هم بچه ها راحت تر كار كنن

باشه سعي ميكنم

آخه این کار درسته؟
نه خدااااااااااااایش؟؟
بابا تالار کامپیوتر رو واسه همین مطالب تهیه کردند دیگههه

خوب داداش مجيد
اين مربوط ميشه به يكي از درسهاي كامپيوتري هاي فني و حرفه اي ها
اينجا هم مربوط به فني هاست ديگه

آقاي مجيد خان
چون اين جواب خودآزمايي كتاب درسيمونه
گذاشتم اينجا