注册 登录
编程论坛 VB6论坛

这可咋办,看不懂啊

h2918228916 发布于 2019-06-25 19:27, 1202 次点击
只有本站会员才能查看附件,请 登录
只有本站会员才能查看附件,请 登录
咋整呀,看不懂
1 回复
#2
wufuzhang2019-06-26 10:04
回复 楼主 h2918228916
你这是试题吧,大学基础知识,要花时间自己去弄懂啊,我稍微给你解释一下:
1、y = x Mod 2 ''十进制转二进制,口诀:除2取余,余数倒序排列
   x = x \ 2   ''这是除以2得到的商
   Text2.Text = st
  If c0 = c1 Then

2、n = len(s) ''先获取字符串的长度
   ans = ans + x * 2^(n-i) ''按位权展开相加
   ans = 2 * ans + x       ''按累乘相加

3、x = x \ 16 ''十进制转十六进制也是一样的口诀:除16取余,余数倒序排列
   a = chr(55 + r)
   a = r

4、s = 0 & s ''在s的前面补0
   sum = 0   ''4个一组求和,求和前将sum置零
   ans = ans + Mid( s1, sum + 1 , 1)
 
1