منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

نسخة كاملة : Copy and cut and Paste
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
الصفحات : 1 2
 
السلام عليكم ورحمة الله وبركاته
 
برجاء المساعدة في المشروع المرفق  لعمل
 
Cut , Copy And Paste
 
المشكلة عندي في كود اللصق ()
Paste
 
مع جزيل الشكر
وعليكم السلام ورحمة الله وبركاته

تفضل التعديل في كود اللصق () Paste

Private Sub PasteClipboardValue()
Dim arr() As String = Clipboard.GetText.Split(vbTab)
For i = 1 To arr.Count - 1
DataGridView1.CurrentRow.Cells(i - 1).Value = arr(i)
Next
End Sub
(30-11-17, 11:44 AM)ﻣﺒﺘﺪﺉ كتب : [ -> ]وعليكم السلام ورحمة الله وبركاته

تفضل التعديل في كود اللصق () Paste

   Private Sub PasteClipboardValue()
       Dim arr() As String = Clipboard.GetText.Split(vbTab)
       For i = 1 To arr.Count - 1
           DataGridView1.CurrentRow.Cells(i - 1).Value = arr(i)
       Next
   End Sub

السلام عليكم اخي الحبيب

شكرا جزيلا لتعاون حضرتك

وضعت الكود ولكن اجد انه يلصق فقط الخانه الاولي من الصف وهي ID

ولا يلصق الصف بالكامل

مع الشكر الجزيل
اذا طبقت على المرفق

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

ولا اعلم عن خطواتك!
(30-11-17, 03:22 PM)ﻣﺒﺘﺪﺉ كتب : [ -> ]اذا طبقت على المرفق

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

ولا اعلم عن خطواتك!

عفوا اخي الكريم

ربما انا اخطات في شيء ما

فمن فضلك شوف المرفق تبعي بعد التعديل

ولو تسمح ترسل لي المشروع المعدل

مع جزيل الشكر
التحديد يكون لكامل السطر وليس لخلية واحدة
فوجدت انك عطلت السطر
Me.DataGridView1.SelectionMode = DataGridViewSelectionMode.FullRowSelect
وهذا سبب المشكلة

ايضا من اجل عدم حصول مشكلة اللصق يجب تعطيل تعدد الاختيار للأسطر بحيث تكون
Me.DataGridView1.MultiSelect = False
(30-11-17, 03:56 PM)ﻣﺒﺘﺪﺉ كتب : [ -> ]التحديد يكون لكامل السطر وليس لخلية واحدة
فوجدت  انك عطلت السطر
Me.DataGridView1.SelectionMode = DataGridViewSelectionMode.FullRowSelect
وهذا سبب المشكلة

ايضا من اجل عدم حصول مشكلة اللصق يجب تعطيل تعدد الاختيار للأسطر بحيث تكون
Me.DataGridView1.MultiSelect = False

اسف اخي الحبيب .... غلبتك معايا

نفذت ولسه برضه Huh Huh Huh
(30-11-17, 04:28 PM)Amir_alzubidy كتب : [ -> ]تابع


الف الف الف شكر  لمساعدات حضراتكم المتواصلة

الكود يعمل تماام الان الحمد لله Smile Smile Smile

بس يبقي شيء بسيط وهو بعد عمل   cut  or  paste

فان الداتا لا تخزن في الجدول

مع خالص الاحترام والتقدير
Amir_alzubidy
(30-11-17, 09:32 PM)khaled12345 كتب : [ -> ]
(30-11-17, 04:28 PM)Amir_alzubidy كتب : [ -> ]تابع


الف الف الف شكر  لمساعدات حضراتكم المتواصلة

الكود يعمل تماام الان الحمد لله Smile Smile Smile

بس يبقي شيء بسيط وهو بعد عمل   cut  or  paste

فان الداتا لا تخزن في الجدول

مع خالص الاحترام والتقدير

السلام عليكم ورحمة الله وبركاته الاخوة الاعزاء

الحمد لله

الكود الان يعمل معي بشكل ممتاز

مع الشكر لكم جميعا

والشكر الخاص للاستاذ مبتديء والاستاذ  Amir_alzubidy

وبارك الله لكم جميعا 

 والمشروع النهائي بالمرفق
الف الف الف شكر
الصفحات : 1 2