<< Chapter < Page Chapter >> Page >

Mục đích của điều khiển sự kiện này là hiển thi một danh sách các quốc gia, sau đó hiển thị một thông điệp chào mừng bằng ngôn ngữ bản xứ khi người dùng chọn quốc gia của họ.

Hình I.18: Lời chào các nước

Chẳng hạn: Tiếng Anh: Hello, programmer

Tiếng Đức: Hallo, programmierer

Tiếng Tây Ban Nha: Hola, programador

Tiếng Ý: Ciao, programmatori

  1. Sử dụng vòng lặp For.. Next

Sử dụng For.. Next để thay đổi độ lớn ký tự trên một Form bằng cách thay đổi thuộc tính FontSize của Form.

Thiết kế Form có giao diện:

Hình I.19: For…Next

Sự kiện Command1_Click()

Dim i As Integer

For i = 1 To 10

Form1.FontSize = 10 + i

Print "Line "; i

Next

Chạy chương trình.

  1. Thiết kế chương trình cho phép tính N! (N! = 1*2*3*…*N). Giao diện đề nghị:

Hình I.20: Tính N!

  1. Thiết kế chương trình cho phép nhập vào một số nguyên N; sau đó tính các tổng sau:

a. S=1 + 2 + ... + n

b. S=1/2 + 2/3 + ... +n/(n+1)

c. S= - 1 +2 - 3 +4 - ... + (-1)nn

  1. Thiết kế chương trình cho phép nhập vào số nguyên dương N; sau đó tìm số nguyên dương k nhỏ nhất sao cho 2 1 3 + 3 2 4 + . . . + k ( k 1 ) ( k + 1 ) size 12{ { {2} over {1*3} } + { {3} over {2*4} } + "." "." "." + { {k} over { \( k - 1 \) * \( k+1 \) } }>= {}} {} N.
  2. Thiết kế chương trình cho phép nhập vào 2 số nguyên A, B; sau đó tìm UCLN và BCNN của hai số a và b theo thuật toán sau ( Ký hiệu UCLN của a, b là (a,b) còn BCNN là [a,b])

- Nếu a chia hết cho b thì (a,b) = b

- Nếu a = b*q + r thì (a,b) = (b,r)

- [a,b] = a*b/(b,r)

  1. Thiết kế chương trình cho phép nhập vào số nguyên N; sau đó viết 1 hàm tính N!; cuối cùng hiển thị kết quả giá trị N!.
  2. Thiết kế chương trình cho phép nhập vào 2 số nguyên N, K; sử dụng hàm tính N! ở trên, viết một hàm tính giá trị tổ hợp chập K của N phần tử theo công thức C N K = N ! K !* ( N K ) ! size 12{C rSub { size 8{N} } rSup { size 8{K} } = { {N!} over {K"!*" \( N - K \) !} } } {} .
  3. Thiết kế chương trình cho phép nhập vào số thực X và số nguyên N; sau đó viết các hàm tính các tổng sau rồi hiển thị kết quả:

- S= 1 + x +x2 + x3 + ... + xn

- S= 1 - x +x2 - x3 + ... (-1)n xn

- S= 1 + x/1! +x2/2! + x3/3! + ... + xn/n!

  1. Sử dụng vòng lặp Do While … Loop thiết kế chương trình cho phép nhập vào một số nguyên, sau đó thông báo kết quả xem số đó có phải là số nguyên tố hay không?

Đoạn chương trình kiểm tra số nguyên N có nguyên tố hay không:

i = 2

Do While (i<N) And (N Mod i<>0)

i = i + 1

Loop

If i = N Then N là số nguyên tố

Else N không là nguyên tố

  1. Làm lại bài tập 11 (tính N!) nhưng sử dụng vòng lặp Do While … Loop.
  2. Làm lại bài tập 15 (kiểm tra số nguyên tố) nhưng bằng cách sử dụng Do Until … Loop.
  3. Làm lại bài tập 11 (tính N!) nhưng sử dụng vòng lặp Do Until … Loop.
  4. Thiết kế chương trình cho phép nhập vào một số nguyên N; sau đó phân tích số nguyên này ra thừa số nguyên tố. Giao diện chương trình có thể như sau:

Hình I.21: Thừa số nguyên tố

  1. Sử dụng điều khiển định thời (Timer).

Tạo một chương trình cho phép người dùng 15 giây để nhập mật khẩu trong một TextBox.

Nếu người dùng không nhập mật khẩu đúng trong thời gian nói trên, chương trình hiển thị thông báo “Time Expired” (Hết thời gian) và đóng chương trình.

Thời gian làm bài tập: 30 phút.

Giao diện đề nghị:

Hình I.22: Giao diện

  • Nhập vào mật khẩu cần thiết (giả sử mật khẩu là: Secret)
  • Nếu nhập đúng mật khẩu, rồi nhầp nút Nhập, một hộp thông báo xuất hiện với nội dụng: Ban dang nhap thanh cong.

Hình I.23: Lỗi đăng nhập

  • Nếu nhập mật khẩu sai, rồi nhấp nút Nhập, một thông báo xuất hiện với nội dung: Xin loi, chung toi khong biet ban!

Hình I.24: Lỗi đăng nhập

Sau đó nhấp nút OK trên hộp thông báo này thì chương trình cho bạn nhập lại mật khẩu.

  • Nếu thời gian quá 15 giây mà người dùng chưa nhập đúng mật khẩu thì một thông báo sẽ hiện lên Xin loi, thoi gian da het; sau đó chương trình sẽ kết thúc.

Hình I.25: Báo hết giờ

  1. Thiết kế chương trình tương tự như ứng dụng Canculator của Windows.

Get Jobilize Job Search Mobile App in your pocket Now!

Get it on Google Play Download on the App Store Now




Source:  OpenStax, Giáo trình visual basic. OpenStax CNX. Jul 29, 2009 Download for free at http://cnx.org/content/col10777/1.1
Google Play and the Google Play logo are trademarks of Google Inc.

Notification Switch

Would you like to follow the 'Giáo trình visual basic' conversation and receive update notifications?

Ask