窗体上有一个名称Text1的文本框,一个名称为Co mmand1的命令按钮。窗体文件的程序如下:
Private Type x
a As Integer
b As Integer
End Type
Private Sub Co mmand1_Click()
Di my As x y .a=InputBox("")
If y .a\2=y .a/2Then
y .b =y .a*y .a Else
y .b =Fi x(y .a/2)
End If
Text1.Text =y .b
End Sub
对以上程序,下列叙述中错误的是( )。
发布于 2022-05-11 10:00:29
登录后免费查看答案
关注者
0
被浏览
12