Đá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
  Cách chuyển dạng text sang number Nguyên Thông 1 65 18-05-18, 09:11 AM
Bài mới nhất: ongke0711
  [Hỏi] Cách chống âm kho khi xóa phiếu nhập! NguyenDungAnh 2 89 16-05-18, 10:12 PM
Bài mới nhất: NguyenDungAnh
  [Hỏi] Không cho chọn một vài thành phần trong combobox NguyenDungAnh 7 125 12-05-18, 03:34 PM
Bài mới nhất: cpucloi
  [Hỏi] Cách đặt mặc định là ngày cuối tháng! NguyenDungAnh 4 156 11-05-18, 06:52 PM
Bài mới nhất: NguyenDungAnh
  Hỏi cách copy dữ liệu ledangvan 1 111 01-05-18, 03:12 PM
Bài mới nhất: MTNQ

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ơ| PMA Nha Trang| Gỗ Acrylic Không Đường Line