VB字符串排序(很急！)？直接复制代码运行 如果不想排序的时候清除picturebox， 就把Picture1.Cls注释掉 Dimn%，s(100)AsString PrivateSubForm_Load() Command1.Caption="排序" EndSub PrivateSubCommand1_Click() Picture1.Cls Dimi%
VB字符串排序(很急！)？
直接复制代码运行 如果不想排序的时候清除picturebox， 就把Picture1.Cls注释掉 Dimn%，s(100)AsString PrivateSubForm_Load() Command1.Caption="排序" EndSub PrivateSubCommand1_Click() Picture1.Cls Dimi%，j% Fori=1Ton-1 Forj=i 1Ton Ifs(i)
本文链接：http://21taiyang.com/Family/12464542.html
vb冒泡排序【读：xù】代码转载请注明出处来源
