برنامه تبدیل تاریخ شمسی به میلادی و شمسی به هجری قمری با ویژوال بیسیک

تخفیف برای خرید این پروژه: زیر دکمه خرید، در پایین همین صفحه

برنامه تبدیل تاریخ شمسی به میلادی و هجری شمسی به هجری قمری با

قیمت :   ۵۵۰۰ تومان ( پنج  هزار و پانصد تومان)

رشته :

کامپیوتر

نوع فایل:

ویژوال بیسیک

توضیحات:


توضیحات : 

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


همراه با فایلهای
اجرایی و ویژوال بیسیک : (EXE , )

بخشهایی از سورس کد این پروژه : 

Private Sub Command1_Click()
Dim iShamsiYear As Integer
Dim iShamsiMonth As Integer
Dim iShamsiDay As Integer

iShamsiYear = CInt(Text1.Text)
iShamsiMonth = CInt(Text2.Text)
iShamsiDay = CInt(Text3.Text)

persian_islamic iShamsiYear, iShamsiMonth, iShamsiDay

Text4.Text = CStr(iShamsiYear)
Text5.Text = CStr(iShamsiMonth)
Text6.Text = CStr(iShamsiDay)
Me.Label5.Caption = “ÞãÑí”

End Sub

Private Sub Command2_Click()
Dim iShamsiYear As Integer
Dim iShamsiMonth As Integer
Dim iShamsiDay As Integer

iShamsiYear = CInt(Text1.Text)
iShamsiMonth = CInt(Text2.Text)
iShamsiDay = CInt(Text3.Text)

persian_civil iShamsiYear, iShamsiMonth, iShamsiDay

Text4.Text = CStr(iShamsiYear)
Text5.Text = CStr(iShamsiMonth)
Text6.Text = CStr(iShamsiDay)
Me.Label5.Caption = “ãíáÇÏí”
End Sub

Private Sub Command3_Click()
Dim iShamsiYear As Integer
Dim iShamsiMonth As Integer
Dim iShamsiDay As Integer

تصاویری از محیط این برنامه :

=================================

======================

=======================

پرداخت آنلاین در کلیه ساعات شبانه روز و دانلود آنلاین + سورس کامل پروژه

تخفیف بسیار ویژه ۳۰ درصدی : دوست عزیز سعی ما این بوده که پروژه ها را با کمترین قیمت ممکن (مقایسه کنید با قیمت سایر سایتها) در اختیار شما قرار دهیم اما اگر دوستی هست که واقعا این مبلغ نیز برایش مقدور نیست می توانید عنوان تحقیق یا پروژه مورد نظر، کلمه Takhfif و آدرس ایمیل خود را به شماره پشتیبانی سایت  ۰۹۳۹۲۷۶۱۶۳۰  پیامک کنید تا لینک تخفیف سریعا برای شما ارسال گردد .

خرید انواع تحقیق و پروژه های شما بصورت توافقی : ۰۹۳۹۲۷۶۱۶۳۰

Related posts

پاسخ دهید

نشانی ایمیل شما منتشر نخواهد شد. بخش‌های موردنیاز علامت‌گذاری شده‌اند *

Translate »