با سلام
این سورس یه برنامه هستش که عدد رو از مبنای 2 از کاربر دریافت می کنه و به مبنای 10 تبدیل می کنه حالا خواهشی که من از شما دارم اینه که به اگر کسی می تونه به من بگه که این برنامه چطوری کار میکنه مثلا بگه که در خط دو فلان کار رو می کنه و در خط سه هم این کار رو و الی آخر
این هم کد برنامه
Private sub command 1_click()
N = val (text1.text)
D = 0
P = 0
While n<>0
M = n mod 10
D= d+ m*2^p
P = p +1
N = n\10
Wend
Label1.caption = d
End sub
ممنون می شم اگر کسی به من کمک کنه