请问这个for循环如何用java写 int i, sum = 348; for (i = 0x8000; i > 0x8; i >>= 1) { if ((lunarInfo[y - 1900] & i) != 0) { sum += 1; } } 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 Dim i As LongDum Sum As LongSum = 348i = &H8000While i > &H8 If (lunarInfo(y - 1900) And I) <> 0 Then Sum = Sum + 1 i = i \ 2Wend for(int i=0x8000;i>0x8;i=i>>1){ if ((lunarInfo[y - 1900] & i) != 0){ sum+=1; }} 请问0x8000如何变化成&H8000这个的? 0x、&H,只不过是个前缀,意义一样。 0x:java或c中的十六进制前缀&H:VB中的十六进制前缀查找--替换 Dim i As IntegerDum Sum As IntegerSum = 348i = &H8000Do While i > &H8 If (lunarInfo(y - 1900) And i) <> 0 Then Sum = Sum + 1 End If i = i \ 2Loop VB 调用DLL的问题 在下新手,请各位大侠介绍一本很容易上手的VB从书!!谢谢了!! EXCEL中的图表在VB中是哪个控件? 关于在win2k下修改计算机名的问题 关于excel与vb问题 有救了!vb.ole.automation问题,如何将应用程序中画的图导入到Word报表中! MsgBox自定义按钮问题 菜鸟问题:文件怎么结束??? 用vb编写软件实现测磨擦系数 如何彻底解决 报表宽度大于纸的宽度的问题 ~~~~在线等候~~~ [求助]用API弹出菜单的问题 asp上传图片最简单的代码
Dum Sum As Long
Sum = 348
i = &H8000
While i > &H8
If (lunarInfo(y - 1900) And I) <> 0 Then Sum = Sum + 1
i = i \ 2
Wend
for(int i=0x8000;i>0x8;i=i>>1){
if ((lunarInfo[y - 1900] & i) != 0){
sum+=1;
}
}
0x:java或c中的十六进制前缀
&H:VB中的十六进制前缀查找--替换
Dum Sum As Integer
Sum = 348
i = &H8000
Do While i > &H8
If (lunarInfo(y - 1900) And i) <> 0 Then
Sum = Sum + 1
End If
i = i \ 2
Loop