Sunday, September 27, 2015

Triangler Reverse given integer

strVal = 54321
for IntIcounter = len(strVal) to 1 step -1
strInd=  Left(strVal,IntIcounter)
strFinal = strFinal + strInd &VBCRLF
Next
msgbox strFinal

No comments:

Post a Comment