پرینت یک فرم با ویژوال

[Farzadak2010]

سلام
من میخوام تو ویژوال یک فاکتور ایجاد کنم و اونو پرینت کنم
برای پرینت و طراحی فاکتور کدوم برنامه گزارشگیری رو پیشنهاد میکنید ؟
بدون برنامه هم چنین چیزی ممکن هست ؟
مثلا پرینت گرفتن از یک فرم برنامه در ویژوال
امیدوارم منظورمو درست رسونده باشم

[majidbahrami]

درووووووووووود...
بهتره شما فرم رو به کریستال رپورت بفرستی اونجا میتونی راحت پیرینت بگیری
با دستور زیر هم پیرنت میگره اما یه سری محدودیت ها داره... که پیشنهاد نمیکنم


Form1.PrintForm

یا حق

[majidbahrami]

این یه نمونه
این کد اول میاد کامند رو مخفی کنه و سپس یه پیرینت از فرم میگیره

موفق باشید

Private Sub Command1_Click()
Dim cur_cmd As CommandButton
For Each cur_cmd In Me.Controls
If TypeOf cur_cmd Is CommandButton Then
cur_cmd.Tag = cur_cmd.Visible
cur_cmd.Visible = False
End If
Next 'cur_cmd


Me.PrintForm


For Each cur_cmd In Me.Controls
If TypeOf cur_cmd Is CommandButton Then
cur_cmd.Visible = cur_cmd.Tag
End If
Next 'cur_cmd


End Sub