我申明的一个数组是STRING型的
那么这个数组里面的都是数字,不然就是字母,那么我要给他排列顺序,那么按ASCII排列,怎么写呢
label4.caption=asc(xx(10))xx(10)是数组,可是没能行,请问我该怎么做呢,谢谢个位了!!!!

解决方案 »

  1.   


    label4.caption=asc(xx(10))   '正确的.没有什么语法错.如果错误,你能确保xx(10)里面有值吗?如果什么值都没付会出错.
      

  2.   

    写一个排列过程
    private sub sort1()
    dim temp
      for i=0 to 9 
        for j= i+1 to 10
          if asc(xx(i))<asc(xx(j)) then
            temp=xx(i)
            xx(i)=xx(j)
            xx(j)=xx(i)
          endif
        next
      next
    end sub
      

  3.   

    那当然,因为你传递的只是xx()数组的第10号元素。这样:
    Dim vTemp As Variant
    For Each vTemp In xx
      Label4.Caption = Label4.Caption & Asc(vTemp)
    Next vTemp
      

  4.   

    对了 刚才忘了显示出来了  如:pigpag(噼里啪啦 - 努力开发狂看书)
      

  5.   

        排序,要是不想写代码,有一个偷懒的办法,就是additem到listbox中,设置listbox的sorted属性为true就行了。