vb程序让三个数字从大到小排列

IfaIfaIfaIfaIfbIfbIfbIfcIfcIfd

啊!明白了,原来这就叫"控行"PrivateSubCommand1_Click()Dimi%,s$(),n%,t()AsBytes=Split(Trim(Replace(Text1,vbCrLf,""

PrivateSubCommand1_Click()'1'23'456Dima(6)AsIntegerFori1=1To6Fori2=1To6Fori3=1To6Fori4=1To6Fori5=1To

ifx<ythent=xx=yy=xelseify<zthent=yy=zz=yendifendif,

冒泡法再问：我是新手，能发哈代码不？再答：你说的东西和语言无关，是算法思想你百度下冒泡法在领悟下里面的意思，把它写成vb的形式代码不写的，我知道你肯定是要交作业，这样学习可不行的

privatesubcommand1_click()dima(1to10)asinteger,i,jfori=1to10a(i)=int(rnd*100)+1printa(i);nextprintfo

a,b,c三个数,result为结果result=IIf(a>b,a,b)result=IIf(result>c,result,c)再问：但是我们没教过什么RESUIT啊再答：result是自己定义的

765

PrivateSubForm_Click()Dima(1To60)AsIntegerDimt%RandomizeFori=1To60a(i)=Int(Rnd*79)+20NextiFori=1To59

PrivateSubCommand1_Click()Dima(1To4)AsInteger,sAsString,nAsIntegerFori=1To4a(i)=iNextn=0Text1.Text="

PrivateSubCommand1_Click()a=Abs(InputBox("请输入第一个整数","输入数据"))b=Abs(InputBox("请输入第二个整数","输入数据"))c=Abs(

暂且不说算法：#include"stdio.h"voidmain(){inta,b,c,d,e,z;scanf("%d,%d,%d,%d,%d",&a,&b,&c,&d,&e);while(1)if(

'Text1,Text2,Text3输入'Text4,Text5输出公约数,公倍数PrivateSubCommand1_Click()DimaAsInteger,bAsInteger,cAsInteg

'将Text2.MultiLine=TruePrivateSubCommand2_Click()DimsAsString,s2AsString,s3AsStringDimiAsInteger,kAsI

放到excel里面吧

OptionBase1DimaPrivateSubForm_Load()a=Array(10,4,53,22,90,34)EndSubPrivateSubCommand1_Click()'选择排序法F

假设你原有的3500行数据在A列,从A1:A3500,按下ALT+F11,插入-模块,复制下列代码,按F5运行.这3500个数据会乱序排在C列.原A列的数据就没有了.如果很重要,请保存Subbbb()

这里有两种方法.第一种,直接交换,代码比较多,容易出错.第二种,把交换部分写成一个独立过程,中间调用.便于阅读,书写方便,不易出错.用户的关于从大到小和从小到大排序选择,使用Option控件（）如图.

数学必修三上不是有的吗?

一个command一个label用于显示PrivateSubCommand1_Click()DimxAsDouble,yAsDouble,zAsDoublex=InputBox(prompt:="请输