(非池fish)
(雨果的来信)
(雨果的来信)
第三方登录：在线任意进制转换工具 - aTool在线工具
支持二进制、八进制、十进制、十六进制 六十四进制以内的任意数字互相转换。
支持六十四进制以内的任意进制的数字转任意进制，目前最大支持64位，受限于电脑键盘的数量，如果字母数量更多，可以支持更高的进制数，不过目前64位可以满足几乎所有场景。
二　进　制：
十　进　制：
十　进　制：
二　进　制：
十　进　制：
十六进制　：
十六进制　：
十　进　制：
十　进　制：
六十四进制：
六十四进制：
十　进　制：
关于进制转换 | Hex Convert
支持任意进制之间的转换，最大进制为64进制（局限具进制字符数量），目前进制字符序列为：abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ_@
使用前端javascript代码实现，代码完全可以看到。
如有其他需求，请留言。
推荐功能 / 猜你喜欢 | Suggest
评论 | Comments
公众号: atool-org请完成以下验证码
您在24小时内还可以浏览4个帖子。
请尽快以解除浏览限制。
我要函数发布
查看: 91|回复: 13
将十进制数 转换为二进制数
在线时间 小时
签到天数: 881 天连续签到: 29 天[LV.10]以坛为家III
发表于 3&天前
马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。
才可以下载或查看，没有帐号？
;;将十进制数 9 转换为 4 个字符的二进制数 (1001)
(defun c:Dec2Bin (/ WorksheetFunction)
&&(setq *excel* (vlax-get-or-create-object &excel.application&))&&
&&(setq WorksheetFunction (vlax-get *excel* 'WorksheetFunction))&&
&&(vlax-invoke WorksheetFunction 'Dec2Bin 9 4)
)上一篇：下一篇：
本文地址&<button type="submit" class="pn" onclick="setCopy('将十进制数 转换为二进制数\nhttp://bbs.xdcad.net/thread--1.html', '本文地址已复制到剪贴板用快捷键 Ctrl+V 粘贴到 QQ、MSN 里推荐给你的好友吧！')">推荐给好友
在线时间 小时
签到天数: 349 天连续签到: 4 天[LV.8]以坛为家I
发表于 3&天前
黄总，能做个转换任意进制的不？
没有这个能力呀&
发表于 3&天前
在线时间 小时
签到天数: 881 天连续签到: 29 天[LV.10]以坛为家III
发表于 3&天前
(defun c:RoundUp (/ WorksheetFunction)
&&(setq *excel* (vlax-get-or-create-object &excel.application&))&&
&&(setq WorksheetFunction (vlax-get *excel* 'WorksheetFunction))&&
&&(vlax-invoke WorksheetFunction 'RoundUp 8.312 2)
在线时间 小时
签到天数: 881 天连续签到: 29 天[LV.10]以坛为家III
发表于 3&天前
本帖最后由 /db_自贡黄明儒_ 于
11:55 编辑
格式化字串,不足前面补0
差不多，可能更强大
(defun c:Text1 (/ WorksheetFunction)
&&(setq *excel* (vlax-get-or-create-object &excel.application&))&&
&&(setq WorksheetFunction (vlax-get *excel* 'WorksheetFunction))&&
&&(vlax-invoke WorksheetFunction 'Text 123 &0000&)
;;===&&正&
(defun c:Text1 (/ WorksheetFunction)
&&(setq *excel* (vlax-get-or-create-object &excel.application&))&&
&&(setq WorksheetFunction (vlax-get *excel* 'WorksheetFunction))&&
&&(vlax-invoke WorksheetFunction 'Text 123 &正;负;零&)
在线时间 小时
签到天数: 881 天连续签到: 29 天[LV.10]以坛为家III
发表于 3&天前
;;偶数===&124.0
(defun c:Even (/ WorksheetFunction)
&&(setq *excel* (vlax-get-or-create-object &excel.application&))&&
&&(setq WorksheetFunction (vlax-get *excel* 'WorksheetFunction))&&
&&(vlax-invoke WorksheetFunction 'Even 123)
)
在线时间 小时
签到天数: 349 天连续签到: 4 天[LV.8]以坛为家I
发表于 3&天前
WIN10 64位 EXCEL2016下，运行错误
运行了好长时间后，报错
命令: text1
错误: 参数类型错误: VLA-OBJECT nil
看来还是老的东西成熟，不能太潮流。&
发表于 3&天前
在线时间 小时
签到天数: 881 天连续签到: 29 天[LV.10]以坛为家III
发表于 3&天前
;;阶乘===&24.0
(defun c:Fact (/ WorksheetFunction)
&&(setq *excel* (vlax-get-or-create-object &excel.application&))&&
&&(setq WorksheetFunction (vlax-get *excel* 'WorksheetFunction))&&
&&(vlax-invoke WorksheetFunction 'Fact 4)
在线时间 小时
签到天数: 349 天连续签到: 4 天[LV.8]以坛为家I
发表于 3&天前
要找到在高版本EXCEL，WIN下的解决办法啊
在线时间 小时
签到天数: 881 天连续签到: 29 天[LV.10]以坛为家III
发表于 3&天前
;;平均值===&5.0
(defun c:Average (/ WorksheetFunction)
&&(setq *excel* (vlax-get-or-create-object &excel.application&))&&
&&(setq WorksheetFunction (vlax-get *excel* 'WorksheetFunction))&&
&&(vlax-invoke WorksheetFunction 'Average 4 6)
)
在线时间 小时
签到天数: 881 天连续签到: 29 天[LV.10]以坛为家III
发表于 3&天前
;;CONVERT1(1.0, &lbm&, &kg&) 将 1 磅转换为千克 (0.453592)
(defun c:CONVERT1 (/ WorksheetFunction)
&&(setq *excel* (vlax-get-or-create-object &excel.application&))&&
&&(setq WorksheetFunction (vlax-get *excel* 'WorksheetFunction))&&
&&(vlax-invoke WorksheetFunction 'CONVERT 1.0&&&lbm&&&&kg&)
CONVERT(number, from_unit, to_unit)CONVERT 函数语法具有下列参数 （参数:为操作、事件、方法、属性、函数或过程提供信息的值。）：
Number& & 必需。以 from_units 为单位的需要进行转换的数值。
From_unit& & 必需。数值 number 的单位。
To_unit& & 必需。结果的单位。函数 CONVERT 接受下面的文本值（引号中）作为 from_unit 和 to_unit。
重量和质量 From_unit 或 to_unit
斯勒格 &sg&
磅（常衡制） &lbm&
U（原子质量单位） &u&
盎司（常衡制） &ozm&
距离 From_unit 或 to_unit
法定英里 &mi&
海里 &Nmi&
时间 From_unit 或 to_unit
压强 From_unit 或 to_unit
帕斯卡 &Pa&（或 &p&）
大气压 &atm&（或 &at&）
毫米汞柱 &mmHg&
力 From_unit 或 to_unit
达因 &dyn&（或 &dy&）
磅力 &lbf&
能量 From_unit 或 to_unit
热力学卡 &c&
IT 卡 &cal&
电子伏 &eV&（或 &ev&）
马力-小时 &HPh&（或 &hh&）
瓦特-小时 &Wh&（或 &wh&）
英尺磅 &flb&
BTU &BTU&（或 &btu&）
乘幂 From_unit 或 to_unit
马力 &HP&（或 &h&）
瓦特 &W&（或 &w&）
磁 From_unit 或 to_unit
特斯拉 &T&
温度 From_unit 或 to_unit
摄氏度 &C&（或 &cel&）
华氏度 &F&（或 &fah&）
开氏温标 &K&（或 &kel&）
液体度量 From_unit 或 to_unit
茶匙 &tsp&
汤匙 &tbs&
液量盎司 &oz&
U.S. 品脱 &pt&（或 &us_pt&）
U.K. 品脱 &uk_pt&
加仑 &gal&
升 &l&（或 &lt&）
下列缩写的单位前缀可以加在任何的公制单位 from_unit 或 to_unit 之前。
前缀 乘子 缩写
exa 1E+18 &E&
peta 1E+15 &P&
tera 1E+12 &T&
giga 1E+09 &G&
mega 1E+06 &M&
kilo 1E+03 &k&
hecto 1E+02 &h&
dekao 1E+01 &e&
deci 1E-01 &d&
centi 1E-02 &c&
milli 1E-03 &m&
micro 1E-06 &u&
nano 1E-09 &n&
pico 1E-12 &p&
femto 1E-15 &f&
atto 1E-18 &a&
如果输入数据的拼写有误，函数 CONVERT 返回错误值 #VALUE!。
如果单位不存在，函数 CONVERT 返回错误值 #N/A。
如果单位不支持缩写的单位前缀，函数 CONVERT 返回错误值 #N/A。
如果单位在不同的组中，函数 CONVERT 返回错误值 #N/A。
单位名称和前缀要区分大小写。
公式 说明（结果）
=CONVERT(1.0, &lbm&, &kg&) 将 1 磅转换为千克 (0.453592)
=CONVERT(68, &F&, &C&) 将 68 华氏度转换为摄氏度 (20)
=CONVERT(2.5, &ft&, &sec&) 由于数据类型不同，因此返回错误值 (#N/A)
=CONVERT(CONVERT(100,&ft&,&m&),&ft&,&m&) 将 100 平方英尺转换为平方米 (9.290304)。
在线时间 小时
签到天数: 1296 天连续签到: 50 天[LV.10]以坛为家III
发表于 3&天前
在线时间 小时
签到天数: 349 天连续签到: 4 天[LV.8]以坛为家I
发表于 3&天前
谢谢长老。
Powered by【考点】．【专题】进制问题．【分析】根据把十制数转化成进制、七进制、十六制的转化法答即可．【解答】解：90=45…0所以故90（10）16（）90÷15…1022211…05÷22…11÷2=012÷2=…02÷7=1…545÷=2…190=12…611÷2=51所以故90（0）=5A6）【点评】题主要考查了十进与进制、进、十六进制的相互转化，答的关键是熟练掌握其转化方法．声明：本试题解析著作权属菁优网所有，未经书面同意，不得复制发布。答题：奋斗老师　难度：0.68真题：1组卷：7
解析质量好中差
&&&&，V2.28021posts - 74,&
comments - 15,&
trackbacks - 0
#include &iostream&
using namespace
int func(int x)
int cnt = 0;
x = x&(x - 1);
int main()
cout && func(9999) && endl && func(8);
cin.get();
其实上面那个函数输出结果是：形参x转化为二进制后包含1的个数。
这样考虑：从右向左看，每次while循环，执行一次x = x&(x-1)，会将x用二进制表示时最右边的一个1变为0，直至x值为0。
如：8的二进制位二进制为0111，它们&的结果直接为0了。
如：二进制101000，减一是100111，它们&结果是100000，然后对100000循环一次就是0,退出了，共累加了2次。
&------------------------------------------------------------------------------------------------------------------------------------------------------
1：由十进制看到二进制并用这样的方法计算其中1的个数真帅！
2：对于负数，C/C++中,非零数表示真（true），零表示假（false），其实也就0的二进制全部是0，所以也会进入循环，并且也是计算其二进制中1的个数。比如func（-1）返回的是32.下面的程序输出4,32.
　 我的机器int是4字节，32位，-1在机器中表示为1111...........111(共32个)，（不确定是不是补码表示法...)
#include &iostream&
int func(int x)
int cnt = 0;
x = x&(x - 1);
int main()
cout &&sizeof(int)&&endl&& func(-1);
cin.get();
阅读(...) 评论()}