ussd

Sub call(Command As String)
	i.Initialize(i.ACTION_CALL, "tel:" & Command.Replace("#","%23"))
	StartActivity(i)
End Sub
  
  Sub kharidbasteirancell_Click
	If CheckBox1.Checked=True Then
		If Spinner1.SelectedItem="60 مگابایت" Then
			call("*555*5*1*1*1#")
		End If
	End If
End Sub

اول اینکه مطالب مربوط به ussd مطالعه کردم .

سوالم صرفا ربطی به برنامه نویسی نداره ولی گفتم شاید کسی بتونه راهنمایی کنه .

من میخواهم بطور مثال کد #1*1*1*5*555* که مربوط به خرید بسته اینترنت ایرانسل هستا اجرا کنم ولی وقتی تست میکنم #1*5*555* اجرا میشه و بطور مستقیم تا مرحله اخر کد ussd اجرا نمیکنه . کدهای بسته های دیگه ام امتحان کردم باز نتیجه همین شد .