سوال: تبدیل کد سی شارب به Vb6

با سلام این کد را به زبان vb6 می خواهم

textBox1.TextChanged += (s, args) => textBox1.Text = textBox1.Text.Replace(".", "000");