下面对程序段运行结果叙述正确的是( )PrivateSubForm_Click()Caption="鼠标单击&quo下面对程序段运行结果叙述正确的是( )PrivateSubForm_Click()Caption="鼠标单击"Picture=LoadPicture(App.Path+"\window.jpg")Print"欢迎使用VB"EndSubPrivateSubForm_DblClick()Caption="鼠标双击"Picture=LoadPicture("")Print"结束使用VB"EndSu

题目
下面对程序段运行结果叙述正确的是( )PrivateSubForm_Click()Caption="鼠标单击&quo

下面对程序段运行结果叙述正确的是( )

PrivateSubForm_Click()

Caption="鼠标单击"

Picture=LoadPicture(App.Path+"\window.jpg")

Print"欢迎使用VB"

EndSub

PrivateSubForm_DblClick()

Caption="鼠标双击"

Picture=LoadPicture("")

Print"结束使用VB"

EndSub

A.单击窗体时窗体的标题为"鼠标单击"，窗体上显示"结束使用VB"

B.双击窗体时窗体的标题为"鼠标双击"，窗体上显示"结束使用VB"

C.双击窗体时窗体的图片还在

D.单击窗体时窗体的图片删除

相似考题

1.阅读下面的程序：Private Sub Form_Click（）Dim Check As Boolean, Counter As IntegerCheck = TrueCounter = 5DoDo While Counter < 20Counter = Counter + 1If Counter = 10 ThenCheck = FalseExit DoEnd IfLoopLoop Until Check = FalsePrint CounterEnd Sub程序运行后，单击窗体，输出结果为______。

2.在窗体的单击事件中有如下程序:privatesubform_click()forj=1to15a=a+jnextjPrintaendsub程序运行后单击鼠标左键，输出的结果是( )A.1B.15C.90D.120

3.（ 8 ）有如下程序：Private Sub Form_Click （）n=10i=0Doi=i+nn=n-2Loop While n>2Print iEnd Sub程序运行后，单击窗体，输出结果为 【 10 】 。

4.设有如下程序：Private Sub Form_Click（）Dim n As Integer, s As Integern = 8s = 0Dos = s + nn = n - 1Loop While n > 0Print sEnd Sub以上程序的功能是______。程序运行后，单击窗体，输出结果为______。

参考答案和解析
正确答案：B
更多“下面对程序段运行结果叙述正确的是( )PrivateSubForm_Click()Caption="鼠标单击&quo ”相关问题

  • 第1题：

    在WINDOWSXP中可以同时运行多个应用程序,如果要在已运行的各个程序之间进行切换,以下正确的叙述是()

    A.用鼠标左键单击应用程序窗口的任何部分

    B.用鼠标左键单击任务栏中应用程序对应的任务按钮

    C.按ALT+TAB键

    D.按ALT+SHIFT键


    参考答案：A, B, C

  • 第2题：

    运行下列程序:Private Sub Form_Click( )Dim y As Integer, x As IntegerDo Until x > 20x

    运行下列程序：

    Private Sub Form_Click( )

    Dim y As Integer, x As Integer

    Do Until x > 20

    x = x + 10

    y = y + x

    If x > 20 Then Exit Do

    Loop

    Print x, y

    End Sub

    单击窗体后，则在窗体上显示的结果是( )。

    A.10 20

    B.30 60

    C.10 30

    D.20 60


    正确答案：B

  • 第3题：

    下列程序运行后，如果单击鼠标右键后再单击鼠标左键，则输出结果为多少？

    略

  • 第4题：

    阅读程序：Private Sub Form_ Click() a=0 For j=1 To 15 a=a+j Mod 3 Next j Print aEnd Sub 程序运行后，单击窗体，输出结果是______。

    A．105

    B．1

    C．120

    D．15


    正确答案：D
    解析：本题是计算1到15对3取余的所有余数的和。For循环控制变量j从1到15变化，步长为1，每执行一次循环变量的值加1，因此循环语句的执行了15次。因为Mod运算符的优先级高于加(+)，因此循环体a=a+ jMod 3中，首先执行j Mod 3语句，再与a相加。变量a的功能是累计1到15对3取余的所有余数的和。程序的执行过程如下：
    第一次：i=1，a=0，a=0+1 mod 3=0+1=1
    第二次：j=2，a=1，a=1+2 mod 3=1+2=3
    第三次：j=3，a=3，a=3+3 mod 3=3+0=3
    第四次：j=4，a=3，a=3+4 mod 3=3+1=4
    第五次：j=5，a=4，a=4+5 mod 3=4+2=6……
    第十五次：j=15，a=15，a=15+15 mod 3=15+0=15

  • 第5题：

    9）设有如下程序：

    Private Sub Form_Click( )

    Cls

    a$="ABCDFG"

    For i=1 To 6

    Print Tab(12-i); 【9】

    Next i

    End Sub

    程序运行后，单击窗体，结果如图所示，请填空。


    正确答案：

    （9）【答案】Right(a $,i)
    【解析】Right函数用于从字符串右边返回指定数目的字符。格式为：Right（string,length）.其中，参数string 为字符串表达式，其最右边的字符被返回。

相关内容