چگونه می توان در حین درج اعداد در یک سلول vsflexgrid7 طول اعداد بیشتر از 12 رقم نباشد.

[alivafadarpour]

چگونه می توان در حین درج اعداد در یک سلول vsflexgrid7 طول اعداد بیشتر از 12 رقم نباشد.یعنی اگر ما رقم سیزدهم را وارد کردیم درج نکند.

[ermia2008]

سلام دوست عزیز.
برای این کارمی تونی تو رویداد Change چک کنی که اگه Len از 12 بیشتر شده رقم آخرو برداره. خواستید یه Sample براتون بذارم.

[alivafadarpour]

ممنون عزیزم . اگر sample برایم بذارید خیلی خیلی بزرگواری می کنید.

[ermia2008]

سلام.
کدی که طول رشته ورودی رو در حین درج عدد چک کنه اینه ولی Vsflexgrid تو این زمینه یه باگ داره.



Private Sub VSFlexGrid1_ChangeEdit()

Row = VSFlexGrid1.RowSel
Col = VSFlexGrid1.ColSel
len_cell = Len(VSFlexGrid1.TextMatrix(Row, Col))

If len_cell > 2 Then

VSFlexGrid1.SetFocus
VSFlexGrid1.TextMatrix(Row, Col) = Left(VSFlexGrid1.TextMatrix(Row, Col), 2)

End If

End Sub


من این چیزی رو که شما می خوایدرو با Msflexgrid نوشتم که در حین وارد کردن عدد هم عدد رو 3 تا 3تا جدا می کنه و هم اینکه نمی ذاره که طول عدد از 12 رقم بیشتر بشه. برای وارد کردن عدد در هر خانه روی اون دابل کلیک کنیدوبرای ثبت تغییرات اینتر رو بزنید.اینم لینک دانلودش:



http://ermia2008.persiangig.com/DirectEnteringText.rar

[alivafadarpour]

سلام .دوست عزیز .چون من تمام نرم افزارهای نوشته شده را با vsflexgrid7 نوشتم .