حذف یک سطر از طریق کلیک کردن روی همان سطر (می تونید یک ستون با نام حذف داشته باشید و کاربر روی آن کلیک کند)
اول از همه ببخشید که اینقدر دیر به دیر می یام اینجا
Private Sub DataGridView1_CellClick(ByVal sender As Object, ByVal e As System.Windows.Forms.DataGridViewCellEventArgs) Handles DataGridView1.CellClick
If e.ColumnIndex = 2 Then
If MessageBox.Show("آیا برای حذف مطمئن هستید؟", "www.barbodsoft.ir", MessageBoxButtons.YesNo) = Windows.Forms.DialogResult.Yes Then
Try
DataGridView1.Rows.RemoveAt(e.RowIndex)
Catch ex As Exception
MsgBox("این سطر قابل حذف نیست")
End Try
End If
End If
End Sub
تو کد بالا If e.ColumnIndex = 2 Then چک می کند که برروی ستون مورد نظر (ستون با نام حذف که اینجا ایندکس 2 هست)کلید شده یا نه و دقیقا در سطر بعدی از کاربر پرسیده می شود آیا مطمئن هست برای حذف یا خیر
آخرین ویرایش به وسیله barbodsoft.com : شنبه 23 دی 1391 در 15:51 عصر
کنترل ورودی در دیتاگرید ویو
در کد زیر تو سلول اگر کارکتری غیر از اعداد وارد شود اخطار خواهد داد
Private Sub DataGridView1_EditingControlShowing(ByVal sender As System.Object, ByVal e As System.Windows.Forms.DataGridViewEditingControlSho wingEventArgs) Handles DataGridView1.EditingControlShowing
If Me.DataGridView1.CurrentCell.ColumnIndex > 3 And Not e.Control Is Nothing Then
Dim tb As TextBox = CType(e.Control, TextBox)
AddHandler tb.KeyPress, AddressOf DataGridView1_KeyPress
End If
End Sub
Private Sub DataGridView1_KeyPress(ByVal sender As System.Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles DataGridView1.KeyPress
If (Char.IsNumber(e.KeyChar) <> True) Then
e.Handled = True
MessageBox.Show("لطفا فقط عدد وارد کنید", "", MessageBoxButtons.OK, MessageBoxIcon.Warning, MessageBoxDefaultButton.Button1, MessageBoxOptions.RightAlign)
End If
End Sub
آخرین ویرایش به وسیله barbodsoft.com : شنبه 23 دی 1391 در 15:45 عصر
سلام دوستان
من تو پروژم دیتا گریدامو اتو سیز میکنم اما میخوام فیلد اولم با بقیه اندازش فرق کنه میدونم اتو سایز با توجه به اندازه گرید ویو و تعداد ستون هاست...اما من میخوام بجز یک ستون بقیه هم اندازه باشن فقط ستون اول اندازش فرق کنه و بزرگتر باشه...میشه بگید چه جوری میشه این کارو کرد؟ممنون...
درباره گنترل داده ها که توی دیتاگرید وارد میشن و باید چک بشه که درست وارد شدن یا نه و نمایش پیغام مناسب در هنگام اصلاح رکورد ها و اضافه کردن رکورد جدیدممنون
سلام دوستان من توی یه پست هم نوشتم اما کسی حاظر به جواب دادن نشد.
مسئله من اینه که یه برنامه دیکشنری نوشتم با دیتابیس اکسس که دوتا کلومن داره یکی به نام ar و دیگریfa حالا من میخوام وقتی کلمه رو داخل تکست باکس وارد میکنم، سلول حاوی لغت به صورت اتوماتیک داخل یک تکست باکس دیگه کپی بشه!!
تا کاربر بتونه مرتب تر معنی رو ببینه یا در صورت لزوم کپی کنه.
البته در رویداد Textchanged تکست باکس 1 باید بنویسم اما نمیدونم چه کدی باید به کار ببرم که کلومن دوم انتخاب بشه.
آقا من سوالم غیر شرعی که نیست بدون اخطار پاکش میکنید:
عزیز من ببین فقط من مشکلم اینه که میخوام سلول کلومن دوم دیتابیس اکسس ام رو که در برنامه دیکشنری و از طریق سرچ در تکست باکس دو انتخاب شده بدون نیاز به کلیک کردن کاربر روی اون داخل تکست باکس 2 نشون داده بشه همین!!!!
آقا من سوالم غیر شرعی که نیست بدون اخطار پاکش میکنید:
عزیز من ببین فقط من مشکلم اینه که میخوام سلول کلومن دوم دیتابیس اکسس ام رو که در برنامه دیکشنری و از طریق سرچ در تکست باکس 1 انتخاب شده بدون نیاز به کلیک کردن کاربر روی اون داخل تکست باکس 2 نشون داده بشه همین!!!!
دوتاتايپيك خوب دررابطه با ديتاگريد ايجاد شده اما هيچكدوم اين قابليت رو ندارد كه :
يك سلول ديتاگريد كه به دو قسمت تقسيم بشه قسمت اول تكست باكس و قسمت دوم باتن و هنگامي كه روي تكست باكس فوكوس بشه باتن نمايش داده بشه خب حالا ايا اين كار امكان داره
قوانین سایت برنامه نویس [به هیچ عنوان از طریق پیام خصوصی به سوالات پاسخ داده نمیشود.]
حمید محرابی
چون وا نمیکنی گِرهای خود گِره مّشو / ابرو گشاده باش چو دستت گشاده نیست
سلام . چگونه مقادیر همه سلولهای سطری که در دیتا گرید انتخاب شده رو با دبل کلیک به تکست باکسهای فرم دیگری منتقل کنم (تک باکسها در فرم دیگری هستند) مرسی
سلام ببخشيد من توي ديتاگريدويو كه توي فرمم هست ميخوام يكي از ستوناش دكمه باشه كه اطلاعات رو تو db ذخيره كنه،ميشه لطف كنيد نحوه نوشت دستورات رو توي دكمه ديتا گريد توضيح بديد و يك نمونه كد برام بذاريد
با سلام من نیاز به یک استاد VB دارم که مرا در برنامه هایم راهنمایی کند هزینه آموزش با توافق پرداخت میشود لطفا در صورت تمایل
ایمیل ارسال فرمائید zalami_o@yahoo.com
با سلام ممنون از اینکه یک تاپیک برای دیتا گرید باز کردید
دوستان اگه لطف کنن و راجع به نحوه ذخیره اطلاعات در دیتا گرید ویو به نحوی که با وارد کردن مقادیر در سلول همان لحظه ذخیره شود توضیح دهند ٰٰ.ممنون میشم
یک مورد دیگه که من با سرچ به نتیجه نرسیدم اینه که با کلیک روی هر ستون مقادیر بر اساس همان ستون مرتب می شوند ولی اگه یک سلول از نوع باتون برای ویرایش وجود داشته باشه اون کد هم اجرا میشه .چطور میشه این مشکل رو حل کرد؟؟؟؟
Private Sub DataGridTakhsis()
connect.Open()
Dim DTakh As New OleDbDataAdapter
Dim DTakhset As New DataSet
Dim StrDB As String
StrDB = "SELECT takhnumber as [شماره ],takhDate as [تاریخ ],takhmablaghkol as [مبلغ ],bar01 as [مبلغ 01] "
(Takh = New OleDbDataAdapter(StrDB, connect)
این قسمت خطا میده مشکل چیه؟ ( DTakh.Fill(DTakhset, "takhsis")
( GridViewTakhsis.DataSource = DTakhset.Tables("takhsis")
connect.Close()
End Sub
اینم خطای برنامه
No value given for one or more required parameters.
سلام من میخوام اطلاعات یک دیتا گرید رو درون یک دیتا گرید دیگه ذخیره کنم چجوری این کار امکان داره؟؟؟؟؟؟
جواب به دست اومده با یه حلقه فور و یک دیتا گردید جدیده.خداییش خودم حوصلم نشد کد هاش رو بنویسم
آخرین ویرایش به وسیله hamidrezax1 : شنبه 24 بهمن 1394 در 13:13 عصر