::: در حال بارگیری لطفا صبر کنید :::Loading , please wait ...

انجمن کدستانMoisrex

MoisrexMoisrex.rozblog.com
زمان جاریtime : پنجشنبه 14 تیر 1403 - 5:08 قبل از ظهر
نام کاربریusername : پسوردpassword : یاor عضویتregister | رمز عبور را فراموش کردمForgot your password?
شما در سایت ما ثبت نام نکرده اید و یا وارد اکانت کاربری خود نشده اید. از شما خواهشمند هستیم You are not log in to site. Please وارد شویدlogin یاor ثبت نام کنیدregister .
صفحه اصلیHome page / سورس نرم افزار / سورس تغییر عکس دسکتاپ Vb.net
سورس تغییر عکس دسکتاپ Vb.net
تعداد بازدیدvisits : 1060
ariaman5 آفلاین




ارسال هاAnswers : 1837
عضویتRegistration date : 5 /7 /1391
حمایت کردهThanks : 1008
حمایت شدهThanked : 338
 سورس تغییر عکس دسکتاپ Vb.net

کد:
Dim img As System.Drawing.Image

PictureBox1.ImageLocation = WallpaperFile

PictureBox2.BackgroundImage = PictureBox1.Image

PictureBox2.BackgroundImageLayout = ImageLayout.Stretch

img = PictureBox1.Image

Dim imageLocation As String

imageLocation = My.Computer.FileSystem.CombinePath(My.Computer.FileSystem.SpecialDirectories.MyPictures, WallpaperFile)

img.Save(imageLocation, System.Drawing.Imaging.ImageFormat.Bmp) SystemParametersInfo(SPI_SETDESKWALLPAPER, 0, imageLocation, SPIF_UPDATEINIFILE Or SPIF_SENDWININICHANGE)
دوشنبه 09 تیر 1393 - 17:18
وب کاربرUser's blog ارسال پیامsend p.m. نقل قولReply سپاس گزارمThanks گزارشReport
ariaman5 آفلاین




ارسال‌هاAsnwers : 1837
عضویتRegistration date : 5 /7 /1391
حمایت کردهthanks : 1008
حمایت شدهThanked : 338
 پاسخAnswer 1 : سورس تغییر عکس دسکتاپ

اینم در Global :

کد:
Private Declare Function SystemParametersInfo Lib "user32" Alias "SystemParametersInfoA" (ByVal uAction As Integer, ByVal uParam As Integer, ByVal lpvParam As String, ByVal fuWinIni As Integer) As Integer

Private Const SPI_SETDESKWALLPAPER As Integer = &H14

Private Const SPIF_UPDATEINIFILE As Integer = &H1

Private Const SPIF_SENDWININICHANGE As Integer = &H2

Private Const SETDESKWALLPAPER = 20

Private Const UPDATEINIFILE = 1

Dim WallpaperFile As String = ""

یه د کمه درست کنید و اینو بذارید :

کد:
OpenFileDialog1.ShowDialog()

WallpaperFile = OpenFileDialog1.FileName

PictureBox1.ImageLocation = WallpaperFile

PictureBox1.BackgroundImage = PictureBox1.Image

Timer3.start()

کد اول هم در یه تایمر بذارید و اسم تایمر : timer3
دوشنبه 09 تیر 1393 - 17:19
وب کاربرUser's blog ارسال پیامSend p.m. نقل قولReply سپاس گزارمThanks گزارشReport
ctrain آفلاین



ارسال‌هاAsnwers : 512
عضویتRegistration date : 7 /1 /1392
حمایت کردهthanks : 177
حمایت شدهThanked : 168
 پاسخAnswer 2 : سورس تغییر عکس دسکتاپ Vb.net

سلام! اینا کده؟! مثل ریدینگ کتاب زبان میمونه تا کد
دوشنبه 09 تیر 1393 - 17:56
ارسال پیامSend p.m. نقل قولReply سپاس گزارمThanks گزارشReport
ariaman5 آفلاین




