diff --git a/VBS-linear-search/vbs.vbs b/VBS-linear-search/vbs.vbs
new file mode 100644
index 0000000..d332f61
--- /dev/null
+++ b/VBS-linear-search/vbs.vbs
@@ -0,0 +1,7 @@
+arr=Array(5,10,15,20,32)
+For i = 0 To UBound(arr)
+		  If arr(i) = 32 Then
+			  Wscript.Echo "Successful search!"
+			  Exit For
+		  End If
+	  Next