Printable View
سلام من برای گزارش گیریم از این قطعه کد استفاده کرده ام
e.Graphics.DrawString((GridRow.Cells(int).Value.To String), GridRow.Cells(int).InheritedStyle.Font, _
New SolidBrush(GridRow.Cells(int).InheritedStyle.ForeC olor), _
New RectangleF(ColumnLefts(i), tmpTop, ColumnWidths(i), _
CellHeight), StrFormat)
حالا اگه بخوابم فرمت عددم رو به سه رقم جدا تبدیل کنم چیکار باید کنمم؟ (GridRow.Cells(int).Value.ToString
نمیدونم کد کامل تون چیه، ممکنه اینکار رو انجام داده باشید، ولی صرفا محض یادآوری، اشیاء ای که خودتون ایجاد می کنید و Dispose شدنی هستند رو حتما Dispose کنید.نقل قول:
نوشته شده توسط mohammaduir
هر زمان دیگه به شیء اش نیازی نداشتید وقت مناسب Dispose کردنش رسیده.
منظورم اون SolidBrush ئه. یا مستقیما بعد استفاده اش متد Dispose اون SolidBrush رو فراخوانی کنید یا به روش اصولی و بهتر از Using استفاده کنید تا بصورت خودکار و تضمینی Dispose بشه.
اگر تعداد رقم بعد اعشار براتون مهم نیست از "N" استفاده کنید، اگر ارقام بعد اعشار باید گرد و حذف شوند از "N0" و اگر قراره تا دو رقم بعد اعشار نمایش داده بشه "N2" و ...
Using brush As New SolidBrush( GridRow.Cells(int).InheritedStyle.ForeColor )
e.Graphics.DrawString( GridRow.Cells(int).Value.ToString("N") ) _
, GridRow.Cells(int).InheritedStyle.Font, brush _
, New RectangleF( ColumnLefts(i), tmpTop, ColumnWidths(i), CellHeight), StrFormat)
End Using
فرض رو بر این گرفته ایم که GridRow.Cells(int).Value یک عدد ئه. اگر مطمئن نیستید که مقدار داخل GridRow.Cells(int).Value عدد ئه، مثلا احتمال داره String باشه و لذا ممکنه که فرمت "N" برای اون نوع داده معتبر نباشه، بهتره قبلش به Double تبدیلش کنیم تا جای بروز مشکل نباشه :
Using brush As New SolidBrush( GridRow.Cells(int).InheritedStyle.ForeColor )
Dim n = Convert.ToDouble( GridRow.Cells(int).Value )
e.Graphics.DrawString( n.ToString("N") _
, GridRow.Cells(int).InheritedStyle.Font, brush _
, New RectangleF(ColumnLefts(i), tmpTop, ColumnWidths(i), CellHeight), StrFormat)
End Using