for each con as control in fForm.controls
    if typeof(con) is Button then
        ctype(con, Button).Text = "das ist ein button"
    elseif typeof(con) is textbox then
        ctype(con, TextBox).text = "das ist eine TextBox")
    end if
next