Ðề: CÁch tính tổng các số trong một số!
1/ Nhấn All+F11 rồi Insert một modul mới
2/ Chép hàm này vào
Mã nguồn PHP:
[COLOR=#000000]
[/COLOR][COLOR=#007700]Function [/COLOR][COLOR=#0000BB]SumNumber[/COLOR][COLOR=#007700]([/COLOR][COLOR=#0000BB]nNumber [/COLOR][COLOR=#007700]As [/COLOR][COLOR=#0000BB]Double[/COLOR][COLOR=#007700]) As [/COLOR][COLOR=#0000BB]Double
Dim i [/COLOR][COLOR=#007700]As [/COLOR][COLOR=#0000BB]Integer
[/COLOR][COLOR=#007700]For [/COLOR][COLOR=#0000BB]i [/COLOR][COLOR=#007700]= [/COLOR][COLOR=#0000BB]1 To Len[/COLOR][COLOR=#007700]([/COLOR][COLOR=#0000BB]nNumber[/COLOR][COLOR=#007700])
[/COLOR][COLOR=#0000BB]SumNumber [/COLOR][COLOR=#007700]= [/COLOR][COLOR=#0000BB]SumNumber [/COLOR][COLOR=#007700]+ [/COLOR][COLOR=#0000BB]Val[/COLOR][COLOR=#007700]([/COLOR][COLOR=#0000BB]Mid[/COLOR][COLOR=#007700]([/COLOR][COLOR=#0000BB]nNumber[/COLOR][COLOR=#007700], [/COLOR][COLOR=#0000BB]i[/COLOR][COLOR=#007700], [/COLOR][COLOR=#0000BB]1[/COLOR][COLOR=#007700]))
[/COLOR][COLOR=#0000BB]Next
End [/COLOR][COLOR=#007700]Function[/COLOR]
3/ Thực hiện : SumNumber(12345) = 15 (= 1+2+3+4+5)
Hoặc A1 = 56789, A2 = SumNumber(A1) (=35)
Thân mến
Dự án căn hộ cao cấp Eaton Park được phát triển bởi Gamuda Land độc đáo bền vững tầm nhìn rộng bài trí hài hòa. Eaton Park độc đáo bền vững giá ưu đãi phú hợp văn hóa. Dự án khẳng định thương hiệu,...
Eaton Park tiện ích hạng sang vị trí đẹp