[Amin_Mansouri]

درود
والا خودم تست نکردم اما باید با phone eventsبشه
PhoneEvents allows you to handle all kinds of system events.
کل رویداد ها با این چک میشه
Sub PE_PhoneStateChanged (State As String, IncomingNumber As String, Intent1 As Intent)
Dim P As Phone
If State = "RINGING" Then
P.SetRingerMode(P.RINGER_SILENT)
End If
End Sub
 

یه دونه msgbox (state) بزن ببین وقتی تلو قطع میکنی چه رویدادی میده
رو همون رویداد شرطتو بزار