by Nangyal Ghani Khan (4 Submissions)
Category: Math/Dates
Compatability: VB 6.0
Difficulty: Unknown Difficulty
Originally Published: Sun 31st October 2004
Date Added: Mon 8th February 2021
Rating: 
(1 Votes)
REVERCE THE POSITION OF THREE DIGIT INTEGER
API Declarations
a COMMAND BUTTON named command1
EVENT : - CLICK
VBcoders
Dim b As Integer
Dim c As Integer
Dim d As Integer
Dim e As Integer
Dim f As Integer
a = Val(Text1.Text)
b = a \ 100
c = a - (100 * b)
d = c \ 10
e = c - (10 * d)
f = (e * 100) + (d * 10) + b
MsgBox f