ارسال‌هاAsnwers : 1837
عضویتRegistration date : 5 /7 /1391
حمایت کردهthanks : 1008
حمایت شدهThanked : 338
 پاسخAnswer 3 : سورس تغییر عکس دسکتاپ Vb.net

نقل قول از ctrain

سلام! اینا کده؟! مثل ریدینگ کتاب زبان میمونه تا کد

آقا اسپم نده

سورسه

امتحانش کن یادش میگیری
دوشنبه 09 تیر 1393 - 18:00
وب کاربرUser's blog ارسال پیامSend p.m. نقل قولReply سپاس گزارمThanks گزارشReport
حمایت شده حمایت شده: سپاس هاThanks (1) : ctrain -
ctrain آفلاین



ارسال‌هاAsnwers : 512
عضویتRegistration date : 7 /1 /1392
حمایت کردهthanks : 177
حمایت شدهThanked : 168
 پاسخAnswer 4 : سورس تغییر عکس دسکتاپ Vb.net

تو nodpad بریزم با پسوند html سیوش کنم؟! چجوریه؟!
دوشنبه 09 تیر 1393 - 18:03
ارسال پیامSend p.m. نقل قولReply سپاس گزارمThanks گزارشReport
ariaman5 آفلاین




ارسال‌هاAsnwers : 1837
عضویتRegistration date : 5 /7 /1391
حمایت کردهthanks : 1008
حمایت شدهThanked : 338
 پاسخAnswer 5 : سورس تغییر عکس دسکتاپ Vb.net

نقل قول از ctrain

تو nodpad بریزم با پسوند html سیوش کنم؟! چجوریه؟!

برو microsoft visual studio کامل یا microsoft visual studio express رو دانلود کن

یه پروژه جدید باز کن

اشیاء رو اضافه کن

سورس رو پیست کن ( توجه ! : قبل از پیست کردن سورس را کپی کنید :دی )

دوشنبه 09 تیر 1393 - 18:05
وب کاربرUser's blog ارسال پیامSend p.m. نقل قولReply سپاس گزارمThanks گزارشReport
حمایت شده حمایت شده: سپاس هاThanks (1) : ctrain -
ctrain آفلاین



ارسال‌هاAsnwers : 512
عضویتRegistration date : 7 /1 /1392
حمایت کردهthanks : 177
حمایت شدهThanked : 168
 پاسخAnswer 6 : سورس تغییر عکس دسکتاپ Vb.net

آها باشه
دوشنبه 09 تیر 1393 - 18:05
ارسال پیامSend p.m. نقل قولReply سپاس گزارمThanks گزارشReport
2880 آفلاین



ارسال‌هاAsnwers : 3108
عضویتRegistration date : 24 /6 /1391
حمایت کردهthanks : 120
حمایت شدهThanked : 1210
 پاسخAnswer 7 : سورس تغییر عکس دسکتاپ Vb.net

+ویرایش شدند !

چرا کد ها رو اینطوری میزاری؟؟؟

باید کدهات رو تویه تگ کد بزاری !!!
دوشنبه 09 تیر 1393 - 20:00
وب کاربرUser's blog ارسال پیامSend p.m. نقل قولReply سپاس گزارمThanks گزارشReport



moisrex
درباره ماAbout us لینک های ماOur links کلمات کلیدیKeywords
انجمن تخصصی کدستان ، ساخته شده توسط فردی با نام مستعار Moisrex می باشد.This forum designed by a person who called Moisrex.

ایمیلE-mail : Moisrex @ Gmail.com 		کدستان,انجمن کدستان,کدنویسی,انجمن پشتیبانی,فروم,رزبلاگ,آموزش کدنویسی,درخواست کد
تمامی حقوق این انجمن مربوط به همین انجمن می باشد | طراحی قالبCopyright (c) By Moisrex , All rights reserved | Desiger : Moisrex