خطا در یک دستور !

[Kazem Forghani 2,927]

سلام خدمت دوستان عزیزاین کد خطا می ده !:

Sub listview1_ItemClick (Position As Int, Value As Object)

If Position= 0 Then

StartActivity("main")

End If

If Position= 1 Then

StartActivity("s2")

End

If Position= 2 Then

Msgbox("طراحی و استخراج : کاظم فرقانی","درباره ما")

End If

End Sub

در خط آخر که نوشته : end sub

[Alireza Khoram مهمان]

سلام خدمت دوستان عزیزاین کد خطا می ده !:

Sub listview1_ItemClick (Position As Int, Value As Object)

If Position= 0 Then

StartActivity("main")

End If

If Position= 1 Then

StartActivity("s2")

End

If Position= 2 Then

Msgbox("طراحی و استخراج : کاظم فرقانی","درباره ما")

End If

End Sub

در خط آخر که نوشته : end sub

دوست من در کد نویسی اول دقت کن بعد تاپیک بده :

در شرط 2 برای position=1 در آخر شرط را بجای گذاشتن END IF .....شما END گذاشتین.

*fekr*