我有一个题目：在３个文本框中分别输入３个字母，按字母顺序将其重新显示在文本框中．请问这个题目的代码应怎样写

a= trim(text1))
  b=trim(text2))
  c=trim(text3))
dim t(1 to 3) as interger
t(1)=asc(a)
t(2)=asc(b)
t(3)=asc(c)
for i=1 to 2
  for j=3-i to 3
   if t(i)> t(j) then
     temp=t(j)
     t(j)=t(i)
     t(i)=temp
  end if
next j
next i
'字母的ASC值由小到大的顺序
text1.text=t(1)
text2.text=t(2)
text3.text=t(3)

dim t(1 to 3) as string
t(1)=trim(text1))
t(2)=trim(text2))
t(3)=trim(text3))
for i=1 to 2
  for j=3-i to 3
   if t(i)> t(j) then
     temp=t(j)
     t(j)=t(i)
     t(i)=temp
  end if
next j
next i
'字母的ASC值由小到大的顺序
text1.text=t(1)
text2.text=t(2)
text3.text=t(3)
UID153887 精华0 积分2343 铜板1 个 阅读权限30 性别男 在线时间7 小时 最后登录2008-5-15 查看详细资料
评分 编辑 引用 使用道具 举报 回复 TOP

難如果是所有字母你不是得打很大一遍