完成下面的程序,使显示结果如下图所示。
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题:
执行下面的程序,单击窗体后窗体消息框内显示结果是( )。 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
第2题:
编写一个键盘按键程序。对窗体的KeyDown和KeyPress事件编程,显示按下、放开一个键时的事件发生经过,如当按下了A键时程序运行界面如下图所示。
略
第3题:
完成按附件图中所示界面的学生管理程序。按下“保存”按钮时,首先判断所有的必要信息是不是都已经填写好,如发现有缺项则提示用户不能保存数据;如果数据完整则将该学生的信息,存入student数据库的basedata表中。保存三个以上软件工程专业的学生,和三个以上其它专业的学生。然后依据选择的专业,按下按钮进行查询并将查询结果按图中所示的“查询结果”下方的TextView全部显示。(可用n进行换行回车)。 提交程序运行视频和App文件夹到SPOC
第4题:
9)设有如下程序:
Private Sub Form_Click( )
Cls
a$="ABCDFG"
For i=1 To 6
Print Tab(12-i); 【9】
Next i
End Sub
程序运行后,单击窗体,结果如图所示,请填空。
第5题:
编写一个程序。程序初始界面如下图左图所示,设“学习目的”、“学习方法”和“退出”命令按钮的名称定义为cmdAim、cmdWay和cmdExit,标签控件的名称定义为lblContent。单击“学习目的”按钮,显示如下图的中图所示;单击“学习方法”命令按钮,显示如下图的右图所示;单击“退出”按钮时,退出程序。
略