未知题型
在窗体上画一个文本框,一个命令按钮和一个标签,其名称分别为Text1、Command1和Label1,文本框的Text1属性设置为空白,然后编写如下事件过程:Private Sub Command1_Click() x=Int(Val(Text1.Text)+0.5) Label1.Caption=Str(x)End Sub 程序运行后,在文本框中输入28.653,单击命令按钮,标签中显示的内容是______。
A.27
B.28
C.29
D.30
- A.Text)+0.5)
B.Caption=Str(x)End
C.653,单击命令按钮,标签中显示的内容是______。
A.27
B.28
C.29
【参考答案】
C
解析:程序中各部分值的运算过程为:
'Text1.Text='28.653'
Val(Tex......
(↓↓↓ 点击下方‘点击查看答案’看完整答案 ↓↓↓)
点击查看答案
相关考题
-
判断题
在数据透视图中,若要更改坐标轴的极值,应点击坐标轴,设置坐标轴格式,更改坐标轴最大值与最小值。( ) 正确 错误 -
未知题型
假定程序中有以下语句: answer=MsgBox('String1',,'String2', 'String3' ,2) 执行该语句后,将显示一个信息框,此时如果单击“确定”按钮,则answer的值为______。D.1
A.String1
B.String2
C.String3 -
未知题型
在窗体上画一个命令按钮,然后编写如下程序:Sub S1(ByVal x As Integer, By Val y As Integer) Dim t As Integer t=x x=y y=tEnd SubPrivate Sub Command1_ Click() Dim a As Integer, b As Integer a=10 b=30 S1 a,b Print 'a=';a='b=';bEnd Sub 程序运行后,单击命令按钮,输出结果是______。A.a=30 b=10B.a=30 b=30C.a=10 b=30D.a=10 b=10
A.a=30
B.a=30
C.a=10
D.a=10
