首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
编写如下程序: Private Sub Form_Click() Print "Welcome!" End Sub Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As
编写如下程序: Private Sub Form_Click() Print "Welcome!" End Sub Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As
admin
2018-09-19
26
问题
编写如下程序:
Private Sub Form_Click()
Print "Welcome!"
End Sub
Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
Print "欢迎!"
End Sub
Private Sub Form_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)
Print "热烈欢迎!"
End Sub
程序运行后,单击窗体,输出结果为( )。
选项
A、 欢迎!
热烈欢迎!
Welcome!
B、 欢迎!
Welcome!
热烈欢迎!
C、 Welcome!
欢迎!
热烈欢迎!
D、 Welcome!
热烈欢迎!
欢迎!
答案
A
解析
在窗体事件中,鼠标按键按下激发MouseDown事件,鼠标按钮松开激发MouseUp事件,鼠标按下并松开后激发Click事件,所以这三个事件的顺序是MouseDown、MouseUp、Click,因此输出文字的顺序是"欢迎!"、"热烈欢迎!"、"Welcome!"。
转载请注明原文地址:https://kaotiyun.com/show/e9Fp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下面说法中错误的是
(1)在名称为Form1的窗体上画一个名称为Frame1,标题为“目的地”的框架,在框架中添加三个复选框,名称分别为Check1、Check2、Check3,其标题分别是“上海”、“广州”、“巴黎”,其中“上海”为选中状态,“广州”为未选状态,“巴黎”为灰
假定把计时器控件Timer1的Interval属性设置为1000,Enabled属性设置为True,并编写下面的事件过程:PrivateSubTimer1_Timer()DimxAsIntegerFori=1To
(1)在名称为Form1,标题为“练习”的窗体上添加一个名称为Frame1、标题为“效果”的框架。框架内含有三个复选框,其名称分别为Chk1、Chk2和Chk3,标题分别为“倾斜”、“加粗”和“下划线”。程序运行后的窗体如图所示。要求:存盘时必
有三个关系R、S和T如下:则由关系R和S得到关系T的操作是( )。
设x为一整型变量,且情况语句的开始为:SelectCasex,则不符合语法规则的Case子句是( )。
下面的程序是利用公式:π=4-4/3+4/5-4/7+4/9-4/11+…计算机π的近似值PvivateSubCommand1_Click() DimPIAsDouble,xAsDouble,kAsLong,signAsI
如果要在语句:a=Array(1,2,3,4,5)的前面声明变量a,则正确的声明是
以下表达式与Int(3.5)的值相同的是
计算机软件包括
随机试题
以下哪种培养基不是测定茶叶中霉菌和酵母菌需要的()。
X线显示大片状致密阴影,边缘模糊,其中心密度减低,形成透亮区,并有液平面。诊断应考虑为
固有鼻腔呼吸区黏膜上皮类型是
在胸背部的穴位上使用电针时,可将同一对输出电极连接在
女性,24岁。2周前发热,体温38℃,伴咽痛、流涕,治疗后好转。2天来感胸闷、气促;心电图示普遍导联ST-T波改变,Ⅲ度房室传导阻滞;化验血沉增快,CPK增高。其原因最可能是
十二指肠球部溃疡的间接征象包括()。
化学纯山梨糖
甲公司对投资性房地产采用成本模式进行后续计量。自2×16年1月1日起,甲公司将一栋自用厂房出租给某单位,租期为4年,每年年末收取租金650万元。该厂房原价为12000万元,预计使用年限为40年,预计净残值为零,采用年限平均法计提折旧;至2×15年12月31
简述陶行知的“教学做合一”思想。
ProperstreetbehaviorintheUnitedStatesrequiresanicebalanceofattentionandinattention.Youaresupposedtolookata
最新回复
(
0
)