第四章 VB_填空练习答案.docVIP

一.选择结构 ------------------------------------------------------- 功能：用输入对话框输入x，根据如图公式计算对应的y，在窗体上输出y的值。 ------------------------------------------------------- Private Sub Command1_Click() **********SPACE********** Dim x As Single, 【?】 As Single **********SPACE********** x = Val(【?】(Please input x :, 输入X的值)) If x = 10 Then **********SPACE********** 【?】 ElseIf x 10 Then **********SPACE********** y = Sqr(x) 【?】 Else y = 2 * x ^ 3 + 6 End If Print y End Sub (答案) Y InputBox y = 0 + Sin(x) ---------------------------------------