CLEAR n10=ASC('D') c02='' DO WHILE n10 > 0 n = MOD(n10, 2) n10 = INT(n10 / 2) c02=STR(n, 1) + c02 ENDDO MESSAGEBOX(c02) -------------------------------- 作者在 2020-06-15 10:32:28 补充以下内容 -------------------------------- * 二进制转换为十进制 n10 = 0 FOR lnI = 1 TO LEN(c02)...