窗体上有一个名称为Text1的文本框和一个名称为Command1、标题为“计算”的命令按钮,如图所示。函数fun及命令按钮的单击事件过程如下,请填空。Private Sub Command1_Click()Dim x As Integerx=Va1(InputBox(“输入数据”))Text1=Str(fun(x)+fun(x)+fun(x))End
主观题
窗体上有一个名称为Text1的文本框和一个名称为Command1、标题为“计算”的命令按钮,如图所示。函数fun及命令按钮的单击事件过程如下,请填空。Private Sub Command1_Click()Dim x As Integerx=Va1(InputBox(“输入数据”))Text1=Str(fun(x)+fun(x)+fun(x))End