迷雾不倾城
迷雾不倾城
关注数: 24
粉丝数: 112
发帖数: 1,323
关注贴吧数: 28
求助,联想小新air13 天猫苏宁比官网便宜100,集显版 求助,联想小新air13 天猫苏宁比官网便宜100,集显版4899可以入手吗?
这玩意是骗子,我回复他删我留言,还禁言我72小时,喜欢骗人是吧,我曝光你。
大佬们,问个问题,幽魂进 幽魂现在进图要先x下才能触发附加吗?我测试下来没x的情况下基本也是出现装备的附加的。
q300 到了 发个帖 分数还挺高的,小白装机一次成功。
讲道理,电门 你愁啥boss骗抱和撞墙,能不能用电门输出
绝望99怎么打哦 光抗那么高,还能秒人,我服啦。
问价 1亿5妙不妙 12的2亿1 神区
魔道出了无影剑 我的大地9修罗已经饥渴了,但是没钱怎么办呢?
今天人品是不是用完了啊!
谷歌5儿子,诺基亚920,华为荣耀 outdoor,小牛min2. 这几个哪个好?谷歌5儿子可以不?我就想找个耐用的手机,某宝的水货靠谱不?来熟人给我讲讲,万分感谢!
今天我要爆你们 速度进来,
大神和小白的区别(灵魂牺牲满不满的问题) 就自己不能进图试一次啊,这是有多难啊,恩???而且都有人测试过了,还在纠结吗》?
伤心 今天花了390w买了泰达的酒杯,4个箱子最上。然后和机油去异界拖尸(我80级)。平时是他打的,今天我想练习一下,结果打的蛋碎啊,打不动啊,是不是要我加缓慢,放弃矛呢????
弱弱问个远古三大巴问题 我想问问 远古三 红色气息能卡大巴吗?能得话 我就有3件散件了,平砍好坑啊,只出了一件。。。。先去吃饭了 ,回答的都等我来粉1
求教vb 在调用函数的时候出问题了,怎么也搞不懂 Private Sub Form_Click() Dim i As Integer n = InputBox("请输入数据n") ReDim a(n) As Single For i = 1 To n a(i) = InputBox("") Print a(i) Next i Call fx(a(), n) For i = 1 To n Print a(i) Next i End Sub Private Sub fx(a() As Single, n As Integer) Dim i As Integer, t As Single For i = 1 To n \ 2t = a(i): a(i) = a(n - i + 1): a(n - i + 1) = t Next i End Sub 就是这里的call fx(a(),n)出问题了,不知道还有没有其他地方出问题,,,
死灵吧有没有学vb的高手 我问个问题啊 Private Sub Form_Click() Dim i As Integer n = InputBox("请输入数据n") ReDim a(n) As Single For i = 1 To n a(i) = InputBox("") Print a(i) Next i Call fx(a(), n) For i = 1 To n Print a(i) Next i End Sub Private Sub fx(a() As Single, n As Integer) Dim i As Integer, t As Single For i = 1 To n \ 2 t = a(i): a(i) = a(n - i + 1): a(n - i + 1) = t Next i End Sub Call fx(a(), n) 这里的n出问题了 求高手看看
求助vb程序中出现缺少列表分隔符 print 那里出现了缺少列表分隔符
求助 Private Sub Command1_Click() Dim n As Byte, i As Byte n = InputBox("请输入数据的个数") ReDim a(n) As Single For i = 1 To n a(i) = InputBox("a(" + Str(i) + ")=", "输入数据a") Next i print fsum End Sub Private Function fsum(x() As Double, n As Integer) As Double Dim i As Integer, x As Single For i = 1 To n fsum = fsum + x Next i fsum = fsum / n End Function 题目是编制通用函数的过程,计算double 类型一维数组所有元素的平均值。 下面一部分没问题的 上面我就不知道怎么弄了。。。求大神啊, 我刚学VB。
不能玩了 救救我 今天打开电脑,打开dnf 读取配置文件出错 用了网上的很多方法 就差卸载和重装系统了,,,,,救我啊
1
下一页