[单选题]

在窗体上画一个文本框,一个命令按钮和一个标签,其名称分别为Text1、Command1和Labell,文本框的Text1属性设置为空白,然后编写如下事件过程: Private Sub Command1_Click() x=Int(Val(Text1.Text)+0.5) Labell.Caption=Str(x) End Sub 程序运行后,在文本框中输入28.653,单击命令按钮,标签中显示的内容是 ______。

A.27

B.28

C.29

D.30

参考答案与解析:

相关试题

在窗体上画一个文本框,一个命令按钮和一个标签,其名称分别为Text1、Comma

[单选题]在窗体上画一个文本框,一个命令按钮和一个标签,其名称分别为Text1、Command1和Label1,文本框的Text1属性设置为空白,然后编写如下事件过程: Private Sub Command1_Click() x=Int(Val(Text1.Text)+0.5) Label1.Caption=Str(x) End Sub 程序运行后,在文本框中输入28.653,单击命令按钮,标签中显示的内容是: ______。A.27B.28C.29D.30

  • 查看答案
  • 在窗体上画一个文本框,一个命令按钮和一个标签,其名称分别为Text1、Comma

    [单选题]在窗体上画一个文本框,一个命令按钮和一个标签,其名称分别为Text1、Command1和Labe11,文本框的Text1属性设置为空白,然后编写如下事件过程: Private Sub Command1_Click() x=Int(Val(TextText)+0.5) LabeCaption=Str(x) End Sub 程序运行后,在文本框中输入653,单击命令按钮,标签中显示的内容是______。A.27B.28C.29D.30

  • 查看答案
  • 在窗体上画一个文本框、一个标签和一个命令按钮,其名称分别为Text1、Label

    [试题]在窗体上画一个文本框、一个标签和一个命令按钮,其名称分别为Text1、Label1和Command1,然后编写如下两个事件过程: 程序运行后,单击命令按钮,将显示一个输入对话框,如果在该对话框中输入一个具有大小写的字符串,则在标签中显示的内容全部为大写。请填空。

  • 查看答案
  • 在窗体上画一个文本框、一个标签和一个命令按钮,其名称分别为Text1、Label

    [单选题]在窗体上画一个文本框、一个标签和一个命令按钮,其名称分别为Text1、Labell和 Commandl,然后编写如下两个事件过程;Private Sub Command1_Click()S$= InputBox ("请输入1个字符串")Text1.Text= S$E.nd SubPrivate Sub Text1_Change()Labell.Caption = UCase(Mid(Text1, Text2, 8))E.nd Sub程序运行后,单击命令按钮,将显示一个输入对话框,如果在该对话

  • 查看答案
  • 在窗体上画一个文本框、一个标签和一个命令按钮,其名称分别为Text1、Label

    [单选题]在窗体上画一个文本框、一个标签和一个命令按钮,其名称分别为Text1、Label1和Command1,然后编写如下两个事件过程:Private Sub Command1_Click() strText = InputBox("请输入") Text1.Text = strTextEnd SubPrivate Sub Text1_Change() Label1.Caption = Right(Trim(Text1.Text), 3)End Sub程序运行后,单击命令按钮,如果在输入对话框中输入a

  • 查看答案
  • 在窗体上画一个文本框、一个标签和一个命令按钮,其名称分别为Text1、Label

    [单选题]在窗体上画一个文本框、一个标签和一个命令按钮,其名称分别为Text1、Label1和 Command1,然后编写如下两个事件过程: Private Sub Command1_Click() strText=InputBox("请输入") Text1.Text=strText End Sub Private Sub Text1_Change() Label1.Caption=Right(Trim(Text1.Text),4) End Sub 程序运行后,如果在对话框中输入abcdefgh,则在

  • 查看答案
  • 在窗体上画一个文本框、一个标签和一个命令按钮,其名称分别为Text1、Label

    [单选题]在窗体上画一个文本框、一个标签和一个命令按钮,其名称分别为Text1、Labell和 Command1,然后编写如下两个事件过程: Private Sub Command1_Click() strText=InputBox("请输入") Text1.Text=strText End Sub Private Sub Text1_Change() Labell.Caption=Right(Trim(Text1.Text),3) End Sub 程序运行后,单击命令按钮,如果在输入对话框中输入Vi

  • 查看答案
  • (6)在窗体上画一个文本框、一个标签和一个命令按钮,其名称分别为 Text1、L

    [试题](6)在窗体上画一个文本框、一个标签和一个命令按钮,其名称分别为 Text1、Label1 和 Command1,然后编写如下两个事件过程:Private Sub Command1_Click( )S$=InputBox("请输入一个字符串")Text1.Text=S$E.nd SubPrivate Sub Text1_Change( )Label1.Caption=UCase(Mid(Text1.Text, 7))E.nd Sub程序运行后,单击命令按钮,将显示一个输入对话框,如果在该对话框

  • 查看答案
  • 在窗体上画一个命令按钮和一个文本框,其名称分别为Commandl和Text1,把

    [单选题]在窗体上画一个命令按钮和一个文本框,其名称分别为Commandl和Text1,把文本框的 Text属性设置为空白,然后编写如下事件过程: Private Sub Commandl_click() a=InputBox("Enter an integer") b=InputBox("Enter an integer") Text1.Text=b+a End Sub 程序运行后,单击命令按钮,如果在输入对话框中分别输入8和10,则文本框中显示内容是( )。A.108B.18C.810D.出错

  • 查看答案
  • 在窗体上画一个命令按钮和一个文本框,其名称分别为Commandl和Text1,把

    [单选题]在窗体上画一个命令按钮和一个文本框,其名称分别为Commandl和Text1,把文本框的Text属性设置为空白,然后编写如下事件过程: Private Sub Commandl_Ciick() a=InputBox("Enter an integer") b=InputBox("Enter an integer") Text1.Text=b+a End Sub 程序运行后,单击命令按钮,如果在输入对话框中分别输入8和10,则文本框中显示的内容是______。A. 108B.18C.810

  • 查看答案
  • 在窗体上画一个文本框,一个命令按钮和一个标签,其名称分别为Text1、Comma