Sub Change_Baner(ByVal MyPersent As Integer)
Select Case (MyPersent)
'تو انجا براي هر بنر يه کيس بزار و جلوش مسير مشخص کن
'من اينو براي عکس نوشتم حالا اگه مال شما فلش يا چيز ديگست تغييرش بدید
Case (1)
MyBaner.ImageUrl = "Pic1.jpg"
Case (2)
MyBaner.ImageUrl = "Pic2.jpg"
End Select
End Sub
حالا فراخونيش بستگي به سايت داره بايد () Change_Baner با اون مقدار اهميت فراخوني كنيد
كه ميتونه تو رويداد يه Button يا Page_Load و يا چيز ديگه داره
ببين اين Sub بايد تويه يك رويداد فراخوني بشه
تعريف رويداد:واكنشي كه در مقابل يك تغيير وضعيت مثلا فشرده شدن Button وارد شدن به يك صفحه و يا ..... ممكنه پيش بياد
حال مثلا برنامه شما ممكنه زماني كه از يك صفحه به صفحه ديگه ميره با توجه به علاقه هاي شخص يه بنر براش انتخواب كنه keypressed و يا به صورت رندوم ميخواي وقتي وارد صفحه شدي يه بنر مشخص بشهpage_load
و حالاته ديگه...................
