首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
下面程序是由鼠标事件在窗体上画图,如果按下鼠标可以画图,双击窗体则可以清除所画图形。补充完整下面的程序。首先在窗体层定义如下变量: Dim PaintStart As Boolean 编写如下事件过程: Private Sub Form_Load() Dr
下面程序是由鼠标事件在窗体上画图,如果按下鼠标可以画图,双击窗体则可以清除所画图形。补充完整下面的程序。首先在窗体层定义如下变量: Dim PaintStart As Boolean 编写如下事件过程: Private Sub Form_Load() Dr
admin
2013-04-11
41
问题
下面程序是由鼠标事件在窗体上画图,如果按下鼠标可以画图,双击窗体则可以清除所画图形。补充完整下面的程序。首先在窗体层定义如下变量:
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事件)时,由题意按下鼠标键表示能画图,所以该变量的值为Tine,而松开鼠标左键(触发MouseUp事件)时,该变量为False;如果变量PaintStart为True,则移动鼠标 (触发MouseMove事件),将在窗体上绘出一个点;除鼠标事件外,上述程序还含有一个Load事件过程和一个DblClick事件过程,其中Load事件过程用来设置画点的大小和颜色,DblClick事件过程用来清除所画的图形,函数Pset是画点语句,用它可以在(x,y) 处画一个点。
转载请注明原文地址:https://kaotiyun.com/show/1oQp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画一个列表框和一个命令按钮,其名称分别为List1和Command1,然后编写如下事件过程:PrivateSubForm_Load()List1.AddItem"Item1"List1.AddIrem"te
已知一个部门有多个职工,一个职工只在一个部门工作;一个职工参加多个项目,一个项目可由多个职工完成.则部门和职工、职工和项目间的联系分别是______。
在窗体上画—个名称为Command1的命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click_()Forn=1To20IfnMod3<>0Thenm=m+n\3
往窗体Form1上励口—个列表框控件List1,并编写如下代码:PrivateSubForm_Load()Fori=0To6List1.AddItemiNextiEndSub
为了提高测试的效率,应该
在窗体上画—个命令按钮,其名称为Command1,然后编写如下程序:FunctionM(xAsInteger,yAsInteger)M=IIf(x>y,x,y)EndFunctionPrivateSub
设置复选框中或单选按钮的标题对齐方式的属性是______。
描述“X是小于100的非负整数”的VisualBasic表达式是【】。
关系模型允许定义3类数据约束,下列不属于数据约束的是______。
软件工程三要素包括方法、工具和过程,其中,【】支持软件开发的各个环节的控制和管理。
随机试题
Please______metotakemymedicinetonight.Itseemsthatmymemoryisfalling.
患者男性,32岁,体重60kg。患肠梗阻,发病后3天住院,自诉口渴无力,尿少面黄,一般情况较差,体温38℃,血压75/60mmHg,精神萎靡,唇舌干燥,眼窝凹陷,膝反射减弱,入院后行胃肠减压抽出消化液700ml,患者缺水量约为
为确保检验检测活动达到规定的目标,可以将合同评审活动理解为()所进行的活动。
[2011年,第11题]设L为连接点(0,2)与点(1,0)的直线段,则对弧长的曲线积分=()。
在工程风险处理技术中,()是以一种积极的态度,采用各种技术和方法去减少损失发生的机会和降低所发生损失的严重程度。
对于矿建公司所编制的立井井筒施工组织设计,应吸收建设单位、()参加。
质量管理体系的原则有()。
以下()的燃烧方式是表面燃烧。
在社会主义初级阶段,属于按劳分配收入的是
Thethirdisproximity,postureandechoing.Proximityreferstothe【T1】______betweenspeakers.Thiscanindicateanumberoft
最新回复
(
0
)