|
- aa = Inputbox("请输入切西瓜多少刀")
- how_num = Clng(aa)
- if how_num <=0 then
- msgbox "请输入大于0的数"
- else
- total_num = 4
- '1 2 4 7 11 16 22 29
- '0 1 2 3 4 5 6 7
- if how_num = 1 then
- total_num=2
- elseif how_num = 2 then
- total_num = 4
- else
- start = 3
- for i = 3 to how_num
- total_num = total_num + start + i - 3
- next
- end if
- msgbox "总共最多分成块数:" & total_num
- end if
复制代码
|
|