首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Command1的命令按钮,其单击事件过程及相关的函数过程如下: Private Sub Command1_Click() Dim i As Integer For i=1 To 500
窗体上有一个名称为Command1的命令按钮,其单击事件过程及相关的函数过程如下: Private Sub Command1_Click() Dim i As Integer For i=1 To 500
admin
2020-04-18
40
问题
窗体上有一个名称为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://jikaoti.com/ti/tVx0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
编写如下程序:PrivateSubCommand1_Click()Dima(10)AsStrings="123456"n=Len(s)Fork=1Tona(k)=Mid(s,
窗体上有一个名称为Text1的文本框,一个名称为Command1的命令按钮。命令按钮的单击事件过程如下:Dimx1AsInteger,x2AsInteger,x3AsIntegers=Trim(Text1.Text
用来设置文字字体是否为粗体的属性是( )。
指令“Circle(1500,1200),1000,,,,0.5”将会绘制出的图形为()。
窗体上有一个名称为Timerl的计时器控件,一个名称为Shapel的形状控件,其Shape属性值为3(Cir—cle)。编写程序如F:PrivaleSubForm_LJmd()Shapel.Top=0Tirnerl.Int
在考生文件夹下有一个工程文件sjt5.vbp,包含了所有控件和部分程序。当程序运行时,单击“打开文件”按钮,则弹出“打开”对话框,默认目录为考生目录,默认文件类型为“文本文件”。选中in5.txt文件(如图1所示),单击“打开”按钮,则把文件中的内容读入并
设有如下事件过程:PrivateSubCommand1_Click() Fori=1To5 j=i Do Print"*" j=j-1 LoopUntilj=0 NextiEnd
在窗体上画一个命令按钮(其Name属性为Command1),然后编写如下代码:OptionBase1PrivateSubCommand1_Click()Dimaa=Array(1,2,3,4):j=1
在一棵二叉树上,第5层的结点数最多是()。
随机试题
转向轮定位:
大于65岁单纯主动脉瓣狭窄者,常见病因是
休克病人治疗过程中中心静脉压为20cmH2O,血压120/80mmHg,处理原则为
下列应当认定为工伤的情形有( )。
在50年代,我国森林覆盖率为19%,60年代为‘11%,70年代为6%,80年代不到4%.随着森林覆盖率的逐年减少,植被大量破坏,削弱了土地对雨水的拦蓄作用,一下暴雨,水卷泥沙滚滚而下,使洪涝灾害逐年严重。可见,森林资源的破坏,是酿成洪灾的原因。以下哪项使
人本主义心理学的代表人物是()
【B1】【B5】
WhydidAnnthinkshewouldbefrightened?Becauseshe______ofbeinginhighplaces.WhydidAnnthinkitwouldbespecially
Goodmorningandwelcometothiswritingcourse.MyNameisJackPeterson.ThismorningI’dliketotalkaboutthebasicskills
Obama’sSuccessIsn’tAllGoodNewsforBlackAmericansAsErinWhitewatchedtheelectionresultsheadtowardsvictoryfor
最新回复
(
0
)