امتیاز موضوع:
  • 18 رای - 2.56 میانگین
  • 1
  • 2
  • 3
  • 4
  • 5
سورس کد زوم کردن بر روی عکس ویژوال بیسیک 6
#1
درود
در این سورس یاد میگیرید که چگونه بر روی عکس زوم کنید و برعکس زوم هم انجام بدید (یعنی بزرگنمایی عکس و کوچک کردن عکس)





کد:
Public Sub ZoomPicture(pct As PictureBox, zoom As Double)
With pct
.Width = .Width * zoom
.Height = .Height * zoom
.PaintPicture .Picture, 0, 0, .ScaleWidth, .ScaleHeight
End With
End Sub
'usage (I had two buttons in control array)
Private Sub Command1_Click(index As Integer) '============================================
If index = 0 Then ZoomPicture Picture1, 1.1
Else
ZoomPicture Picture1, 0.9
End If
End Sub

 

 
خرید کالا زیر قیمت بازار !
amshop.ir
http://www.am-shop.ir/
پاسخ
#2
پاسخ


موضوعات مشابه ...
موضوع نویسنده پاسخ بازدید آخرین ارسال
  سورس کدهای ویژوال بیسیک Amin_Mansouri 8 9,000 05-15-2017، 04:35 PM
آخرین ارسال: minarad69
  سورس کد شماره گیری از مودم (ویژوال بیسیک 6 ) Amin_Mansouri 1 4,224 05-07-2017، 06:54 PM
آخرین ارسال: alikorg
  چگونه فایل exe با ویژوال بیسیک بسازیم ؟ Amin_Mansouri 4 9,514 08-13-2015، 10:08 PM
آخرین ارسال: Amin_Mansouri
  مشکل با ارور ویژوال بیسیک aghamali 4 3,953 07-03-2015، 11:14 AM
آخرین ارسال: aaaaaaaaa
  سورس کد کار با وب کم (ویژوال بسیک 6) Amin_Mansouri 1 6,084 04-20-2015، 10:10 PM
آخرین ارسال: hackert41389
  مشکل با paste بیسیک 6 aghamali 1 1,533 01-18-2015، 08:53 PM
آخرین ارسال: aghamali
  ....... کردن دیتا گرید aghamali 4 2,285 11-15-2014، 10:50 AM
آخرین ارسال: aghamali
  2 مشکل بیسیک 6 در ویندوز سون aghamali 3 3,938 11-07-2014، 04:25 PM
آخرین ارسال: aghamali
  سورس کد ذخیره میخوام روشنا 5 4,829 06-25-2014، 08:46 AM
آخرین ارسال: Amin_Mansouri
  دریافت سورس سایت بصورت یونیکد aleas 3 2,530 06-07-2014، 09:19 PM
آخرین ارسال: aleas

پرش به انجمن:


کاربران در حال بازدید این موضوع: 1 مهمان
This forum uses Lukasz Tkacz MyBB addons.