منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
تغيير اللون الى لون غير معروف 43:43:43 - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : تغيير اللون الى لون غير معروف 43:43:43 (/showthread.php?tid=25479)

الصفحات: 1 2


RE: تغيير اللون الى لون غير معروف 43:43:43 - elgokr - 22-06-18

استخدم هذا الكود
كود :
       Dim SP_ As String() = Split("35.583038,8.667192", ",")
       MsgBox(SP_(0))
       MsgBox(SP_(1))

تحياتى لك



RE: تغيير اللون الى لون غير معروف 43:43:43 - hichem1 - 22-06-18

ما مشكلة عذا الكود ؟ :
TextBox2.Text = WebBrowser1.Document.GetElementById("location").InnerText
أريد من الtextbox2 أن يساوي هذه القيمة بالصورة بحيث أجلب الإحداثيات إليه
كنت أخطط لإستعمالل هذا الكود لكنه لا يعمل 
ملاحظة ال id صحيحة
الموقع : http://latitudelongitude.org/address-latlong


RE: تغيير اللون الى لون غير معروف 43:43:43 - elgokr - 22-06-18

اليك مثال مرفق بالرد السورد + البرنامج

مع صور لتوضيح المشروع المرفق

1- عند فتح البرنامج.


عند تشغيل البرنامج يبقي زر Search... 
غير مفعل حتى اكتمال تحميل الصفحة داخل
WebBrowser

ويمكنك الاستفادة من ذلك من خلال اخفاء 
WebBrowser

عن طريق تحديد GroupBox2
وجعل قيمة Size 0;0

وتصغير حجم اطار الفورم 
بحيث يبقى الشكل عبارة عن زر البحث وجلب الاحداثيات
الامر يرجع لك اذا كنت تريد اخفاء الموقع...

2- صورة عند كتابة اسم الدولة للبحث كمثال


3- صورة عند ضغط على زر Search...


4- صورة عند الضغط على زر Get Data... لجلب الاحداثيات


يمكنك تحميل المشروع من المرفقات

تحياتى لك
وتمنياتى لك التوفيق



RE: تغيير اللون الى لون غير معروف 43:43:43 - hichem1 - 22-06-18

والله إنك معلم <3 <3