帮下忙，想得半天了

因为只有三个，数量很少，比下大小就出来了~~~~~

同时楼上.比较一下.就ok
Dim t1 As String, t2 As String, t3 As String
Dim temp As String
t1 = "Z"
t2 = "C"
t3 = "B"

If t1 > t2 Then
temp = t1: t1 = t2: t2 = temp
End If
If t1 > t3 Then
temp = t1: t1 = t3: t3 = temp
End If
If t2 > t3 Then
temp = t2: t2 = t3: t3 = temp
End If

MsgBox t1 & "<" & t2 & "<" & t3

谢谢了.
如果不是字母怎么报错?

愣是没听懂……

是你问"为什么报错了？"还是问"怎么让不是字母的时候报错？"

嗯,没错.一样的意思...怎么样才不会溢出

我想LZ的意思是说，如果不是以字母组成的字符串（如"1")，3楼的程序会报错。。。

不过我认为这不大可能！！！

用这个代码怎么样都不会溢出

这个代码可以输别的字符和数字.我不要

那最简单的办法就是把ASCII限制住

setwindowlong同样可以达成你的愿望，不过你要去找找资料就是了

[此贴子已经被作者于2007-9-7 21:44:35编辑过]