VB求 接近判断关系.如图 combobox 已经搞定dim x(30) as integer X(0) = 0X(1) = 40 ‘x()=后面所对应的数字都是0级 至当前等级所需经验总合X(2) = 150X(3) = 387X(4) = 837X(5) = 1616X(6) = 2868X(7) = 4
来源:学生作业帮助网 编辑:作业帮 时间:2024/07/02 01:53:44
![VB求 接近判断关系.如图 combobox 已经搞定dim x(30) as integer X(0) = 0X(1) = 40 ‘x()=后面所对应的数字都是0级 至当前等级所需经验总合X(2) = 150X(3) = 387X(4) = 837X(5) = 1616X(6) = 2868X(7) = 4](/uploads/image/z/3790596-12-6.jpg?t=VB%E6%B1%82+%E6%8E%A5%E8%BF%91%E5%88%A4%E6%96%AD%E5%85%B3%E7%B3%BB.%E5%A6%82%E5%9B%BE+++combobox+%E5%B7%B2%E7%BB%8F%E6%90%9E%E5%AE%9Adim+x%2830%29+as+integer+X%280%29+%3D+0X%281%29+%3D+40++++++++++++++++++++++%E2%80%98x%28%29%3D%E5%90%8E%E9%9D%A2%E6%89%80%E5%AF%B9%E5%BA%94%E7%9A%84%E6%95%B0%E5%AD%97%E9%83%BD%E6%98%AF0%E7%BA%A7+%E8%87%B3%E5%BD%93%E5%89%8D%E7%AD%89%E7%BA%A7%E6%89%80%E9%9C%80%E7%BB%8F%E9%AA%8C%E6%80%BB%E5%90%88X%282%29+%3D+150X%283%29+%3D+387X%284%29+%3D+837X%285%29+%3D+1616X%286%29+%3D+2868X%287%29+%3D+4)
VB求 接近判断关系.如图 combobox 已经搞定dim x(30) as integer X(0) = 0X(1) = 40 ‘x()=后面所对应的数字都是0级 至当前等级所需经验总合X(2) = 150X(3) = 387X(4) = 837X(5) = 1616X(6) = 2868X(7) = 4
VB求 接近判断关系.
如图
combobox 已经搞定
dim x(30) as integer
X(0) = 0
X(1) = 40 ‘x()=后面所对应的数字都是0级 至当前等级所需经验总合
X(2) = 150
X(3) = 387
X(4) = 837
X(5) = 1616
X(6) = 2868
X(7) = 4766
X(8) = 7511
X(9) = 11333
X(10) = 16492
X(11) = 23276
X(12) = 32002
X(13) = 43015
X(14) = 56689
X(15) = 73428
X(16) = 93664
X(17) = 117858
X(18) = 146499
X(19) = 180105
X(20) = 219224
X(21) = 264432
X(22) = 316334
X(23) = 375563
X(24) = 442781
X(25) = 518680
X(26) = 603980
X(27) = 699430
X(28) = 805807
X(29) = 923917
X(30) = 1054596
For i = 0 To 30
Combo1.AddItem i
next i
这些我都搞定了
我想得到 例如我在现经验内输入 5000 可从1级 计算结果得到可以升到7级 剩余274 经验
这个我不知道该怎么写代码
VB求 接近判断关系.如图 combobox 已经搞定dim x(30) as integer X(0) = 0X(1) = 40 ‘x()=后面所对应的数字都是0级 至当前等级所需经验总合X(2) = 150X(3) = 387X(4) = 837X(5) = 1616X(6) = 2868X(7) = 4
dim i as long
dim s as long,os as long,ot as long
s=5000'------------------------输入的值
if s