Đánh giá chủ đề:
  • 0 Votes - 0 Average
  • 1
  • 2
  • 3
  • 4
  • 5
[Hỏi] Giúp mình cách viết code xếp loại học sinh trong VBA
#1
1. Mọi người giúp mình viết câu lệnh để gán cho textBox xếp loại với.
Lúc đầu mình viết như thế này nhưng báo lỗi hoài.
Private Sub cmdxeploai_Click()
If txtTB >= 8 Then txtketqua = "Gioi"
ElseIf txtTB >= 6.5 And txtTB < 8 Then txtketqua = " Kha"
ElseIf txtTB >= 5 And txtTB < 6.5 Then txtketqua = "Trung Binh"
Else: txt = " Yeu"
End If
https://www.dropbox.com/s/klndh0ai6dmzdq...h.png?dl=0
[Hình: formtinhbinh.png?dl=0]
Chữ ký của NganNguyen Xin chào, mình là NganNguyen, Tham gia http://thuthuataccess.com/forum từ ngày 19-10 -14.
Reply
Những người đã cảm ơn
#2
1/ Data Type của txtTB phải là Number.
2/ Code

Mã PHP:
    If txtTB.Value >= 8 Then
        txtketqua
.Value "Gioi"
    ElseIf txtTB.Value >= 6.5 And txtTB.Value 8 Then
        txtketqua
.Value " Kha"
    ElseIf txtTB.Value >= And txtTB.Value 6.5 Then
        txtketqua
.Value "Trung Binh"
    Else: txtketqua.Value " Yeu"
    End If 
Chữ ký của tranthanhan1962 Kết quả cuối cùng của một đời người, không phải bạn có được bao nhiêu tiền bạc, tài sản. Mà bạn còn bao nhiêu người bạn  thumbs up
ღღღღღTài sản của tranthanhan1962 (View All Items) ღღღღღ
Reply
Những người đã cảm ơn NganNguyen


Có thể liên quan đến chủ đề
Chủ đề: Tác giả Trả lời: Xem: Bài mới nhất
  [Help] Truy vấn nhiều giá trị, nhập trong 1 textbox duy nhất ở form ckno1no 1 16 7 Giờ trước
Bài mới nhất: ongke0711
  [Help] khoanh vùng tìm kiếm trong Search Form Godspear 3 88 Hôm qua, 05:31 AM
Bài mới nhất: Godspear
  code chuyển đổi Hex sang ASCII trong access thanhtruong 6 181 18-01-17, 11:15 AM
Bài mới nhất: thanhtruong
  Cách đề tạo Combo Box và List Box Tương ứng Godspear 11 428 13-12-16, 05:41 AM
Bài mới nhất: Godspear
  [Hỏi] Nhập dữ liệu sai trong combobox sẽ đưa ra thông báo cannguyen 2 165 12-12-16, 12:06 PM
Bài mới nhất: cannguyen

Chuyển nhanh:


User(s) browsing this thread: 1 Guest(s)
Diễn Đàn Thơ Văn Thi Ẩm Lâu|Nhà Hàng Sông Thơ