বর্গমুল বের করার প্রোগ্রাম

 প্রথমে আপনি একটি প্রোজেক্ট ক্রিয়েট করে এরপর ফর্মের উপর নিম্নক্ত কাজ করুন

Code:-

Private Sub Command1_Click()
Dim number, Squarerootvalue
number = Val(Text1)
Squarerootvalue = Sqr(number)
Text2 = Squarerootvalue
End Sub