نمایش نتایج 1 تا 10 از 10

نام تاپیک: پرینت گرفتن در ویژوال بیسیک

Hybrid View

پست قبلی پست قبلی   پست بعدی پست بعدی
  1. #1
    مهمان

    Tick پرینت گرفتن در ویژوال بیسیک

    آیا در ویژوال بیسیک می توان از روی فرم (متنی که بر روی فرم نوشته شده است)پرینت گرفت.
    مثلا من در یک - تکست باکس - متنی را نوشته ام و می خواهم اطلاعات داخل آن را پرینت بگیرم.
    مثلا دکمه ای بر روی فرم بگذارم و با فشار آن دکمه پرینت آغاز شود.
    اگر می شود کد آن و طریقه درست کردن آنرا برایم بنویسید .
    از تمامی شما متشکرم.
    :o :roll: :cry:

  2. #2
    کاربر دائمی
    تاریخ عضویت
    بهمن 1381
    محل زندگی
    مشهد مقدس
    پست
    416
    هر وقت آن کلید را زدی:
    آن متن را باید با دستور
    Printer.print textbox.textr
    به پرینتر بفرستید و بادستور
    Printer.fontname و Printer.fontsize و غیره آن را فرمت بندی کنید
    و سپس در آخر برای انجام چاپ دستور
    Printer.enddoc را صادر نمایید
    امکانات بسیار دیگری نیز دارد. :|

  3. #3
    مهمان
    ba tashakor

    agar momken ast mavared digar :| ra niz benevisid

  4. #4

    نقل قول: پرینت گرفتن در ویژوال بیسیک

    اگر بخوایم که در یک جای مشخص مثلا وسط برگمون چاپ بشه باید گه کار کنیم
    اگر میشه اینم لطف کنید توضیح بدید

  5. #5
    کاربر دائمی آواتار M.T.P
    تاریخ عضویت
    دی 1388
    محل زندگی
    Planet Earth
    پست
    1,769

    نقل قول: پرینت گرفتن در ویژوال بیسیک

    خصوصیات CurrentX و CurrentY شیء Printer موقعیت آن برای چاپ را برمیگرداند.

  6. #6
    کاربر تازه وارد آواتار 850725115
    تاریخ عضویت
    دی 1387
    محل زندگی
    سبزوار مشهد
    پست
    64

    نقل قول: پرینت گرفتن در ویژوال بیسیک

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

  7. #7

    نقل قول: پرینت گرفتن در ویژوال بیسیک

    نقل قول نوشته شده توسط 850725115 مشاهده تاپیک
    تو رو خدا ی سورس بزار من خنگم بفهمم کل اینترنت رو گشتم

    Private Sub Command1_Click()
    Dim s As String
    Dim f As New StdFont
    s = Text1.Text
    f.Name = "Tahoma"
    f.Size = 14
    f.Charset = 178 'Arabic character set: 178
    With Printer
    Set .Font = f
    .CurrentX = (.Width - .TextWidth(s)) / 2
    .CurrentY = 0
    Printer.Print s
    .EndDoc
    End With
    End Sub

  8. #8
    کاربر تازه وارد آواتار 850725115
    تاریخ عضویت
    دی 1387
    محل زندگی
    سبزوار مشهد
    پست
    64

    نقل قول: پرینت گرفتن در ویژوال بیسیک

    ممنونم دوست عزیز خیلی زحمت کشیدید میتونم شمارتون رو داشته باشم

  9. #9
    کاربر تازه وارد آواتار 850725115
    تاریخ عضویت
    دی 1387
    محل زندگی
    سبزوار مشهد
    پست
    64

    نقل قول: پرینت گرفتن در ویژوال بیسیک

    از خجالتتون در میام حسابی اگه محبت کنید ی راه ارتباطی بدین مثلا تلفنتون

    شماره بنده 09153221621

  10. #10
    کاربر تازه وارد آواتار 850725115
    تاریخ عضویت
    دی 1387
    محل زندگی
    سبزوار مشهد
    پست
    64

    نقل قول: پرینت گرفتن در ویژوال بیسیک

    از خجالتتون در میام حسابی اگه محبت کنید ی راه ارتباطی بدین

قوانین ایجاد تاپیک در تالار

  • شما نمی توانید تاپیک جدید ایجاد کنید
  • شما نمی توانید به تاپیک ها پاسخ دهید
  • شما نمی توانید ضمیمه ارسال کنید
  • شما نمی توانید پاسخ هایتان را ویرایش کنید
  •