تقسیم بندی در گزارش

[smderfan]

سلام
چهار تکس باکس بنامهای A - B - C -D در محیط ریپورت ایجاد کرده ام که مقدار خود را باید از تکس F دریافت کنند. مقدار تکس باکس F عددی است یعنی مقداری مشابه 15240
حالا می خوام این عدد در چهار تکس باکس بالا بصورت سه تایی از سمت راست تقسیم بشه.
و چون پنج رقم هست فقط در دو تکس جا بگیره ولی اگر تکس متغیر بود یعنی تا 12 رقم سه تا سه تا از سمت راست مجزا بشه.
یعنی عدد باید به این صورت تبدیل بشه
000000015240
که 12 رقم تبدیل بشه ولی صفر نمایش داده نشه.
با تشکر

[mehdihamedali]

میتونی یک تابع بنویسی و اول تعداد رو چک کنی بعد از تابع mid استفاده کنی
تابع mid



Public Shared Function Mid(ByVal str As String, ByVal Start As Integer, Optional ByVal Length As Integer) As String

[shaghaghi]

سلام
چهار تکس باکس بنامهای A - B - C -D در محیط ریپورت ایجاد کرده ام که مقدار خود را باید از تکس F دریافت کنند...یعنی عدد باید به این صورت تبدیل بشه 000000015240 که 12 رقم تبدیل بشه ولی صفر نمایش داده نشه. با تشکر
سلام
ریپورت این نمونه را ملاحضه نمایید

[smderfan]

سلام و با تشکر
تنها مشکلی که وجود داره اینه که اگر عددی مشابه 125012 رو به گزارش بدیم سه رقم اول یعنی 012 بصورت 12 درج می شه.

[shaghaghi]

سلام
مقادیر Control Source چهار تکست باکس را به این شکل اصلاح کنید:


D=IIf(Val([A]+[B]+[C])=0;Val(Right([F];3));Right([F];3))
C=IIf(Val([A]+[B])=0;Val(Mid([F];7;3));Mid([F];7;3))
B=IIf(Val([A])=0;Val(Mid([F];4;3));Mid([F];4;3))
A=Val(Mid([F];1;3))