• Tùy chọn
• Đăng nhập
• Đăng ký
• Xem như trên Máy tính
• Accelerated Mobile Pages Theme

Kinh nghiệm học lập trình VBA trong Access

• Trang chủ

  • Thủ Thuật Access
  • Access Cơ Bản
  • Thành viên giúp nhau
  • Kinh nghiệm học lập trình VBA trong Access
• Chủ đề đã đóng
• Kinh nghiệm học lập trình VBA trong Access

• RE: Kinh nghiệm học lập trình VBA trong Access

  ongke0711 > 22-08-20, 12:14 AM

  (21-08-20, 11:39 PM)haonlh Đã viết: Bài này gồm 2 nội dung: 1. cú pháp câu lệnh của tác giả và 2. rút gọn chỉ theo ý tác giả 1 lần "tôi mua"
  
  1. Về mặt cú pháp, tôi cho rằng câu lệnh If là không lỗi. Mặc dù xét theo tính logic xã hội thì có gì đó sai sai. Nhưng tôi không quan tâm mà cố gắng giải thích rằng nó đúng cú pháp
  
  'Còn viết ngắn gọn hơn nữa thì:
  

  Mã:

  Sub NCngan()
1 Dim N as Long
2 N= -2*(msgbox("toi co tien?",vbYesNo) = vbYes)
3 If N then N = N - (msgbox("ban co chac muon mua",vbYesNo) = vbYes)
5 If N<>2 Then Debug.Print "toi mua"
End Sub

  
  Đúng là potay với bạn haolh.
  
  - Vấn đề 1: chẳng ai nói cách dùng if của ví dụ trên là sai cú pháp mà chỉ nói nó sai về logic xử lý. Phải gọi là quá sai chứ không phải sai sai.
  - Từ việc dùng mệnh đề If đơn giản, bạn làm thành một rừng công thức suy luận còn khó hiểu hơn gấp mấy lần, làm cho máy nó phải xử lý thêm một đống việc rồi mới ra kết quả. Vậy sự ngắn gọn nó nằm ở chỗ nào?
  - Vì ví dụ trên nó sai logic nên không ai muốn phí công để viết code theo cái sai đó làm gì.
  
  Tôi sẽ không ý kiến gì thêm nữa.

• RE: Kinh nghiệm học lập trình VBA trong Access

  tranthanhan1962 > 22-08-20, 10:24 AM

  Không chỉ logic xã hội mà có hẳn một bộ môn lập trình logic hẳn hòi. Bạn haolh có thể vào đây để ngâm cứu http://liinwww.ira.uka.de/bibliography/L...ogramming/ dựa trên logic toán trong các mối quan hệ và các suy luận. Các chương trình được viết trong các Ngôn ngữ lập trình logic là các tập hợp câu logic, thể hiện sự thật và các luật về các vùng vấn đề. Khi hiểu nhiều hơn chúng ta sẽ tránh khỏi nhưng cách đặt vấn sai lâm và vô bổ. Các programmer hơn nhau là chỗ đó. mã người ta viết chạy có 5s còn mã của mình chạy nửa tiếng

• RE: Kinh nghiệm học lập trình VBA trong Access

  haonlh > 30-08-20, 05:45 PM

  (21-04-20, 11:42 AM)mrsiro Đã viết: Nếu số lượng 1 lớn hơn số lượng 2 thì ấn đồng ý mới lưu.
  Nếu số lượng 1 bẳng số lượng 2, hoặc số lượng 1 nhỏ hơn số lượng 2 thì lưu luôn khỏi hỏi:
  

  Mã:

  If txtSoluong1.value > txtSoluong2.value then
  If msgbox("bạn có chắc muốn lưu",vbYesNo) = vbYes then
    Lưu
  End if
Else
  Lưu
End if

  
  Trường hợp này thì có thể thu gọn được không ?

  
  Có thu gọn được. Xem bài của ongke.
  Tôi có thử gửi tin nhắn cho bạn, không biết bạn có nhận được không. Nếu có trả lời thì tôi cũng không biết cách tìm và đọc. Mới gia nhập mạng mà. Nếu cần liên hệ qua email thì hãy gửi cho nguyenxuanhao@huaf.edu.vn.

• RE: Kinh nghiệm học lập trình VBA trong Access

  Xuân Thanh > 31-08-20, 09:52 AM

  Tôi khóa chủ đè này lại. Ai hỏi gì thêm lập topic khác
  Thân mến
• Bài trước Bài tiếp