lm_mcgrady
lm_mcgrady
关注数: 23
粉丝数: 56
发帖数: 1,236
关注贴吧数: 5
surge连接问题 surge上次没电关机后就连接不上了,怎么办。
发动机熄火不能一键控制关车窗嘛?
撞墩子了,怎么办 如图,侧边塑料有点凹陷,从下面看门地下已经变形了,但是关门没什么影响,是否需要修?
surge能不能在手机上更新固 surge能不能在手机上更新固件版本,现在是16.34.5.14
我记得以前升级3.1的时候填过,但是升级4.0时没填过,为什么现在进华为论坛里面报名时出现这个情况了,怎么办,非得我手动升级啊难道。
这是传说中的晚上睡得死的节奏?最低才44
关于SURGE心率使用求解 才入手SURGE,但是用了几天心率就开始的时候看到显示过,现在一直是显示空心的桃心,不知道你的怎么样。ID:
[email protected]
佳能2900+打印机 为什么我将佳能2900+打印机共享后,同事连接上了打印机了,但打印时却总显示连接端口有问题,不支持端口,我用的是win xp同事的是Win 7,驱动也安装过了
求帮助 怀化市铁北路园水塔路5号是在怀化哪里?从火车站怎么走啊,坐公交坐几路?
不要悲剧啊。 难道要被绝杀?
求助 怎么我在累加时这样写的代码累加出来的结果是错的? 各位大虾能看哈不 Private Sub Command1_Click() Dim La, Lb, Tgj, Tgh, Tdj, Tdh, r As Integer Dim sumgj, sumgh, sumdj, sumdh, ming, mind, min Dim Igh, Igj, Idj, Idh Open "d:\A,B都在环.doc" For Output As #1 Open "d:\A,B都在环分析.doc" For Output As #5 Print #1, "Tgj", "Tgh", "Tdj", "Tdh"; " La"; " Lb"; " 半径" Print #5, "半径"; " 轨道经线"; " 轨道环线"; " 道路经线"; " 道路环线" sumgj = 0 sumgh = 0 sumdj = 0 sumdh = 0 For r = 1 To 10 For La = 1 To r For Lb = 1 To r 'A,B都在环内 Tgj = Format(Round(La / 35 + Lb / 35 + 1 / 12, 2), "0.00") If La = r Then If Lb = r Then Tgh = Format(Round((r * 3.14) / 70, 2), "0.00") 'A,B都在环上 Else Tgh = Format(Round((r - Lb) / 35 + (r * 3.14) / 70 + 1 / 12, 2), "0.00") 'A在环上,B在环以内 End If Else Tgh = Format(Round((r - La) / 35 + (r - Lb) / 35 + (r * 3.14) / 70 + 1 / 12 + 1 / 12, 2), "0.00") 'A,B都在环以内 End If Tdj = Format(Round(La / 15 + Lb / 15, 2), "0.00") Tdh = Format(Round((r - La) / 15 + (r - Lb) / 15 + (r * 3.14) / 160, 2), "0.00") Print #1, Tgj, Tgh, Tdj, Tdh; " "; La; " "; Lb; " "; r sumgj = sumgj + Tgj sumgh = sumgh + Tgh sumdj = sumdj + Tdj sumdh = sumdh + Tdh Next Lb Next La Igj = Format(sumgj / (sumgj + sumgh), "00.00%") Igh = Format(sumgh / (sumgj + sumgh), "00.00%") Idj = Format(sumdj / (sumdj + sumdh), "00.00%") Idh = Format(sumdh / (sumdj + sumdh), "00.00%") Print #5, r; " "; Igj; " "; Igh; " "; Idj; " "; Idh Next r End Sub
各位来做一个简单的题 a=111 b=222 将上面两个数显示为111.222怎么弄
求助,哪位高手看哈下面这段代码哪里错了,谢谢! 十进制转换为二进制的程序 Private Sub Command1_Click() Dim e, f, b, a, h As Integer Dim zw() As String, zwx() As String e = InputBox("输入数据") f = Val(e) a = Int(f) b = a e = 0 h = e For k = 1 To 20 zw(k) = 0 zwx(k) = 0 Next k For k = 1 To 20 If a > 0.5 Then zw(x) = a Mod 2 a = Int(a / 2) End If Next k Print "b=", b, "zw=" For j = 1 To 20 j = 21 - k Print zw(j) Next j End Sub
有人用虚拟机安装过windows 8没,求教,我按照的时候出错了
求解 怎么我安装了windows 8后看上去和windows 7一样,难道是我安装错了?
求书 谁有《中国现代文学史》(1917-2000)上下册,北京大学出版社2007版,朱栋霖主编 《中国现代文学经典》(四册)北京大学出版社,2007年版,朱栋霖主编 《文学理论》华东师范大学出版社,2006年7月版,要卖不?
【豪麦冲天】发贴必须前面有豪麦冲天吗? 请问一下是不是要求,本人刚来不久。
1
下一页