سوال در مورد کنترل VSFlexGrid

[isaac23]

سلام دوستان

من یه جدول دارم که اسامی چند شخص داخلش قرار داره به فرض تعداد رکورد هاش 20 تا هستش

می خوام بدونم چطوری میشه مثلا ردیف 5 و 10 و 17 رو به حالت انتخاب در آورد و اونا رو پاک کرد .. مثلا کاربر میاد به دلخواه چند تا ردیف انتخاب که و اونا رو پاک کنه .

و سوال دوم چطوری به VSFlexGrid گزینه CheckBox اضافه کرد و اونا رو به حالت انتخاب در آورد یعنی داخلش تیک بخوره هر گزینه ای که قرار حدف بشه

[vbhamed]

سلام
Private Sub Form_Load()

With VSFlexGrid1
.Editable = flexEDKbdMouse
.ColDataType(2) = flexDTBoolean
End With

End Sub

Private Sub cmdRemove_Click()

With VSFlexGrid1
Dim i%
For i = 0 To .Rows - 1
If Val(.TextMatrix(i, 2)) = -1 Then
MsgBox i
'remove code here
End If
Next
End With

End Sub

[isaac23]

میشه دقیق تر بگی متوجه نشدم باید چیکار کرد؟؟؟

[vbhamed]

سلام
تو اون قسمتی که نوشته شده 'remove code here می‌تونی کد حذف سطر یا رکورد دلخواه رو بزاری، برنامه رو که اجرا کنی ستون سوم چک باکسی شده و می‌تونی سطرهای مورد نظر رو انتخاب کنی و دکمه رو بزنی

[isaac23]

سلام
تو اون قسمتی که نوشته شده 'remove code here می‌تونی کد حذف سطر یا رکورد دلخواه رو بزاری، برنامه رو که اجرا کنی ستون سوم چک باکسی شده و می‌تونی سطرهای مورد نظر رو انتخاب کنی و دکمه رو بزنی

وقتی یک پروژه جدید باز میکنم مشکلی نداره خیلی قشنگ کار میکنه اما تو پروژه اصلی خودم این اخطار رو میده ....


130975

[vbhamed]

سلام
روی چه دستوری این خطا رو میده، احتمالا رفرنسهای پروژه درست نیست

[isaac23]

سلام
روی چه دستوری این خطا رو میده، احتمالا رفرنسهای پروژه درست نیست
روی این دستور
With VSFlexGrid1
.Editable = flexEDKbdMouse
.ColDataType(2) = flexDTBoolean
End With

البته زمانی که پروژه جدید باز میکنم مشکلی نداره ولی تو پروژه اصلی موندم چرا این خطا رو میده