در تلگرام همراه ما باشید

اطلاعیه فروشگاه

در هنگام خرید حتما روی دکمه تکمیل خرید در صفحه بانک کلیک کنید تا پرداخت شما تکمیل شود مراحل پرداخت را تا آخر و دریافت کدپیگیری سفارش انجام دهید.در صورتی که نتوانستید پرداخت الکترونیکی را انجام دهید چند دقیقه صبر کنید و مجددا اقدام کنید و یا از طریق مرورگر دیگری وارد سایت شوید یا اینکه بانک عامل را تغییر دهید.راه های اربتاطی با ما شماره 09160593559یا ایمیلwww.sajjad.behmard001@gmail.com با تشکر

سورس پروژه کرنومتر با vb-net

سورس پروژه کرنومتر با vb-net

در این بخش با سورس پروژه کرنومتر با vb-net از سورس های برنامه نویسی  در خدمت شما دوستان هستیم.

پروژه کرنومتر با زبان برنامه نویسی ویژوال بیسیک دات نت و در محیط ویژوال استودیو به صورت کاربردی طراحی و کدنویسی شده است.

قسمتی از سورس کد کرنومتر با vb-net :

 

 
 
 
 
 
 
Visual Basic .NET
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
Public Class FrmStopWatch
 
    Private Sub BtnStart_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnStart.Click
        TmrStopWatch.Start()
    End Sub
 
    Private Sub BtnStop_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnStop.Click
        TmrStopWatch.Stop()
    End Sub
 
    Private Sub TmrStopWatch_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TmrStopWatch.Tick
        LblCount.Text = Val(LblCount.Text) + 1
        If LblCount.Text = 61 Then
            LblSecs.Text = Val(LblSecs.Text) + 1
            LblCount.Text = 0
 
        ElseIf LblSecs.Text = 60 Then
            LblMins.Text = Val(LblMins.Text) + 1
            LblSecs.Text = 0
 
        ElseIf LblMins.Text = 60 Then
            LblHours.Text = Val(LblHours.Text) + 1
            LblMins.Text = 0
 
        End If
    End Sub
 
    Private Sub BtnClear_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnClear.Click
        LblHours.Text = "00"
        LblMins.Text = "00"
        LblSecs.Text = "00"
        LblCount.Text = "00"
    End Sub
 
    Private Sub ToolStripMenuItem1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ToolStripMenuItem1.Click
        Me.Hide()
        FrmHelp.Show()
    End Sub
End Class

اشتراک بگذارید:


پرداخت اینترنتی - دانلود سریع - اطمینان از خرید

پرداخت هزینه و دریافت فایل

مبلغ قابل پرداخت 3,500 تومان
عملیات پرداخت با همکاری بانک انجام می شود
کدتخفیف:

درصورتیکه برای خرید اینترنتی نیاز به راهنمایی دارید اینجا کلیک کنید


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

نام فایلحجم فایل
Stop-Watch_1711464_2253.zip6.4 MB





دسته بندی محصولات فروشگاه

آخرین محصولات فروشگاه

محبوبترین محصولات

درصورتیکه مایل به استفاده از آمارگیر و سایر ابزار های جاوااسکریپت هستید در این محل قرار دهید استفاده از کدهای پاپ آپ ممنوع می باشد تبلیغ محصول و خدماتی بجز محصول های فروشگاه خودتا در فایل سل ممنوع می باشد