PDA

View Full Version : سوال در مورد Data Report



shedayat
سه شنبه 17 شهریور 1388, 18:16 عصر
سلام.
می خواستم ببینم میشه که کپشن یک لیبل خواص رو توی Data Report با کد نویسی تغییر داد؟ (معادل این کد:" Form1.Label1.Caption="ALI)

vahid_visualbasic
سه شنبه 17 شهریور 1388, 18:36 عصر
سلام.
می خواستم ببینم میشه که کپشن یک لیبل خواص رو توی Data Report با کد نویسی تغییر داد؟ (معادل این کد:" Form1.Label1.Caption="ALI)

بله میشه

"drp.Sections("Header").Controls("Label13").Caption = "ali

drp اسم فرم دیتا ریپورتت هست

header هم اسم قسمتی در دیتا ریپورتت که لیبل در اونجا قرار گرفته

saeedzx
سه شنبه 17 شهریور 1388, 19:05 عصر
دوست من شما میتونی اینطوری کار کنی
PrintM.Sections("Section3").Controls("Label11").Caption = Option.Text4.Text
که دقت کنی توی کادرSection3 کپشن Label11 رو عوض میکنه

vahid_visualbasic
چهارشنبه 18 شهریور 1388, 01:42 صبح
دوست من شما میتونی اینطوری کار کنی
PrintM.Sections("Section3").Controls("Label11").Caption = Option.Text4.Text
که دقت کنی توی کادرSection3 کپشن Label11 رو عوض میکنه

بله اینم میشه ولی کد شما غلط هست برای مساوی قرار دادن کپشن با متن تکست باکس نوشتن option لازم نیست صحیحش اینه
PrintM.Sections("Section3").Controls("Label11").Caption = Text4.Text

در ضمن ایشون خواستن کپشن رو ali قرار بدن نه متن تکست باکس!!!

"PrintM.Sections("Section3").Controls("Label11").Caption = "ali

saeedzx
چهارشنبه 18 شهریور 1388, 10:16 صبح
دوست من این ربطی به مسئله نداشت این option اسم form است که من به طور پیش فرض گذاشتم
شما قبل جواب دادن باید صورت مسئله رو خوب بخونید :متفکر:

vahid_visualbasic
چهارشنبه 18 شهریور 1388, 12:20 عصر
دوست من این ربطی به مسئله نداشت این option اسم form است که من به طور پیش فرض گذاشتم
:متفکر:
از کی تاحالا اسم پیش فرض فرم ها رو تو وی بی از frm و form به option تغیر دادن ما نفهمیدیم؟؟؟؟


شما قبل جواب دادن باید صورت مسئله رو خوب بخونید
شما صورت مسئله رو خوندی که یارو میگه میخوام ali رو کپشن قرار بدم بهش کد تکست باکس میدی؟؟؟؟!!!

shedayat
چهارشنبه 18 شهریور 1388, 18:56 عصر
حالا دو تا سوال دیگه:
1-چه طوری می شه توی Data Report به اندازه ای که رکورد در داخلش هست به ترتیب شماره زد؟
2- چه طور میشه مقدار RptText (اگه اشتباه نباشم) که خود برنامه مقدار دهی می کنه رو دستکاری کرد؟
از همکاری همتوت هم ممنون

vahidm
پنج شنبه 19 شهریور 1388, 19:38 عصر
سلام
در مورد سوال آخریتون قسمت اولش جوابتون به شکل زیر می باشد
اینو در قسمت initialize دیتا ریپورتت بنویس

RECORDNUM = 0
Set myf = New StdDataFormat
Set DataReport11.Sections("section1").Controls("TEXT5").DataFormat = myf


اینم اضافه کن

Private Sub myf_Format(ByVal DataValue As StdFormat.StdDataValue)
RECORDNUM = RECORDNUM + 1
DataValue = RECORDNUM
End Sub