RTB1.Text = Replace(RTB1.Text, "ABC" & vbCrLf & "DEF", "")
間違いを見つけよ (早稲田理工2009)