local text = "Whatever text you want this to be"
for i = 1, #text do
    script.Parent.Parent.Dialog.TextLabel.Text = string.sub(text, 1, i)
    wait(0.04) --This is the speed of the text
end