Jelaskan Contoh program dari Visual Basic dalam bahasa melayu

TestBool = TestCall ( 5 , True )

Function TestCall ( X as Integer, Y as Boolean ) as Boolean

If Y Then TestCall = True

If Y Then TestCall = True

Z = (X * 3 / 2 + 8 - 9)^2

Do Until Z < 2

Z = Z - 1

MsgBox Err.Num & " " & Err.Description, , "TestCall"

VB 1.0 diperkenalkan pada 1991. Pendekatan bagi menghubungkan bahasa pengaturacaraan kepada antaramuka pengguna grafik diambil dari prototaip yang dimajukan oleh Alan Cooper yang dikenali sebagai Tripod. Microsoft menggajikan Cooper dan rakan niaganya untuk memajukan Tripod kepada kerangka boleh program bagi Windows 3.0, di bawah nama kod Ruby (tiada kaitan dengan bahasa pengaturcaraan Ruby).

Tripod tidak disertakan dengan bahasa pengaturcaraan sama sekali, dan Ruby mengandungi hanya penproses perintah asas mencukupi bagi peranannya sebagai kerangka Windows. Microsoft memutuskan untuk menggunakan kerangka Program Manager mudah bagi Windows 3.0 bukannya Ruby, dan mengabungkan Ruby dengan bahasa Basic untuk menghasilkan Visual Basic.

Ruby memberikan bahagian "visual" bagi Visual Basic—pereka bentuk (form designer) dan perkakasan suntingan- bersama keupayaan untuk memuatkan dynamic link library yang mengandungi kawalan tambahan (ketika itu dikenali sebagai "gizmos"). Gizmos tambahan Ruby kemudiannya menjadi antaramuka VBX.

Garis masa Visual Basic (VB1 hingga VB7)