首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
下面程序是由鼠标事件在窗体上画图,如果按下鼠标将可以画图,双击窗体可以清除所画图形。补充完整下面的程序。 首先在窗体层定义如下变量: Dim PaintStart As Boolean 编写如下事件过程: Private Su
下面程序是由鼠标事件在窗体上画图,如果按下鼠标将可以画图,双击窗体可以清除所画图形。补充完整下面的程序。 首先在窗体层定义如下变量: Dim PaintStart As Boolean 编写如下事件过程: Private Su
admin
2013-04-11
27
问题
下面程序是由鼠标事件在窗体上画图,如果按下鼠标将可以画图,双击窗体可以清除所画图形。补充完整下面的程序。
首先在窗体层定义如下变量:
Dim PaintStart As Boolean
编写如下事件过程:
Private Sub Form_Load ( )
DrawWidth = 2
ForeColor = vbGreen
End Sub
Private Sub Form_MouseDown(Button As Integer, Shift As Integer, _
X As Single, Y As Single)
PaintStart = True
End Sub
Private Sub Form_MouseMove(Button As Integer, Shift As Integer, _
X As Single, Y As Single)
If PaintStart Then
PSet (X, Y)
End If
End Sub
Private Sub Form_MouseUp (Button As Integer, Shift As Integer, _
X As Single, Y As Single)
【 】
End Sub
Private Sub Form_DblClick( )
Cls
End Sub
选项
答案
PaintStart=False
解析
上述过程定义了一个布尔型变量 PaintStart,当按下鼠标左键(触发MouseDown事件)时,由题意按下鼠标键表示能画图,所以该变量的值为 True,而松开鼠标左键(触发MouseUp事件)时,该变量为False;如果变量PaintStart为True,则移动鼠标(触发 MouseMove事件),将在窗体上绘出一个点;除鼠标事件外,上述程序还含有一个Load事件过程和一个 DblClick事件过程,其中Load事件过程用来设置画点的大小和颜色,DblClick事件过程用来清除所画的图形,函数Pset是画点语句,用它可以在(x,y)处画一个点。注意:窗体事件、方法
转载请注明原文地址:https://kaotiyun.com/show/DbQp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
执行语句Open"Tel.dat"ForRandomAs#1Len=50后,对文件Tel.dat中的数据能够执行的操作是______。
设a=10,b=5,c=1,执行语句Printa>b>c后,窗体上显示的是______。
1.在考生文件夹下有一个工程文件sjt3.vbp,请在窗体上画两个框架,其名称分别为F1和F2,标题分别为“交通工具”和“到达目标”。在F1中画两个单选按钮,名称分别为Op1和Op2,标题分别为“飞机”和“火车”。在F2中画两个单选按钮,名称分别为O
在考生文件夹内(C:\ylc)有一个工程文件ylc.vbp。在窗体上有一个文本框,名字为Text1,以及两个命令按钮,名字分别为Command1和Command2,标题分别为Search和Save。还有一个函数过程Search(a),在程序中可以直接调用该
算法复杂度主要包括时间复杂度和【】复杂度。
以下关于函数过程的叙述中,正确的是______。
数据库系统的核心是______。
设计一个“判别在表达式中左、右括号是否配对出现”的算法,采用______数据结构最佳。
若对一棵二叉树进行中序遍历得到的结果是BDAGHECF,进行后序遍历的结果是DBHGEFCA,那么这棵二叉树进行前序遍历得到的结果是______。
(1)在窗体上设置两个标签,名称分别为Labell与Label2、标题分别为“当前时间为:”和空;要求当单击窗体时,Label2显示当前时间。请编写相应的程序代码来完成这个功能。程序运行时的窗体界面如图21—3所示。注意:要求考生在编写完程序后,
随机试题
会计最基本的职能是()。
作为传统组织理论和管理理论的汇集者,法约尔提出了计划、协调、控制、预算等组织管理七要素。
A.缺铁性贫血B.巨幼细胞性贫血C.溶血性贫血D.铁粒幼细胞性贫血E.再生障碍性贫血网织红细胞计数减低的是
修复体粘固后患牙长时间持续疼痛,最可能
下述哪种表现不是血栓闭塞性脉管炎的特点
做尿糖定量检查的尿标本,容器中应加入的防腐剂是()
(2017年)某法院推行办案责任制后,直接由独任法官、合议庭裁判的案件比例达到99.9%,提交审委会讨论的案件仅占0.1%。对此,下列说法正确的是:()
某隔板絮凝池设计流量为50000m3/d,絮凝池总水头损失为0.29m。水厂自用水量按照5%计,水的密度ρ水=1.00g/cm3,水的动力黏滞系数μ=1.0×10-3Pa.s;测得的絮凝池总的速度梯度G为20s-1,则絮凝池的有效容积为()m3。
投资者以市价申报的方式参与科创板股票交易,不包括以下()。
现有A、B两个互斥项目,A项目的净现值为50万元,年限为4年;B项目的净现值为60万元,年限为6年。假设折现率为10%,在用共同年限法(用最小公倍数法确定共同年限)确定两个项目的优劣时,下列说法中正确的有()。
最新回复
(
0
)