首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Line1的直线控件,并有如下程序: Dim down As Boolean, x1%, y1% Private Sub Form_Load() Line1.Visible = False down = False End
窗体上有一个名称为Line1的直线控件,并有如下程序: Dim down As Boolean, x1%, y1% Private Sub Form_Load() Line1.Visible = False down = False End
admin
2020-02-27
24
问题
窗体上有一个名称为Line1的直线控件,并有如下程序:
Dim down As Boolean, x1%, y1%
Private Sub Form_Load()
Line1.Visible = False
down = False
End Sub
Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Button = 1 Then
down = True
x1 = X : y1 = Y
End If
End Sub
Private Sub Form_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Button = 1 Then
down = False
Line1.x1 = x1 : Line1.y1 = y1
Line1.x2 = X : Line1.y2 = Y
Line1.Visible = True
End If
End Sub
运行程序,按下鼠标左键不放,移动鼠标到窗体其他位置处放开左键,则产生的结果是
选项
A、以鼠标按下和抬起的两点为端点显示一条直线
B、鼠标按下时显示一条直线;鼠标抬起时直线消失
C、直线从鼠标按下处移动到鼠标抬起处
D、鼠标按下时直线消失;鼠标抬起时显示直线
答案
A
解析
如果光标移到某个位置,按下鼠标键,则产生MouseDown事件,松开鼠标键,产生MouseUp过程。对于两个键的鼠标来说,左键的Button参数值为1,右键的Button参数值为2,因此If Button =1 条件语句保证只有按下左键或松开左键才能执行IF后面的语句。鼠标左键按下,执行Form_MouseDown过程中,x1,y1分别记录了鼠标按下的坐标;鼠标抬起,执行Form_MouseUp过程,直线起始点坐标为(x1,y1),结束点坐标为鼠标左键放开时的坐标(x2,y2),又直线Line1可见属性为true,故以鼠标按下和抬起的两点为端点显示一条直线,故选项A正确。
转载请注明原文地址:https://kaotiyun.com/show/WtTp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
程序流程图中带有箭头的线段表示的是()。
定义部门关系模式如下:部门(部门号,部门名,部门成员,部门总经理),使它不满足第一范式的属性是()。
将自然数集设为整数类I,则下面属于类I实例的是()。
下列序列中不满足堆条件的是()。
下面不能作为软件设计工具的是()。
设有栈S和队列Q,初始状态均为空。首先依次将A,B,C,D,E,F入栈,然后从栈中退出三个元素依次入队,再将X,Y,Z入栈后,将栈中所有元素退出并依次入队,最后将队列中所有元素退出,则退队元素的顺序为()。
软件生命周期可分为定义阶段、开发阶段和维护阶段,下面属于定义阶段任务的是()。
在窗体上画一个名称为List1的列表框,然后编写如下程序:PrivateSubForm_Click()Fori=1To10Item="Item"&iList1.AddItemItemNextiEndSub程序运行时,单击窗体,所完
把数学表达式表示为正确的VB表达式应该是( )。
表达式Sgn(15.6)+Int(-16.8)的值是
随机试题
Alaska1In1858AmericanswelcomedAlaskaintotheUnionasthe49thstate,symbolizingachangeofattitudethatholdin1
不能判断上消化道出血已经停止的实验室指标的是
关于招标信息的修正,下列描述正确的是()。
张林林目前面临购房还是租房的选择:①租房,房租每年60000元,押金5000元;②购房,总价100万元,自备首付款30万元,可申请70万元贷款,20年期,房贷利率为7%。按年等额本息方式还款,假定房屋维护成本为8000元/年,押金与首付款机会成本率均为4
2009年4月,甲公司委托乙仓库保管M机床,双方约定:保管期限为2个月,甲公司在保管期满提取M机床时一次付清保管费用。2009年6月,保管合同履行完毕。2009年7月,甲公司将M机床出租给丙公司,租期1年。租赁期间,甲公司计划以M机床作抵押从丁公
《绿色信贷实施情况关键评价指标》要求商业银行应针对高环境风险、社会风险行业计提特种准备。()
下列情况中,注册会计师应选择综合性方案作为总体应对方案的是()。
某演出队共128人,第1—3人穿白色衣服,4—5人穿黄色衣服,6—10人穿蓝色衣服,11—14人穿紫色衣服,15—17人穿白色衣服,18—19人穿黄色衣服……如此循环,则该演出队穿紫色衣服的共有多少人?()
WriteinyourANSWERSHEETONEanoteofabout50-60wordstoafriendofyoursbasedonthefollowinggivensituation:Youw
Wife:OurvisittoLondonisreallyrewarding.Whatdoyouthink,darling?Husband:______We’vereallygotsomethingfromthis
最新回复
(
0
)