آین کد معنی کنید لطفا

[taj3da]

این کد معنی میکنید که چکاری انجام میده؟!

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles btn2.Click
TextBox2.Text = "min is :"
If Val(txt1.Text) < Val(TextBox1.Text) Then TextBox2.Text = TextBox2.Text + txt1.Text Else TextBox2.Text = TextBox2.Text + TextBox1.Text


End Sub

[systam]

سلام
داره شرط میزاره که مقدار دوتکس باکسtxt1 و TextBox1 با هم مقایسه میکنه (نسبت بزرگی مقدار txt1 به TextBox1 ) اگر شرط برقرار بود
مقادیر دو تکس txt1 و TextBox1 رو بار هم جمع میکنه میریزه داخل TextBox2
واگر هم شرط برقرار نبود
مقادیر دو تکس TextBox1و TextBox2رو بار هم جمع میکنه میریزه داخل TextBox2

موفق باشید