当执行以下过程时,在名为lblResult的标签框内将显示______。Private Sub Command1_ Click() Dim I, R R = 0 for I = 1 To 5 step 1 R= R+ I Next I lblResult. Caption = Str$(R)End SubA.字符串15B.整数15C.字符串5D.整数5

当执行以下过程时,在名为lblResult的标签框内将显示______。Private Sub Command1_ Click() Dim I, R R = 0 for I = 1 To 5 step 1 R= R+ I Next I lblResult. Caption = Str$(R)End Sub

A.字符串15

B.整数15

C.字符串5

D.整数5


相关考题:

在窗体上画一个名为List1的列表框、一个名为Label1的标签。列表框中显示若干城市的名称。当单击列表框中的某个城市名时,在标签中显示选中城市的名称。下列能正确实现上述功能的程序是______。A.Private Sub List1_Click() Label1. Caption=List1. ListIndex End SubB.Private Sub List1_Click() Label1. Name=List1. ListIndex End SubC.Private Sub List1_Click() Label1. Name=List1. Text End SubD.Private Sub List1_Click() Label1. Caption=List1. Text End Sub

在窗体上画两个滚动条,名称分别为Hscroll1、Hscroll2:六个标签,名称分别为Label1、Label2、 Latel3、Label4、Label5、Label6,其中标签Label4~Label6分别显示“A”、“B”、“A*B”等文字信息,标签Label1、Label2分别显示其右侧的滚动条的数值,Label3显示A*B的计算结果。当移动滚动框时,在相应的标签中显示滚动条的值。当单击命令按钮“计算”时,对标签Label1、Label2中显示的两个值求积,并将结果显示在Label3中。以下不能实现上述功能的事件过程是 ______。A.Private Sub Command1_Click() Label3.Caption=Str(Val(Label1.Caption)*Val(Label2.Caption)) End SubB.Private Sub Command1_Click() Label3.Caption=HScroll1.Value*HScroll2.Value End SubC.Private Sub Command1_Click() Label3.Caption=HScrolll*HScroll2 End SubD.Private Sub Command1_Click() Label3.Caption=HScroll1.Text*HScroll2.Text End Sub

在窗体中添加一个标签LblResult和一个命令按钮Command1,然后编写程序。程序的功能是单击命令按钮,计算1+2+3+4+5的值,并把结果转化为字符串显示在标签内,能够实现上述功能的程序段是, ( )A.Private Sub Command1_Click() Dim I,R As Integer For I=1 To 5 Step 1 R=R+I Next LblResult. Name=Str$ (R) End SubB.Private Sub Command1_ClickO Dim I,R As Integer For I=1 To 5 Step 1 R=R+I Next LblResult. Caption= Str$ (R) End SubC.Private Sub Command1_Click() Dim I,R As Integer Do While I<5 R=R+I I=I+1 Loop LblResult. Caption=Str$ (R) End SubD.Private Sub Command1_Click() Dim I,R As Integer Do R=R+I I=I+1 Loop While I<5 LblResult. Caption=Str$ (R) End Sub

在窗体上画两个滚动条,名称分别为Hscroll1、Hscroll2;六个标签,名称分别为Label1、Label2、Label3、Label4、Label5、Label6,其中标签Label4~Label6分别显示“A”、“B”、“A*B”等文字信息,标签Label1、Label2分别显示其右侧的滚动条的数值,Label3显示A*B的计算结果。当移动滚动框时,在相应的标签中显示滚动条的值。当单击命令按钮“计算”时,对标签Label1、Label2中显示的两个值求积,并将结果显示在Label3中。以下不能实现上述功能的事件过程是______。A.Private Sub Command1_Click() Label3. Caption=Str(Val(Label1.Caption)*Val(Label2.Caption)) End SubB.Private Sub Command1_Click() Label3.Caption=HScroll1.Value*HScroll2.Value End SubC.Private Sub Command1_Click() Label3.Caption=HScroll1*HScroll2 End SubD.Private Sub Command1_Click() Label3.Caption=HScroll1.Text*HScroll2.Text End Sub

当执行以下过程时,在名为1blResult的标签框内将显示______。 Private Sub cmdlt_ click() Dim I,R R=0 For I=1 To 5 Step 1 R=R+I Next i 1blResult.Caption=Str$(R) End SubA. 字符串15B.整数15C.字符串5D.整数5

在窗体上画两个滚动条,名称分别为Hscrolll、Hscroll2;六个标签,名称分别为Label1、Label2、 Label3、Label4、Label5、Label6,其中标签Label4-Label6分别显示“A”、“B”、“A*B”等文字信息,标签Label1、Label2分别显示其右侧的滚动条的数值,Label3显示A*B的计算结果。当移动滚动框时,在相应的标签中显示滚动条的值。当单击命令按钮“计算”时,对标签Label1、Label2中显示的两个值求积,并将结果显示在Label3中。以下不能实现上述功能的事件过程是 ______。A.Private Sub Command1_Click() Label3.Caption=Str(Val(Label1.Caption)*Val(Label2.Caption)) End SubB.Private Sub Command1_Click() Label3.Caption=HScrolll.Value*HScroll2.Value End SubC.Private Sub Commandl_click() Label3.Caption=HScrolll*HScroll2 End SubD.Private Sub Command1_Click() Label3.Caption=HScrolll.Text*HScroll2.Text End Sub

在窗体上画两个滚动条,名称分别为Hscroll1、Hscroll2;六个标签,名称分别为Labell、Label2、 Label3、Label4、Label5、Label6,其中标签Label4~Label6分别显示“A”、“B”、“A*B”等文字信息,标签Label1、Label2分分别显示其右侧的滚动条的数值,Label3显示A*B的计算结果。当移动滚动框时,在相应的标签中显示滚动条的值。当单击命令按钮“计算”时,对标签 Label1、Label2中显示的两个值求积,并将结果显示在Label3中。以下不能实现上述功能的事件过程是______。A.Private Sub Command1_Click() Label3.Caption=Str(Val(Label1.Caption)*Val(Label2.Caption)) End SubB.Private Sub Command1_Click() Label3.Caption=HScroll1.Value*HScroll2.Value End SubC.Private Sub Command1_Click() Label3.Caption=HScroll1*HScroll2 End SubD.Private Sub Command1_Click() Label3.Caption=HScroll1.Text*HScroll2.Text End Sub

当执行以下过程时,在窗体上将显示( )。Private Sub Command1_Click( )Print "VB";Print "Hello! ";Print "VB"End SubA、 VBHello!VBB、 VBHello!VBC、 VBD、 VBHello! VB Hello!VB

当执行以下过程时,在窗体上将显示()。 Private Sub Command1_Click() Print "VB" Print "Hello!"; Print "VB" End SubA.VB Hello! VBB.VBHello!VBC.VB Hello! VBD.VB Hello! VB