首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个名称为Coramandl的命令按钮,然后编写如下程序; Dim SW As Boolean Function func(X As Integer)As Integer If X<20 Then
在窗体上画一个名称为Coramandl的命令按钮,然后编写如下程序; Dim SW As Boolean Function func(X As Integer)As Integer If X<20 Then
admin
2010-09-11
14
问题
在窗体上画一个名称为Coramandl的命令按钮,然后编写如下程序; Dim SW As Boolean Function func(X As Integer)As Integer If X<20 Then Y=X Else Y=20+X End If func=Y End Function Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single) Dim a As Boolean SW=False End Sub Private Sub Form_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single) SW=True End Sub Private Sub Command1_Click() Dim intNum As Integer intNum=InputBox("") If SW Then Print flmc(intNum) End If End Sub 程序运行后,单击命令按钮,将显示一个输入对话框,如果在对话框中输入25,则程序的执行结果为
选项
A、输出0
B、输出2
C、输出45
D、无任何输出
答案
D
解析
上述程序由一个通用过程和3个事件过程组成,在命令按钮事件过程中调用通用过程,并把一个参数传送给通用过程。这里要注意,只有在一定的条件下,才能调用通用过程,这个条件就是,窗体层的Boolean变量SW的值必须为True,否则不能调用。而为了使SW的值为True,必须执行Form_MouseUp事件过程,这只能通过单击窗体来实现。单击窗体时,单击鼠标左键执行Form_MouseDown事件过程,使得SW=False。松开鼠标后执行Form_MouseUp事件过程,使得SW=True。程序运行后,由于没有执行Form_MouseUp事件过程,直接单击命令按钮,因而SW的值为False,这样不会调用通用过程,也就不会输出任何信息。
转载请注明原文地址:https://kaotiyun.com/show/Yump777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
数据独立性分为逻辑独立性与物理独立性。当数据的存储结构改变时,其逻辑结构可以不变。因此,基于逻辑结构的应用程序不必修改,称为______。
Java语言中属于跳转语句的是
请完善程序(程序文件名:Java_1.java)并进行调试。请在下画线处填入正确内容,然后删除下画线。请勿删除注释行和其他已有的语句内容。[题目要求]请完善程序并进行调试,使程序的输出结果如下。字符串“现在学习如何访问一个字符串”
下面程序运行时输出的结果为C:\ProgramFilesisadirectory.将程序补充完整。Importjava.io.*;publicclassDirTest{ publicstaticv
下列可用作switch(expression)语句参数的是
阅读下面代码publicclassJixiangwu{ publicstaticvoidmain(String[]args){ String[]stars={"贝贝","晶晶","欢欢","迎迎","妮妮"};
J2SDK基本命令中能生成C语言头文件的命令是
请完善程序(程序文件名:Java_3.java)并进行调试。请在下画线处填入正确内容,然后删除下画线。请勿删除注释行和其他已有的语句内容。[题目要求]统计一个英文文本字符串包含的英文元音字母的个数,使程序的运行结果如下:Thete
顺序存储方法是把逻辑上相邻的结点存储在物理位置【】的存储单元中。
随机试题
期权合约交易的买卖双方的权利与义务是对称的。()
《本草纲目》明确指出黄药子有哪些功效
下列面可以用来治疗仔畜窒息的药物是()。
突然出现片状脱发者为
不同行业的项目,在确定建设规模时应考虑行业因素,矿产资源开发项目考虑的因素是()。
我国的国体是()。
InSingapore,mostofuslovewindow-shoppingwhilesomeothersenjoyhavingapicnicatEastCoastParkorChangiBeachonsunn
设二次型f(x1,x2,x3)=2x1+ax22+2x32+2x1x2—2bx1x3+2x2x3经过正交变换化为3y12+3y22。求正交变换x=Qy,使二次型化为标准形。
"Twohundredeightmillion,Twohundredninemillion,Twohundredtenmillion…"Thatisthesoundofsolidwastehittingthebot
WhentoBuyYourChildaCellphoneDavidPogerhadplannedtobuyhisdaughterMayaacellphonewhenshewas15andinhigh
最新回复
(
0
)