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 ClassEspero 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.