求助大佬们 - vb吧

level 5

@烟火楼主

后面的统计个位和十位代码该怎么写 [泪]

2023年01月07日 13点01分 1

level 1

十位的数字:int(a(i)/10)
个位的数字:a(i) Mod 10
备注:上面两个公式仅限正数
因为有负数，加个绝对值确保结果为正数
If Int(Abs(a(i))/10) ＝ Abs(a(i)) Mod 10 Then

2023年01月07日 16点01分 2

楼主写的条件就是对的，图片上出来的虽然都是两位数（而且还是正数），但是题目要求的范围是[-100,100]，这样就会有三位数，不能用你的方法取十位数；另外，余数的符号与被除数是保持一致的，没必要取绝对值

2023年01月08日 03点01分

哦，对了，你用的是Int啊，那正数和负数的除法结果确实会不一样，楼主用的整除运算符（等价于浮点除法用Fix取整）就没有这个问题

2023年01月08日 03点01分

楼主end if缩进了，我第一眼没看到以为那个空位是写判断的。果然星际不能免费

2023年01月08日 13点01分

klimaa

@初音✨七奈我没太看明白楼主想要什么。难道说，因为他把count放在了循环里，所以不知道自己已经把题目做出来了？

2023年01月12日 06点01分

level 15

交换Print count和Next i这两句的位置
顺便说一下，你这个题目的示例图片中产生的是10~99之间的随机整数 [滑稽]

2023年01月08日 03点01分 3

好像见过你

2023年01月13日 23点01分

level 5

Keine

a=int(x/100)百位
b=int（(x-a*100)/10）十位
c=x-a*100-b*10个位

2023年01月09日 00点01分 4

你是整除和取余都不会用么 [滑稽]

2023年01月09日 13点01分