![]() |
|
[VB.NET] سؤال عن الداتا جريد فيو - نسخة قابلة للطباعة +- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb) +-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182) +--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183) +--- الموضوع : [VB.NET] سؤال عن الداتا جريد فيو (/showthread.php?tid=27782) |
سؤال عن الداتا جريد فيو - M.SOFT - 04-12-18 اولا احب اشكر الاعضاء المحترمين الي ف المنتدى على جديتهم ومرورهم الكريم ع الاسئله والي صراحة استفدت منهم كتير ولهم مني فائق الاحترام سؤالي عن كود للداتا جريد فيو عاوز اخلي انتر يمشي افقي فيها يعني انا واقف على خليه رقم 0 لما ادوس انتر يمشي للخليه رقم 2 واما يخلص الاعمده ينزل سطر لاسفل انا جربت الكود الي هوا Public Class exDataGridView Inherits DataGridView Protected Overrides Function ProcessDialogKey(ByVal keyData As Keys) As Boolean Dim key As Keys = (keyData And Keys.KeyCode) If key = Keys.Enter Then If Me.CurrentCell.ColumnIndex = Me.Columns.Count - 1 Then Me.CurrentCell = Me.Item(0, Me.CurrentRow.Index) Return Me.ProcessDownKey(keyData) Else Return Me.ProcessRightKey(keyData) End If End If Return MyBase.ProcessDialogKey(keyData) End Function Protected Overrides Function ProcessDataGridViewKey(ByVal e As KeyEventArgs) As Boolean If e.KeyCode = Keys.Enter Then If Me.CurrentCell.ColumnIndex = Me.Columns.Count - 1 Then Me.CurrentCell = Me.Item(0, Me.CurrentRow.Index) Return Me.ProcessDownKey(e.KeyData) Else Return Me.ProcessRightKey(e.KeyData) End If End If Return MyBase.ProcessDataGridViewKey(e) End Function End Class بس انا خلصت البرنامج وعشان افضل اغير ف الداتا جريد فيو اني اشيل القديمه واحط الجديده واسمي الاعمده وكدا دا هياخد وقت كبير اووي فلو ينفع كود يتحط فاي حدث خاص بالداتا جريد فيو ماشي ولكم الشكر السؤال التاني ازاي اخلي انتر يعمل سليكت للصف الي انا واقف فيه يني مثلا Private Sub DGV_CellContentClick(ByVal sender As System.Object, ByVal e As System.Windows.Forms.DataGridViewCellEventArgs) Handles DGV.CellContentClick Try IS_YES = True Close() Catch ex As Exception MessageBox.Show(ex.ToString) End Try End Sub يعني مثلا دي فورم لما بدوس على خليه فيها بيختار الخليه الي اختارتها وبيقفال انا عاوز بقا انتر يعمل كدا RE: سؤال عن الداتا جريد فيو - محمد كريّم - 04-12-18 جرب تغير ProcessRightKey إلى ProcessLeftKey |