نگرفتن #

[hemmaty76 175]

سلام دوستان

اسم دیگع ای برای تایپک ب ذهنم نرسید

dim ph as phonecalls

StartActivity(cl.Call("*140#")

دوستان این کدو ببینین

مربع داخل تماس قرار نمیگیره

یعنی *140 فقط گرفته میشه

[shahab.es 5,429]

سلام دلاور

این تابع

Sub Call(Command As String)
	Dim i As Intent
 i.Initialize(i.ACTION_CALL,"tel:" & Command.Replace("#","%23"))
 StartActivity(i)
End Sub

اینم روش استفاده

call("*141*1#")

موفق باشید