ایراد کد چیست

[majidsoft]

با سلام خدمت اساتید من با این کد کار کردم ولی در در نتایج درست کار نمی کند


For i As Single = 2 To a Step 0.1
B = B - 0.05
B = B.ToString("0.00")
Next

این کد از 2 تا عدد را با step 0.1 می خواند ولی B جوابهای درستی نمیدهد

[Hossis]

صحیحش اینه


Dim b, a As Integer
b = 2
a = 5
For i As Single = 2 To a Step 0.1
b = CInt(b - 0.05)
b = CInt(b.ToString("0.00"))
Next

[hossein-khoshseyar]

با سلام خدمت اساتید من با این کد کار کردم ولی در در نتایج درست کار نمی کند


For i As Single = 2 To a Step 0.1
B = B - 0.05
B = B.ToString("0.00")
Next

این کد از 2 تا عدد را با step 0.1 می خواند ولی B جوابهای درستی نمیدهد



دوستان لطف کنید کدتون رو درون تگ قرار بدید که راحت بشه خوندش . ممنون