یه سوال آسون از اساتید گرانقدر!!!

[elham99]

:خجالت:
میخواستم بدونم معادل دستور زیر در vb.net چیه?

من از vb6 کوچ کردم به .net

load(pactform
pactform.show()
me.close()

فقط اگه لود اول حذف بشه نمیشه ها چون اصلا صفحه لود نمیشه:خجالت::خجالت::خجالت::خ� �الت:

[فرید نجفلو]

اگه منظورتون همون باز کردن یک فرم دیگس تو دات نت چیزی به عنوان Form.load نداریم همون .Show کافیه
me.close هم درسته

[elham99]

کافی نیست آخه
منم این فکرو میکردم ولی نشد
توvb6 این 3مرحله بو
1/load
2/show
3/unload
ولی تو.net من دومرحله رو انجام دادم
1/show
2/close
ولی فرم لود نمیشه فرم داخل یه فرم دیگه باز نمیشه

[فرید نجفلو]

اگه از روش MDI استفاده می کنید:
Form1.MdiParent = FrmMain
Form1.Show()


ولی اگه می خواید تو همین فرم باز بشه:

Form1.TopLevel = False
Form1.Parent = Me
Form1.Show()

[elham99]

mamnon vali mishe begin age ba formhaye khodam bashe daghighan chi mishe



PActNo = 22
ActStringName = PCommand2.Caption
Load PActForm
PActForm.Show
Unload PFormMenu


moadele in manzorame

be zabane vb.net

[فرید نجفلو]

اول اینکه لطف کنید با حروف فارسی بنویسید کار شما مغایر قوانین سایت (http://barnamenevis.org/misc.php?do=showrules) هست
دوم :
1-
PActNo = 22
اینو دقیقا متوجه نشدم چون این دیگه تبدیل نمی خواد
21
ActStringName = PCommand2.Caption

میشه:
ActStringName = PCommand2.Text

3-
Load PActForm
معادل نداره(نیزی هم نیست) وقتی از فرم استفاده کردید لود میشه

4-
PActForm.Show

خودش این کد درسته

5-
Unload PFormMenu
بستن فرم
PFormMenu.Close
اگه کاملا می خواهید یک فرم را از بین ببرید(پاک سازی)


6-

PFormMenu.Dispose


من از vb6 کوچ کردم به .net

آیا قبل از کوچ مطالعه ای درباره VB.Net داشتید!!!

[hormoz64]

مرسی عزیز بله مطالعه کردم زیادم متفاوت نیستن
درمورد جوابتم همین مراحلو انجام دادم ولی جواب نمیده وقتی میخوام از صفحه اول برم صفحه انتخابی بعد یبرنامه کلا بسته میشه!!
من این مراحلو بصورت زیر نوشتم
pactform.show()
me.close()
درحالی که تو vb6
Load PActForm
PActForm.Show
Unload PFormMenu
اینجوری بوده!!
نمدونم شایدم قسمتای دیگه برنامه مشکل داره!!!

[tstsst]

با اجازه از Farid.N (http://barnamenevis.org/member.php?243869-Farid.N)

تو My Project بخش Application
Shutdown mode رو روی When last form closes بزار یا me.close رو حذف کن

[elham99]

دروووود بر تو وآقا فرید
مشکلش فعلا که حل شد
حالا یدونه واسه پرینت مشکل دارم چند جا از این استفاده کردما همه جا خطوط ستاره دار خطا میده plz help me:لبخندساده:

Private Sub Print_Command_Click(ByVal eventSender As System.Object, ByVal eventArgs As System.EventArgs) Handles Print_Command.Click
Dim blnAutoRedraw As Boolean
Dim intBtnClicked As Short
Dim intlsReady As Short
intlsReady = MsgBox("Please, Prepare the Printer", MsgBoxStyle.OKOnly + MsgBoxStyle.Information, "Print")
'UPGRADE_ISSUE: Form property PrintFP.AutoRedraw was not upgraded. Click for more: 'ms-help://MS.VSCC.v90/dv_commoner/local/redirect.htm?keyword="CC4C7EC0-C903-48FC-ACCC-81861D12DA4A"'
' blnAutoRedraw = Me.AutoRedraw
If (intlsReady = MsgBoxResult.OK) Then
On Error GoTo ErrHandler
'UPGRADE_ISSUE: Form property PrintFP.AutoRedraw was not upgraded. Click for more: 'ms-help://MS.VSCC.v90/dv_commoner/local/redirect.htm?keyword="CC4C7EC0-C903-48FC-ACCC-81861D12DA4A"'
' Me.AutoRedraw = True
Print_Command.Visible = False
Back.Visible = False
Me.PrintForm1.Print(Me, PowerPacks.Printing.PrintForm.PrintOption.Compatib leModeClientAreaOnly)
Print_Command.Visible = True
Back.Visible = True
'UPGRADE_ISSUE: Form property PrintFP.AutoRedraw was not upgraded. Click for more: 'ms-help://MS.VSCC.v90/dv_commoner/local/redirect.htm?keyword="CC4C7EC0-C903-48FC-ACCC-81861D12DA4A"'
' Me.AutoRedraw = blnAutoRedraw
Exit Sub
ErrHandler:
'UPGRADE_ISSUE: Form property PrintFP.AutoRedraw was not upgraded. Click for more: 'ms-help://MS.VSCC.v90/dv_commoner/local/redirect.htm?keyword="CC4C7EC0-C903-48FC-ACCC-81861D12DA4A"'
' Me.AutoRedraw = blnAutoRedraw
intBtnClicked = MsgBox("A Printer Problem Exists", MsgBoxStyle.Critical, "Print Error")
Print_Command.Visible = True
Back.Visible = True
End If

End Sub

[elham99]

ببخشید اون خطوطی که غیر فعالش کردم یعنی
1.' blnAutoRedraw = Me.AutoRedraw
2. ' Me.AutoRedraw = True
3. Me.AutoRedraw = blnAutoRedraw
4. Me.AutoRedraw = blnAutoRedraw

[فرید نجفلو]

تو دات نت فرم خاصیتی به نام AutoRedraw و فکر نکنم نیازی هم داشته باشید
نزدیک ترین خاصیت به این مورد ResizeRedraw است که رسم مجدد خودکار هنگام تغییر اندازه فرم رو مشخص می کنه

و در ضمن به محض اینکه تونستید کریستال ریپورت رو برای کارهای چاپ یاد بگیرید
در مورد روش شما علاوه بر عدم انعطاف و... یک مورد به چشم میزنه . بعد از چاپ می بینید که کیفیت صفحه چاپی پایینه!

[elham99]

مرسی آقا فرید ولی این برنامه آپگرید شده وی بی 6 هستش!!!عدم انعطافش هم بخاطر اونه!!دارم یکارایی واسش میکنم ولی اول باید همه خطاهاشو رفع کنم
اگه برنامه بهتری برای پرینت دارین ممنون میشم بهم کمک کنین!!

[فرید نجفلو]

اگه برنامه بهتری برای پرینت دارین ممنون میشم بهم کمک کنین!!
گفتم که کریستال ریپرت خوبه
اما اگه پرینتتون در حد چند تا لیبل ساده س Reporter همراه ویژوال اتدیو هم بد نیست

[elham99]

من چون از وی بی اومدم یکم ناآشنام بیشتر راهنمایی کنین لطفا
طرز استفادشون
کریستال ریپورت و ریپورتر همراه ویژوال؟؟؟
ممنون میشم

[Hybrid]

من چون از وی بی اومدم یکم ناآشنام بیشتر راهنمایی کنین لطفا
طرز استفادشون
کریستال ریپورت و ریپورتر همراه ویژوال؟؟؟
ممنون میشم

واسه استفاده از کریستال ریپورت باید نسخه Crystal report sap for visual studio رو از اینترنت گیر بیارین و نصبش کنین خودش به صورت خودکار به ویژوال استودیو اضافه میشه.واسه آموزشش هم خوب منابعش خیلی خیلی زیاده . Reporter مایکروسافت هم که نصبه روی ویژوال استودیو.

[فرید نجفلو]

دوست عزیز به نظر شما می شه یک کتاب چند صد صفحه ای رو اینجا توضیح داد؟!
شما باید خودتون برید مطالعه کنید و اگه مشکلی داشتید اینجا بپرسید.