完成下面的程序,使显示结果如下图所示。Private Sub Form_Click()FontSize=18Sample$=" 【8】 "x=(ScaleWidth-TextWidth(Sample$) ) /2y=(ScaleHeight-TextHeight(Sample$) ) /2CurrentX=xCurrentY=y【9】 Sample$End Sub

题目

完成下面的程序,使显示结果如下图所示。

Private Sub Form_Click()

FontSize=18

Sample$=" 【8】 "

x=(ScaleWidth-TextWidth(Sample$) ) /2

y=(ScaleHeight-TextHeight(Sample$) ) /2

CurrentX=x

CurrentY=y

【9】 Sample$

End Sub


相似考题
参考答案和解析
正确答案:
正确答案:  1.(Welcome to Beijing !) 2.(Print)  
更多“完成下面的程序,使显示结果如下图所示。 PrivateSubForm_Click() FontSize=18 Sample$=" ”相关问题
  • 第1题:

    执行下面的程序,单击窗体后窗体消息框内显示结果是( )。 PRIVATE SUB FORM_CLICK() DIM STR AS STRING, K AS INTEGER STR="AB" FOR K = LEN(STR) TO 1 STEP -1 STR=STR&CHR(ASC(MID(STR, K, 1)) +K) NEXT K MSGBOX STR END SUB

    A.ABCE

    B.ABCD

    C.ABDB

    D.ABFB


    正确答案:C
    解析:对字符串变量STR(初始值为"AB")进行字符追加,分析其中的Len、Chr和Mid三个字符串处理函数后,可以判断出追加的字符是D和B,故答案C正确。

  • 第2题:

    编写一个键盘按键程序。对窗体的KeyDown和KeyPress事件编程,显示按下、放开一个键时的事件发生经过,如当按下了A键时程序运行界面如下图所示。

  • 第3题:

    完成按附件图中所示界面的学生管理程序。按下“保存”按钮时,首先判断所有的必要信息是不是都已经填写好,如发现有缺项则提示用户不能保存数据;如果数据完整则将该学生的信息,存入student数据库的basedata表中。保存三个以上软件工程专业的学生,和三个以上其它专业的学生。然后依据选择的专业,按下按钮进行查询并将查询结果按图中所示的“查询结果”下方的TextView全部显示。(可用n进行换行回车)。 提交程序运行视频和App文件夹到SPOC


    D

  • 第4题:

    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 为字符串表达式,其最右边的字符被返回。

  • 第5题:

    编写一个程序。程序初始界面如下图左图所示,设“学习目的”、“学习方法”和“退出”命令按钮的名称定义为cmdAim、cmdWay和cmdExit,标签控件的名称定义为lblContent。单击“学习目的”按钮,显示如下图的中图所示;单击“学习方法”命令按钮,显示如下图的右图所示;单击“退出”按钮时,退出程序。