Dim comstr As StringFor i = 1 To 63 comstr = i & " : " & 902.6 + (i - 1) * 0.4
Combo2.AddItem (comstr)
Next i
I 等于 2 时
comstr 为903 而我想得到 903.0 即是整数就 在末保留一位小数 FORMAT 怎么用?
谢谢
Combo2.AddItem (comstr)
Next i
I 等于 2 时
comstr 为903 而我想得到 903.0 即是整数就 在末保留一位小数 FORMAT 怎么用?
谢谢
For i = 1 To 63
comstr = i & " : " & Format(902.6 + (i - 1) * 0.4, "0.0")
Combo1.AddItem comstr
Next i
转换一下类型就可Combo2.AddItem (format(clng(comstr),"0.0"))