有下面程序代码： Private Sub Command l_Click() a=3 s=0 For k=1 To 5 s=s+a Mod k

admin2020-04-18 49

问题有下面程序代码：
Private Sub Command l_Click()
         a=3
         s=0
         For k=1 To 5
            s=s+a Mod k
            a=a+k
         Next k
         Print s
End Sub
程序运行后，单击命令按钮Commandl，输出结果是

选项 A、1 5
B、13
C、4
D、1

答案C

解析在For循环中k的值从1变化到5，在每次循环中为累加和变量s累加上a Mod k的值然后令a自加k，故此整个循环过程中s=0+0+0+1+3=4。

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

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

二级VB

NCRE全国计算机二级

相关试题推荐

下面叙述中错误的是()。
定义无符号整数类为UInt，下面可以作为类UInt实例化值的是(　　)。
(1)在考生文件夹下有一个工程文件sit3．vbp。程序运行后，单击“读入数据”按钮，可把考生文件夹下in3．txt文件中的所有英文单词读入，并显示在Text1文本框中；单击“插入列表框”按钮，则按顺序把每个单词作为一项添加到List1列表框中(如图2．1
窗体的MouseUp事件过程如下：PrivateSubForm_MouseUp(ButtonAsInteger，ShiftAsInteger，XAsSingle，YAsSingle)　　……EndSub关于以上定义，以下
程序调试的任务是()。
窗体上有两个水平滚动条HV、HT，还有一个文本框Text1和一个标题为“计算”的命令按钮Command1，并编写了以下程序：PrivateSubCommand1_Click()Callealc(HV．Value，HT．Value)EndS
(1)在名称为Forml的窗体上画一个名称为Text1的文本框，再建立一个名称为Format的弹出式菜单，含三个菜单项，标题分别为“加粗”、“斜体”、“下划线”，名称分别为M1、M2、M3。请编写适当的事件过程，在运行时当用鼠标右键单击窗体时，弹出此菜单，
标准模块中有如下程序代码：PublicxASInteger，YAsIntegerSubTempSub()x＝10：y＝20EndSub在窗体上有1个命令按钮，并有如下事件过程：Pr

随机试题

人巨细胞病毒CMV有细胞内衣壳，无DNA的是
患者女，63岁。因“腰部酸痛、乏力、伴行走困难1年”来诊。患者停经7年，无特殊既往史。查体：腰部广泛压痛、叩击痛，腰椎活动受限。双下肢肌力、肌张力、感觉均正常。腰椎MRI示L4／5椎间盘突出，L2／3、L3／4椎间盘膨出，腰椎退行性改变。可采用的治疗有
StudentLoansFederalStudentAidisanofficeproviding(provide)studentloansforhighereducation．TheU．S．governmentknows
1983年3月1日，全国人大常委会通过的《商标法》生效；2002年9月15日，国务院制定的《商标法实施条例》生效；2002年10月16日，最高法院制定的《关于审理商标民事纠纷案件适用法律若干问题的解释》施行。对此，下列哪些说法是正确的?
对于保冷的管道，为防止保冷材料的导热系数增大，保冷结构开裂，在其外表面必须设置(　　)。
下列选项中，说法错误的是()。
对于平息债券，下列表述中不正确的是()。
Oftheworld’s774milliterateadultstwo-thirdsarewomen,asharethathasremainedunchangedforthepasttwodecades.Butgi
根据“歌手”表建立视图myview，视图中含有“歌手号”左边第一位是“1”的所有记录，正确的SQL语句是()。
Growingup,Iearnedmybestmarksforplayingwellwithothers.Formyhusband,Ilivedinthreedifferentcountriesinfiveye

最新回复(0)

有下面程序代码： Private Sub Command l_Click() a=3 s=0 For k=1 To 5 s=s+a Mod k

二级VB

NCRE全国计算机二级

下面叙述中错误的是()。

定义无符号整数类为UInt，下面可以作为类UInt实例化值的是( )。

窗体的MouseUp事件过程如下：PrivateSubForm_MouseUp(ButtonAsInteger，ShiftAsInteger，XAsSingle，YAsSingle) ……EndSub关于以上定义，以下

程序调试的任务是()。

窗体上有两个水平滚动条HV、HT，还有一个文本框Text1和一个标题为“计算”的命令按钮Command1，并编写了以下程序：PrivateSubCommand1_Click()Callealc(HV．Value，HT．Value)EndS

标准模块中有如下程序代码：PublicxASInteger，YAsIntegerSubTempSub()x＝10：y＝20EndSub在窗体上有1个命令按钮，并有如下事件过程：Pr

人巨细胞病毒CMV有细胞内衣壳，无DNA的是

StudentLoansFederalStudentAidisanofficeproviding(provide)studentloansforhighereducation．TheU．S．governmentknows

对于保冷的管道，为防止保冷材料的导热系数增大，保冷结构开裂，在其外表面必须设置( )。

下列选项中，说法错误的是()。

对于平息债券，下列表述中不正确的是()。

Oftheworld’s774milliterateadultstwo-thirdsarewomen,asharethathasremainedunchangedforthepasttwodecades.Butgi

根据“歌手”表建立视图myview，视图中含有“歌手号”左边第一位是“1”的所有记录，正确的SQL语句是()。

Growingup,Iearnedmybestmarksforplayingwellwithothers.Formyhusband,Ilivedinthreedifferentcountriesinfiveye

定义无符号整数类为UInt，下面可以作为类UInt实例化值的是(　　)。

窗体的MouseUp事件过程如下：PrivateSubForm_MouseUp(ButtonAsInteger，ShiftAsInteger，XAsSingle，YAsSingle)　　……EndSub关于以上定义，以下

对于保冷的管道，为防止保冷材料的导热系数增大，保冷结构开裂，在其外表面必须设置(　　)。