在窗体上画一个文本框,一个命令按钮和一个标签,其名称分别为Text1、Command1和Label1,文本框的Text1属性设置为空白,然后编写如下事件过程: Private Sub Command1_Click() x=Int(Val(Text1.Text)+0.5) Label1.Caption=Str(x) End Sub 程序运行后,在文本框中输入28.653,单击命令按钮,标签中显示的内容是: ______。
- A27
- B28
- C29
- D30
在窗体上画一个文本框,一个命令按钮和一个标签,其名称分别为Text1、Command1和Label1,文本框的Text1属性设置为空白,然后编写如下事件过程: Private Sub Command1_Click() x=Int(Val(Text1.Text)+0.5) Label1.Caption=Str(x) End Sub 程序运行后,在文本框中输入28.653,单击命令按钮,标签中显示的内容是: ______。
解析:程序中各部分值的运算过程为: Text1.Text="28.653" Val(Text1.Text)=28.653 Val(Text1.Text)+0.5=29.153 Int(Val(Text1.Text)+0.5)=29 x=29 str(x)="29"
1、在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程:Private Sub Command1_Click()Dim c As Integer,n As IntegerFor c=0 T...
2、在窗体中使用一个文本框名为n.接受输入的值,有一个命令按钮run,事件代码如
在窗体中使用一个文本框名为n.接受输入的值,有一个命令按钮run,事件代码如下: Private Sub run_Click( ) result = "" For i = 1 To Me!n For j = 1 To M...
3、窗体中有一个名为Command1的命令按钮和一个名为Text1的文本框,事件
窗体中有一个名为Command1的命令按钮和一个名为Text1的文本框,事件代码如下: Private Sub Command1_Click()Dim a(10)As Integer,b(10)As Integern=3For i=1 T0 5a(i...
4、在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程:Private Sub Command1_Click()Dim array1(10,10)As IntegerDim I,j As...
5、在窗体上画一个文本框(其名称为Text1)和一个标签(其名称为Labe11)
在窗体上画一个文本框(其名称为Text1)和一个标签(其名称为Labe11),程序运行后,如果在文本框中输入指定的信息,则立即在标签中显示相同的内容。以下可以实现上述操作的事件过程是( )。ABCD
6、在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click()Dim array1(10, 10) As IntegerDim i As I...