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/12/22 23:29:06
VB求接近判断关系.如图combobox已经搞定dimx(30)asintegerX(0)=0X(1)=40‘x()=后面所对应的数字都是0级至当前等级所需经验总合X(2)=150X(3)=387X(

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

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如何用IF同时判断多个条件 如何用接近开关判断轮子的前进与后退 求VB编程代码:判断一个数是否是素数? VB 判断是否正确 如图电路,求a点电位Va,b点电位Vb 如何用VB求30个100-3000的随机数 在VB中如何用IIF函数实现判断2个数的最大数 VB 循环判断的函数是什么?如题,再来个简单的列举. vb 判断一个数是否为整数要怎么写就如题,`````` 求翻译cotton/honey comb;dri-fit是什么意思 如图,在匀变速直线运动中,VB与VA和VC有什么关系?请推出来,要写上推理过程 如图一个小物体沿光滑斜面由A点上方静止开始加速下滑在它通过的路程中取AE并分成相等4段,Vb表示通过B点的瞬时速度,V表示AE段平均速度,Vb和V的大小关系是?（答案Vb大于V） 如果在VB中要判断a=1,求表达式 vb!输入一个四位数,求四个数字之和,判断和是不是质数 如图△ABD全等于△ACD,∠BAC＝90° (1)求∠B (2)判断AD与BC的位置关系并说明理由 如图,△ABD ≡ △EBC,AB=3,BC=5 求DE的长 并判断AC与BD的位置关系,并说明理由 VB的几个问题,期末作业啊,来大神,如图.