帮我看看这断程序有么有问题
Dim jbhm(1000) As String
Dim ii As Integer
For ii = 0 To 999 Step 1
Select Case ii
Case ii <= 9
jbhm(ii) = "00 " + Str(ii)
Case ii > 9 And ii <= 99
jbhm(ii) = "0 " + Str(ii)
Case ii > 99
jbhm(ii) = Str(ii)
End Select
Next ii

我是想让 数组jbhm 里存放( "000 ", "001 "..... "999 ")
不知道这样写有错吗,或者大家有更好的办法

[解决办法]
Select Case ii
Case ii <= 9
jbhm(ii) = "00 " + Str(ii)
Case ii > 9 And ii <= 99
jbhm(ii) = "0 " + Str(ii)
Case ii > 99
jbhm(ii) = Str(ii)
End Select

==========>

jbhm(ii) = ii.ToString( "000 ");

[解决办法]
Int32.ToString(string format)

使用指定的格式，将此实例的数值转换为它的等效字符串表示形式。

命名空间:System
程序集:mscorlib（在 mscorlib.dll 中）

语法
Visual Basic（声明）
Public Function ToString ( _
format As String _
) As String

Visual Basic（用法）
Dim instance As Integer
Dim format As String
Dim returnValue As String

returnValue = instance.ToString(format)

C#
public string ToString (
string format
)

C++
public:
String^ ToString (
String^ format
)

J#
public String ToString (
String format
)

JScript
public function ToString (
format : String
) : String



参数
format
格式字符串。


返回值
此实例的值的字符串表示形式，由 format 指定。
备注
如果 format 为空引用（在 Visual Basic 中为 Nothing） 或空字符串 ( " ")，则此实例的返回值使用通用格式说明符 ( "G ") 进行格式化。

此实例的返回值用当前区域性的 NumberFormatInfo 格式化。


楼主要多看看MSDN啊！那里讲得很详细！