For X = 1 To 8
Call WriteINI("Mouse", "Option[" & trim(str(X)) & "]", Label(X), "C:\windows\desktop\vault.ini")
Next