Trang chủ » Diễn Đàn » Hỏi đáp Tin học » SQL và Cơ sở dữ liệu » Tạo biểu mẫu tính diện tích tam giác trong access
Chủ đề đã bị khóa, bạn không thể xóa, sửa hay trả lời trong chủ đề này!
|
|
|---|
|
0
Thầy em ra đề tạo biểu mẫu( form) nhập vào 3 cạnh a,b,c của một tam giác. kiểm tra điều kiện của 3 cạnh. Nếu đúng thì tính chu vi và diện tích tam giac. Nếu sai thì thông báo nhập sai và đưa con trỏ trở về chỗ nhập cạnh a.
Đoạn code em viết như thế này mà không biết sai chỗ nào. Option Compare Database Private Sub TINH_Click() Dim a As Double Dim b As Double Dim c As Double Dim P As Double Dim S As Double txta = a txtb = b txtc = c txtP = P txts = S If (txta + txtb) <= txtc Or (txta + txtc) <= txtb Or (txtb + txtc) <= txta Or txta = 0 Or txtb = 0 Or txtc = 0 Then MsgBox "BAN NHAP SAI DU LIEU" a = Null b = Null c = Null S = Null P = Null a.SetFocus End If P = (txta + txtb + txtc) / 2 S = Sqr(P * (P - txta) * (P - txtb) * (P - txtc)) End Sub |
|
|
|
0
Coi như công thức và điều kiện bạn kiểm tra đúng, thì đoạn code của bạn vẫn có vấn đề là: dữ liệu nhập vào bạn lấy từ đâu? Nhìn vào đoạn code của bạn thì không thấy bạn lấy dữ liệu nhập vào ở đâu hết!
---------
NBThanh Tutorial Room, cập nhật thường xuyên bài viết mới. Các bài viết mới cập nhật: - PHP - Lưu nội dung file ảnh vào CSDL NEW! - Làm việc với CSDL MySQL trong PHP - Học PHP qua ví dụ - Gởi email text, HTML, tiếng việt Unicode - Học PHP qua ví dụ - 1 chương trình download manager/giấu đường dẫn download - Học PHP qua ví dụ - Làm việc với Cookie và Session |
|
|
|
0
Tui xin góp ý bạn nhé! Bạn phải sửa dòng gán giá trị lại.
a = txta với txta là tên của text box trên form của bạn! à quên, bạn phải chuyển kiểu dữ liệu nữa, chứ nó hiểu là kiểu text thôi |
