在窗体上画一个名称为Commana1的命令按钮，然后编写如下程序： Dim SW As Boolean Function func(X As Integer)As Integer If X＜20 Then

admin2013-04-11 18

问题在窗体上画一个名称为Commana1的命令按钮，然后编写如下程序： 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) 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 Commandl_Click( ) Dim intNum As Integer intNum = InputBox(" ") If SW Then Print func(intNum) End If End Sub 程序运行后，单击命令按钮，将显示一个输入对话框，如果在对话框中输入25，则程序的执行结果为

选项 A、输出0
B、输出25
C、输出45
D、无任何输出

答案4

解析本题考查的是鼠标事件，当压下鼠标左键(发生MouseDown时)SW的值为False，当松开鼠标左键(触发MouseUp时)SW的值为True。

转载请注明原文地址:https://kaotiyun.com/show/Eehp777K

本试题收录于：二级VB题库NCRE全国计算机二级分类

二级VB

NCRE全国计算机二级

相关试题推荐

随机试题

最新回复(0)

在窗体上画一个名称为Commana1的命令按钮，然后编写如下程序： Dim SW As Boolean Function func(X As Integer)As Integer If X＜20 Then

二级VB

NCRE全国计算机二级

注意：下面出现的“考生文件夹”均为c：\wexam\25160001。在考生文件夹下有工程文件sjt5.vbp及窗体文件sjt5.frm，该程序是不完整的，请在有?号的地方填入正确内容，然后删除?及所有注释符(即’号)，但不能修改其他部分。存盘时不

注意：下面出现的“考生文件夹”均为c：\wexam\25160001。(1)在考生文件夹下有工程文件sjt3.vbp及窗体文件sjt3.frm，该程序是不完整的，请在有?号的地方填入正确内容，然后删除?及所有注释符(即’号)，但不能修改其他部分。

注意：下面出现的“考生文件夹”均为c：\wexam\25160001。在窗体上有三个菜单，名称分别为Read、Calc和Save，标题分别为“读入数据”、“计算并输出”和“存盘”，一个文本框，名称为Text1，MultiLine属性设置为Tree，

注意：下面出现的“考生文件夹”均为c：\wexam\25160001。请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在名称为Form1的窗体上添加一个计时器控件，名称为Timer1。请利用“属性”窗

下面出现的“考生文件夹”均为c：\wexam\25160001。在考生文件夹中有工程文件sjt5.vbp及其窗体文件sjt5.frm，该程序是不完整的，请在有?号的地方填入正确内容，然后删除?及所有注释符(即’号)但不能修改其他部分。存盘时不得改变

以下语句用于打开一个顺序文件Open"C:\MyFile.txt"ForOutPut，但是该语句的一个重要错误是没有

设有语句Open"c:\Test.Dat"ForOutputAs#1则以下错误的叙述是______。

结构化设计主要分为系统设计和模块设计，【】的任务是决定系统的模块结构。

执行如下两条语句后，窗体上显示的是______。a=8.4326PrintFormat(a,"$00,00.00")，

全面从严治党永远在路上。这是()。

"先天之本"指的是

地价水平值按照区域大小划分包括()。

以下订单形式中,具有法律效力的是()

风险揭示是集合资产管理计划说明书的内容之一。()

概念所包含的事物本质属性叫概念的()。

ThelandscapeoftheGiant’sCauseway,lurkingbelowthegauntseawallwherethelandends,musthavestruckwonderintothehe

A、SherelocatedherefromChicago.B、Shehasgotapromotion.C、ShewillrelocatetoAmerica.D、SheisnowinAsia.A由原文可知，公司给女士

【B1】【B16】