Помогите, пожалуйста! Надо написать программу на условный оператор

Dim x As IntegerDim y As IntegerSub zadacha()    x = InputBox("vvedi x", "VVod dannyh", 11)    If x <= 10 Then y = 210 Else y = x * x * x    MsgBox ("pri x=" + CStr(x) + " y=" + CStr(y))End Sub