[new_programer]

السلام عليكم

محتاج كود او طريقة لارسال نص رسالة بالنتسيق 
الرسالة المرسلة بتوصل بالشكل دة 
   

[new_programer]

دة الكود المستخدم

كود :

    Try
           Dim web As New WebBrowser
           web.Navigate("whatsapp://send?phone=" & txtmob.Text & "&text=" & txtmessage.Text.Replace(" ", "+") & "")
           'web.Navigate("whatsapp://send?phone=" & txtmob.Text & "&text=" & txtmessage.Text = "D:/99.pdf")
           Timer1.Start()


       Catch ex As Exception
           Timer1.Stop()
       End Try

كما حاولت ادراج مرفق مع الرسالة  - لم اتكمن من الوصول الى الطريقة

---- محتاج ارسل الرسلة بالشكل دة

[new_programer]

الحمد لله
توصلت للتنسيق افضل من السابق
بفضل هذا الكود

كود :

strMessage = LblCompany.Text & "%0a" & "Invoice Number : " & txtInvoiceno.Text & "%0a" & "Invoice Date : " & DtInvdate.Value.ToString("MM/dd/yyyy") & ""  
web.Navigate("whatsapp://send?phone=" & txtcontact.Text & "&text=" & strMessage & "")

اريد إرفاق صورة. او لوجو