Henry Hernandez!
Este es un pequeño formulario con un listbox, un textbox y un button.
Al leerse el formulario se crean unos valores en el listbox. Luego tu puedes escribir un número en el textbox y al pulsar el botón se restará en todos los elementos del listbox la cantidad escrita en el textbox.
Public Class Form1
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
ListBox1.Items.Add("123")
ListBox1.Items.Add("256")
ListBox1.Items.Add("789")
End Sub
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Dim i As Integer
For i = 0 To ListBox1.Items.Count - 1
ListBox1.Items(i) = ListBox1.Items(i) - TextBox1.Text
Next
End Sub
End Class
Espero que la página no quite la indentación cuando mande la pregunta. Yo creo que está bastante claro el procedimiento, si necesitas alguna aclaración pídemela. Y si ya está bien, no olvides puntuar.