首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
假定有如下程序代码,程序运行后,把鼠标光标移到窗体内,每单击一次,变换一种鼠标光标的形状,依次显示鼠标光标的15个属性。请在划线处将程序补充完整。 Private Sub Form_ Click( ) Static x As Integer Cls Pri
假定有如下程序代码,程序运行后,把鼠标光标移到窗体内,每单击一次,变换一种鼠标光标的形状,依次显示鼠标光标的15个属性。请在划线处将程序补充完整。 Private Sub Form_ Click( ) Static x As Integer Cls Pri
admin
2013-04-11
50
问题
假定有如下程序代码,程序运行后,把鼠标光标移到窗体内,每单击一次,变换一种鼠标光标的形状,依次显示鼠标光标的15个属性。请在划线处将程序补充完整。
Private Sub Form_ Click( )
Static x As Integer
Cls
Print "Mousepointer Property is now "; x
Form1.【 】=x
x=x+1
If x = 15 Then x = 0
End Sub
选项
答案
MousePointer
解析
MousePointer属性可以通过代码设置,也可以通过属性窗口设置,在程序代码中设置MousePointer属性的一般格式为:对象.MousePointer=设置值
由于程序中使用Static关键字定义变量x,每次单击窗体时x的值增加1,并且下次单击窗体时,x能保留上次的值,这样就能保证每次单击窗体时看到鼠标光标都和上一次看到的不一样。
转载请注明原文地址:https://kaotiyun.com/show/Hphp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
设有如下程序:PrivateSubCommand1_Click()DimsumAsDouble,xAsDoublesum=0n=0Fori=1To5x
在窗体上画—个名称为Text1的文本框,并编写如下程序:PrivateSubForm_Load()ShowText1.Text=""Text1.SetFocusEndSubPriva
在窗体上画—个名称为Command1的命令按钮和两个名称分别为Text1、Text2的文本框,然后编写如下事件过程:PrivateSubCommand1_Click()n=Text1.TextSelectCasen
在窗体上画两个标签和一个命令按钮,其名称分别为Label1、Label2和Command1,然后编写如下程序:PrivateSubfunc(LAslabel,ByValaAsInteger)L.Caption="12
在窗体上画尸-个命令按钮,其名称为Command1,然后编写如下事件过程:PrivateSubCommand1_Click()Fori=1to4Ifi=1Thenx=iIfi<=4
在窗体上画一个文本框,一个命令按钮和一个标签,其名称分别为Text1、Command1和Label1,文本框的Text1属性设置为空白,然后编写如下事件过程:PrivateSubCommand1_Click()x=Int(Val(
在窗体上画一个驱动器列表框、一个目录列表框和一个文件列表框,其名称分别为Drive1、Dir1和File1。当改变目录列表框的内容时,要求文件列表框中显示当前选中的文件夹中的内容,则在Dir1_change事件过程中应使用的语句是:______。
数据库三级模式体系结构的划分,有利于保持数据库的【】。
随机试题
茹志鹃的成名作是短篇小说()
上牙槽后神经舌神经
【2011】某市政府投资一建设项目,法人单位委托招标代理机构采用公开招标方式代理招标,并委托有资质的工程造价咨询企业编制了招标控制价。招投标过程中发生了如下事件:事件1.招标信息在招标信息网上发布后,招标人考虑到该项目建设工期紧,为缩短招标时间,而改为
在工程实施过程中,单位工程施工组织设计通常按()划分阶段进行检查。
关于企业以银行存款偿还到期的短期借款业务的下列说法中,正确的是()。
甲集成电路生产企业2009年成立,投资额100亿元,经营期限20年。2011年该企业开始获利,企业拟对2012—2022年内购置的固定资产进行税收筹划。财务部门给予的下列建议中,可以被采纳的是()。
20世纪80年代兴起的一种强调“在做中学"的语言教学方法是______。
为帮助果农解决销路,某企业年底买了一批水果,平均发给每部门若干筐之后还多了12筐,如果再买进8筐则每个部门可分得10筐,则这批水果共有()筐。
有以下程序:#include<stdio.h>voidmain()voidfun(char*c){chars[81];{while(*c)gets(s);fun(s);puts(s);{if(*c>=’a’&&*c<=’z’)*c
What’sthemandoing?
最新回复
(
0
)