急求 1、设计一个判断两个整数大小的VBA子过程. 2、设计一个计算从n~m之间所有自然数之和的VBA函数.
来源:学生作业帮助网 编辑:作业帮 时间:2024/06/27 15:47:14
![急求 1、设计一个判断两个整数大小的VBA子过程. 2、设计一个计算从n~m之间所有自然数之和的VBA函数.](/uploads/image/z/10343919-39-9.jpg?t=%E6%80%A5%E6%B1%82+1%E3%80%81%E8%AE%BE%E8%AE%A1%E4%B8%80%E4%B8%AA%E5%88%A4%E6%96%AD%E4%B8%A4%E4%B8%AA%E6%95%B4%E6%95%B0%E5%A4%A7%E5%B0%8F%E7%9A%84VBA%E5%AD%90%E8%BF%87%E7%A8%8B.+2%E3%80%81%E8%AE%BE%E8%AE%A1%E4%B8%80%E4%B8%AA%E8%AE%A1%E7%AE%97%E4%BB%8En%7Em%E4%B9%8B%E9%97%B4%E6%89%80%E6%9C%89%E8%87%AA%E7%84%B6%E6%95%B0%E4%B9%8B%E5%92%8C%E7%9A%84VBA%E5%87%BD%E6%95%B0.)
急求 1、设计一个判断两个整数大小的VBA子过程. 2、设计一个计算从n~m之间所有自然数之和的VBA函数.
急求 1、设计一个判断两个整数大小的VBA子过程. 2、设计一个计算从n~m之间所有自然数之和的VBA函数.
急求 1、设计一个判断两个整数大小的VBA子过程. 2、设计一个计算从n~m之间所有自然数之和的VBA函数.
sub 大小(byval A% ,byval B%)
if A>B then msgbox A & ">" & B
if A=B then msgbox A & "=" & B
if AN then i=M :M=N:N=i
for i= M to N
n_m之间自然数和=n_m之间自然数和+i
next
end function
sub 大小(byval A% ,byval B%)
if A>B then msgbox A & ">" & B
if A=B then msgbox A & "=" & B
if Aend sub
function n_m之间自然数和(byval M& ,byval N&) as long<...
全部展开
sub 大小(byval A% ,byval B%)
if A>B then msgbox A & ">" & B
if A=B then msgbox A & "=" & B
if Aend sub
function n_m之间自然数和(byval M& ,byval N&) as long
dim i&
if M>N then i=M : M=N: N=i
for i= M to N
n_m之间自然数和=n_m之间自然数和+i
next
end function
收起