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

admin2012-03-22 37

问题在窗体上画一个名称为Command1的命令按钮，然后编写如下程序： 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 Command1_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、无任何输出

答案C

解析

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

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

二级VB

NCRE全国计算机二级

相关试题推荐

随机试题

最新回复(0)

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

二级VB

NCRE全国计算机二级

下面程序段，运行后的结果是　PrivateSubCommandl_Click()　　Dimb%(1To4)，i%，t#　　Fori=1To4　　　b(i)=i　　Nexti　　t=Tof(b())　　Print"t="；t，　End

要将名为MyForm的窗体显示出来，正确的使用方法是

在数据管理技术的发展过程中，经历了人工管理阶段、文件系统阶段和数据库系统阶段。其中数据独立性最高的阶段是______。

下列程序的功能是：当x100时，没有意义。请填空。PrivateSubCommand1_Click()DimxAsSinglex=InputBox("请输入x的值!")【】CaseIs

定义过程的格式中，Static关键字的作用是指定过程中的局部变量在内存中的存储方式。若使用了Static关键字，则

对下列程序段，说法正确的是　　Text1．Top=2000　　Text1．Left=800

最简单的交换排序方法是

在程序设计阶段应该采取【】和逐步求精的方法，把一个模块的功能逐步分解，细化为一系列具体的步骤，进而用某种程序设计语言写成程序。

在窗体上画一个名称为、commonDidog1的通用对话框，一个名称为Command1的命令按钮。要求单击命令按钮时,打开一个保存文稿件的通用对话框。该窗口的标题为”Save",缺省文件名为”SaveFile",在“文件类型”栏中显示*.txt,则能够满足

以下列烃为原料的裂解反应，所得氢收率由高到低的排列顺序为()。

旋转阳极X线管的阳极倾角一般在

胰岛素对脂肪代谢的影响是

建设工程监理组织协调中的会议协调法包括(　　)。

对于企业使用政府补助、转贷、贴息投资建设的项目，政府需要审批(　　)。

一个全面的财务规划涉及保险规划、税收规划、人生事件规划及投资规划等财务安排问题，不涉及现金、消费及债务管理。()

某学校在期中考试时设立诚信考场，实行无人监考。考前，学生们都要签诚信承诺书，保证自己在考场上人格得一百分。该做法属于()。

执行?AT(“a+b=c”，“+”)语句后，屏幕显示的结果为______。

以下程序运行后的输出结果是【】。main(){inti,n[]={0,0,0,0,0};for(i=1;i＜=4;i++){n[i]=n[i-1]*2+1;printf("%d",n[i]);}

HetalkedasifI______(be)hisbrothertohelphimalot.

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

二级VB

NCRE全国计算机二级

下面程序段，运行后的结果是 PrivateSubCommandl_Click() Dimb%(1To4)，i%，t# Fori=1To4 b(i)=i Nexti t=Tof(b()) Print"t="；t， End

要将名为MyForm的窗体显示出来，正确的使用方法是

在数据管理技术的发展过程中，经历了人工管理阶段、文件系统阶段和数据库系统阶段。其中数据独立性最高的阶段是______。

下列程序的功能是：当x100时，没有意义。请填空。PrivateSubCommand1_Click()DimxAsSinglex=InputBox("请输入x的值!")【】CaseIs

定义过程的格式中，Static关键字的作用是指定过程中的局部变量在内存中的存储方式。若使用了Static关键字，则

对下列程序段，说法正确的是 Text1．Top=2000 Text1．Left=800

最简单的交换排序方法是

在程序设计阶段应该采取【】和逐步求精的方法，把一个模块的功能逐步分解，细化为一系列具体的步骤，进而用某种程序设计语言写成程序。

在窗体上画一个名称为、commonDidog1的通用对话框，一个名称为Command1的命令按钮。要求单击命令按钮时,打开一个保存文稿件的通用对话框。该窗口的标题为”Save",缺省文件名为”SaveFile",在“文件类型”栏中显示*.txt,则能够满足

以下列烃为原料的裂解反应，所得氢收率由高到低的排列顺序为()。

旋转阳极X线管的阳极倾角一般在

胰岛素对脂肪代谢的影响是

建设工程监理组织协调中的会议协调法包括( )。

对于企业使用政府补助、转贷、贴息投资建设的项目，政府需要审批( )。

一个全面的财务规划涉及保险规划、税收规划、人生事件规划及投资规划等财务安排问题，不涉及现金、消费及债务管理。()

某学校在期中考试时设立诚信考场，实行无人监考。考前，学生们都要签诚信承诺书，保证自己在考场上人格得一百分。该做法属于()。

执行?AT(“a+b=c”，“+”)语句后，屏幕显示的结果为______。

以下程序运行后的输出结果是【】。main(){inti,n[]={0,0,0,0,0};for(i=1;i＜=4;i++){n[i]=n[i-1]*2+1;printf("%d",n[i]);}

HetalkedasifI______(be)hisbrothertohelphimalot.

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

下面程序段，运行后的结果是　PrivateSubCommandl_Click()　　Dimb%(1To4)，i%，t#　　Fori=1To4　　　b(i)=i　　Nexti　　t=Tof(b())　　Print"t="；t，　End

对下列程序段，说法正确的是　　Text1．Top=2000　　Text1．Left=800

建设工程监理组织协调中的会议协调法包括(　　)。

对于企业使用政府补助、转贷、贴息投资建设的项目，政府需要审批(　　)。