显示2010年至2015年msgbox中的所有数字
问题描述：
如何显示来自所有数字。例如，一个价值2010另一2015年，我想在MSGBOX显示：2010年2011年2012年2013年2014 2015显示2010年至2015年msgbox中的所有数字
感谢
答
这应该做的伎俩：
Option Explicit
Sub tmpSO()
Dim lngNumber As Long
Dim txtMessage As String
For lngNumber = 2010 To 2015
txtMessage = txtMessage & lngNumber & Chr(10)
Next lngNumber
MsgBox txtMessage
End Sub
的伟大工程！如何显示oposite的方式？ 2015 2014 2013 2012 2011 2010.谢谢 – the5ame
只需删除'For lngNumber = 2010至2015'这行，并改写'For lngNumber = 2015 To 2010 Step-1'。 – Ralph
对不起，我是新来的:)再次接受 – the5ame