首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Command1的命令按钮,其单击事件过程及相关的函数过程如下: Private Sub Command1_Click() Dim i As Integer For i = 1 To 500 If p(i)
窗体上有一个名称为Command1的命令按钮,其单击事件过程及相关的函数过程如下: Private Sub Command1_Click() Dim i As Integer For i = 1 To 500 If p(i)
admin
2015-08-28
47
问题
窗体上有一个名称为Command1的命令按钮,其单击事件过程及相关的函数过程如下:
Private Sub Command1_Click()
Dim i As Integer
For i = 1 To 500
If p(i) Then s = s + 1
Next
Print s
End Sub
Private Function p(x As Integer) As Boolean
If x Mod 7 <> 0 Then
p = True
Else
p = False
End If
End Function
关于上述程序,以下叙述中正确的是
选项
A、程序功能是统计1-500范围内能被7整除的整数个数
B、Command1_Click事件过程中If语句的条件表达式不完整
C、Function过程定义有误,函数过程p的名称与该过程中的变量名p相同
D、函数过程p的返回值为Boolean类型
答案
D
解析
程序功能是统计1-500范围内不能被7整除的整数个数;函数过程p的返回值根据函数定义可知为Boolean类型。选D)。
转载请注明原文地址:https://kaotiyun.com/show/veQp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
用来设置文字字体是否斜体的属性是
在窗体上画一个文本框,其名称为Text1,在属性窗口中把该文本框的MultiLine属性设置为True,然后编写如下的事件过程:PrivatesubForm_Click()Open“d:\test\smtextl.txt”ForInputAs
窗体卜有Listl、List2两个列表框,Listl中有若干列表项(见图),并有下面的程序:PrivatesubCommandl_Click()Fork:Listl.ListCount_lTo0step-1TfListl.Selecte
(1)在窗体Forml上画一个命令按钮,名称为Command1,标题为“打开文件”,在窗体上添加适当的控件并编写适当的程序代码,要求程序运行时,单击“打开文件”命令按钮,可以弹出“打开文件”对话框。程序运行时的窗体界面如图5—1所示。注意:保存时
(1)在Forml窗体上绘制一个名称为Textl的文本框,然后建立一个主菜单,标题为“操作”,名称为Op。并为该菜单建两个子菜单,其标题分别为“显示”和“清除”,名称分别为Dis和Clea。编写适当的事件过程,要求程序运行后,如果单击“操作”菜单中的“显示
打开考生文件夹下的sj5.vbp,在名称为Forml的窗体上建立两个命令按钮,名称分别为Commandl和Command2,命令按钮上分别显示“输入”和“结果”(如图15—7所示)。程序运行时单击“输入”按钮,输入6个数放人数组a中,单击“结果”则把数组a
(1)在考生文件夹下有工程文件sj3.vbp及窗体文件sj3.frm,该程序是不完整的。在窗体中有一个RichText文本框控件和一个文本框控件,名称分别为RichTextBoxl和Textl,两个命令按钮,名称分别为Commandl和Command2,标
图像框有一个属性,可以自动调整图像框的大小,以适应图像的尺寸,这个属性是______。
以下关于函数过程的叙述中,正确的是______。
随机试题
“良好的立法应该促进最大多数人的幸福”的观点出自于
糖酵解和三羧酸循环酶类的合成是组成型的。()
大型室间隔缺损,心尖区尚有隆隆样舒张期杂音的原因是
摩擦型桩包括()。
某企业有玻璃器皿生产车间。该企业的玻璃器皿制造分为烧制玻璃熔液、吹制成型和退火处理三道主要工序,烧制玻璃溶液的主要装置是玻璃熔化池炉。烧制时,从炉顶部侧面人工加入石英砂(二氧化硅)、纯碱(氢氧化钠)、三氧化二砷等原料,用重油和煤气作燃料烧至1300-170
A.MaybetodayismyluckydayB.ItwillbesocooltowinitC.wecanbetheluckywinnerA:Hey,didyouhearthat?Thelott
有以下程序#include<stdio.h>intm1(intx,inty){if(x<=y)return2*x+1;elsereturny;}intm2(intx,inty)
编译程序的最终目标是()。
Themostimportanttechnologicaleventofourtimeistheriseofthecomputer.Computersalready【B1】______manyaspectsofour
Whenanewmovementinartattainsacertainfashion,itisadvisabletofindoutwhatitsadvocatesareaimingat,for,howeve
最新回复
(
0
)