Bạn có muốn phản ứng với tin nhắn này? Vui lòng đăng ký diễn đàn trong một vài cú nhấp chuột hoặc đăng nhập để tiếp tục.

Đăng Nhập

Quên mật khẩu

Latest topics

» Hướng dẫn sử dụng Pin Laptop hiệu quả -> Bảo đảm
Tạo đồng hồ đếm ngược bằng Visual Basic? EmptyTue Apr 19, 2011 10:24 am by Admin

» Sử dụng pin Laptop đúng cách
Tạo đồng hồ đếm ngược bằng Visual Basic? EmptyTue Apr 19, 2011 9:58 am by Admin

» Để sử dụng laptop bền lâu...
Tạo đồng hồ đếm ngược bằng Visual Basic? EmptyMon Apr 18, 2011 2:33 pm by Admin

» Bộ sưu tập các phần mềm Việt của Nguyễn Trung Tín (www.caulacbovb.com)
Tạo đồng hồ đếm ngược bằng Visual Basic? EmptyTue Jan 04, 2011 2:10 pm by gianggiangonline

» CÁP VÀ ĐẦU CÁP
Tạo đồng hồ đếm ngược bằng Visual Basic? EmptyTue Nov 23, 2010 7:48 pm by Admin

» Quá trình thiết lập một mạng không dây
Tạo đồng hồ đếm ngược bằng Visual Basic? EmptyFri Nov 19, 2010 7:29 pm by Admin

» Kiến thức cơ bản về mạng: Các tên phân biệt
Tạo đồng hồ đếm ngược bằng Visual Basic? EmptyFri Nov 19, 2010 7:07 pm by Admin

» Kiến thức cơ bản về mạng: Các nhóm bảo mật
Tạo đồng hồ đếm ngược bằng Visual Basic? EmptyFri Nov 19, 2010 6:59 pm by Admin

» Kiến thức cơ bản về mạng: Tạo các nhóm
Tạo đồng hồ đếm ngược bằng Visual Basic? EmptyFri Nov 19, 2010 6:50 pm by Admin

CÁP VÀ ĐẦU CÁP

Tue Nov 23, 2010 7:48 pm by Admin

CÁP VÀ ĐẦU CÁP

Trước đây, khi network mới xuất hịên ở Việt Nam, vì giá thành các thiết bị mạng như HUB, SWITCH ... rất mắc, nên khi muốn nối 2 hay nhiều máy tính lại với nhau, các kỹ sự thiết kế mạng ở VN dùng loại cáp đồng trục. Cáp này trong lõi chỉ có một sợi dây đồng, chạy một đường thẳng và có …


[ Full reading ]
Quá trình thiết lập một mạng không dây

Fri Nov 19, 2010 7:29 pm by Admin

Quá trình thiết lập một mạng không dây

Lúc này chắc hẳn nhiều bạn trong số chúng ta hẳn đều biết rằng, chỉ cần một laptop có hỗ trợ truy cập mạng không dây là bạn có thể ngồi bất cứ ở đâu đó trong địa điểm phủ sóng của một điểm truy cập không dây để truy cập vào mạng. Quả thực mạng không dây …


[ Full reading ]
Kiến thức cơ bản về mạng: Các tên phân biệt

Fri Nov 19, 2010 7:07 pm by Admin

Kiến thức cơ bản về mạng: Các tên phân biệt

Trước khi bắt đầu
Trước khi bắt đầu, chúng tôi muốn nhắc lại rằng các tên phân biệt không duy nhất có trong Active Directory. Microsoft đã xây dựng Active Directory để lợi dụng các chuẩn công nghiệp được sử dụng bởi nhiều công ty khác như Novell và IBM. Bằng cách …


[ Full reading ]
Kiến thức cơ bản về mạng: Các nhóm bảo mật

Fri Nov 19, 2010 6:59 pm by Admin

Kiến thức cơ bản về mạng: Các nhóm bảo mật

Trong bài phần trước chúng tôi đã giới thiệu cho các bạn cách tạo nhóm abảo mật trong Windows Server 2003. Khi giới thiệu những thứ đó, chắc hẳn bạn cũng đã thấy được rằng Windows sẽ cho phép tạo một số kiểu nhóm khác nhau như được thể hiện trong hình A. Quả …


[ Full reading ]
Kiến thức cơ bản về mạng: Tạo các nhóm

Fri Nov 19, 2010 6:50 pm by Admin

Kiến thức cơ bản về mạng: Tạo các nhóm

Trong phần trước của loạt bài này, chúng tôi đã giới thiệu cho các bạn cách sử dụng Active Directory Users and Computers console để tạo và quản lý tài khoản người dùng. Trong phần này, chúng tôi muốn tiếp tục giới thiệu cho bạn về các nhóm.

Trong môi trường miền, các tài …


[ Full reading ]

    Tạo đồng hồ đếm ngược bằng Visual Basic?

    Admin
    Admin
    Admin


    Tổng số bài gửi : 70
    Join date : 20/08/2010
    Age : 36
    Đến từ : THÀNH PHỐ ĐÀ LẠT

    Tạo đồng hồ đếm ngược bằng Visual Basic? Empty Tạo đồng hồ đếm ngược bằng Visual Basic?

    Bài gửi  Admin Sat Sep 04, 2010 8:11 pm

    Tạo đồng hồ đếm ngược bằng Visual Basic?

    Hỏi:
    Xin các anh chị chỉ dùm em code Visual Basic của đồng hồ đếm ngược để ứng dụng vào cuộc thi tri thức trẻ của trường em.
    Ý tưởng của em như thế này:
    - có một cmd1
    - có hai textbox1 và textbox2
    bây giờ ta nhập thời gian vào textbox1 (tính bằng giây) > nhấp cmd1 thì textbox2 hiển thị thời gian trả lùi lại (theo thời gian đã nhập ở textbox1). Em xin các anh chị chỉ dùm em. Em biết ơn các anh chị rất nhiều!

    Trả lời:
    Rất đơn gian, bạn tạo một form trong đó có các controler sau:

    Text1
    Text2
    Command1
    Timer1

    nhấn đúp chuột lên bất cứ controller nào, sau đó copy và paste phần mã sau đây vào, đè lên tất cả những gì bạn thấy trong phần code:

    Dim i As Long
    Private Sub Command1_Click()
    'set the countdown to change every one second.
    Timer1.Interval = 1000
    End Sub
    Private Sub Timer1_Timer()
    'every one second text2.text will be one digit less than that of the text1.text
    Text2.Text = Str(Val(Text1.Text) - i)
    i = i + 1 'stop the countdown when text2.text reaches 0
    If Trim(Text2.Text) = "0" Then
    Timer1.Interval = 0
    End If
    End Sub
    (St)

      Hôm nay: Fri Mar 29, 2024 7:53 am