Tìm thủ thuật nhanh hơn với chức năng tìm trong Blog

12/29/09

Lập Hàm có lượng tham số thay đổi

Hỏi: Bạn HaQuocQuan có hỏi làm sao tạo một hàm có số lượng tham số tùy ý.
Đáp: Điển hình của các hàm có tham số tùy ý ta có thể thấy ở Excel, nó thường ở dạng
Hàm( mảng các tham số, hằng số 1, hằng số 2...)

Với hằng số để cho ta biết trong trường hợp nào thì trả về giá trị nào.
Dưới đây, mình xin tạo 1 hàm có số tham số thay đổi tương tự hàm sum của Excel

Function SumC(A As Variant)
Dim tong
   tong = 0
   For Each I In A
   tong = tong + I
   Next I
   SumC = tong
End Function
 Và bây giờ ta có thể gọi hàm sum như sau:
Private Sub Command7_Click()
   MsgBox "Tong cua 10,20,50,60 la " & SumC(Array(10,20,50,60))
End Sub

Kết quả hiện lên 1 messenge: 170

3 comments:

  1. Cám ơn Noname rất nhiều.
    Hàm của Noname hình như bị nhầm:
    SumC = tong thì phải.

    ReplyDelete
  2. Tks HQQ! Vì khi copy từ diễn đàn về Blog, mình trình bày lại cho hệ thống hơn nên thay đổi 1 chút! Nhiều khi có sai sót. :)

    ReplyDelete
  3. Hihi!
    Sau một đêm mày mò với java script. Cuối cùng mình đã viết được đoạn script chèn hình ảnh vào comment của blogspot. Anh em nào dùng blogspot có thể pm ở đây. Mình sẽ chia sẻ!
    demo
    [img]http://i39.photobucket.com/albums/e193/duytuan2002/Access/Thuthuataccess.jpg[/img]

    ReplyDelete

» Hãy để lại tên, email của bạn khi bạn post comment, để mình có thể dễ dàng trả lời comment của bạn khi cần.
» Có thể sử dụng các thẻ < b>,< i>,< a>. Và các icon thông dụng trên YM