输入8个数字,求最大值并所在位置,要求用vb编程

来源：百度知道 编辑：UC知道 时间：2024/05/25 01:58:36
输入8个数字,求最大值并所在位置,要求用vb编程
请兄弟们帮帮忙,写出程序

myNumber="12345678"

for i=9 to 0 step -1
j=instr(1,myNumber,i)
if j<>0 then msgbox "最大数是:" & i & ",在第" & j & "位.":exit for
next

这个是个比较算法
STRNUM="52965412"
MAXNUM=0
MAXSPACE=1
for i=1 to 8 step 1
a1=mid(strnum,i+1,1)
if a1>MaxNum then
MaxNum=a1
maxspace=i
end if
next
msgbox maxspace