数列中,第一项为3,后一项都比前一项的值增5。下列给定程序中,函数fun()的功能是:计算前n(4≤n≤50)项的累计和。在累加过程中把那些被4除后余2的当前累加值放入数组中,符合此条件的累加值的个数作为函数值返回主函数里。如,当n的值为20时,该数列为3,8,13,18,23,28,…, 93,98。符合此条件的累加值应为42,126,366,570,1010。
请改正程序中的错误,使它能得出正确的结果。
注意:不要改动main函数,不得增行或删行,也不得更改程序的结构。
试题程序:
include <stdio. h>
define N 20
int fun(iht n, int *a)
/*************found*************/
{ int i, j, k, sum;
sum=0;
for(k=3, i=0;i<n; i++, k+=5)
{ sum=sum+ k;
/************found***************/
if (sum%4=2)
a [j++] =sum;
}
/*************found**************/
return j;
}
main ( )
{ int a[N],d, n, i;
printf("\nEnter n(4<=n<=50): ");
scanf("%d", &n);
d=fun(n, a);
printf("\n\n The result :\n ");
for(i=0;i<d; i++) printf("%6d ",a[i]);
printf("\n\n ");
}
设在名称为Myform的窗体上只有1个名称为C1的命令按钮,下面叙述中正确的是( )。
A.窗体的Click事件过程的过程名是Myform_Click
B.命令按钮的Click事件过程名是C1_Click
C.命令按钮的Click事件过程的过程名是Command1_Click
D.以上三种过程名称都是错误的
设有如下程序
Option Base 1
Private Sub Command1_Click()
Dim arrl
Dim Min As Integer,i As Integer
arrl=Array(12,435,76,-24,78,54, 866, 43)
Min=____
For i=2 To 8
If arrl(i)<Min Then
Next i
Print “最小值是:”;Min
End Sub
以上程序的功能是:用Arcay函数建立一个含有8个元素的数组,然后查找并输出该数组中各元素的最小值。请填空。
考生文件夹下存在一个数据库文件“samp3.mdb”,里面已经设计好表对象“tAddr”和“tUser”,同时还设计出窗体对象“fEdit”和“fEuser”。请在此基础上按照以下要求补充“fEdit”窗体的设计:
(1)将窗体中名称为“1Remark”的标签控件上的文字颜色改为“蓝色”(蓝色代码为16711680)、字体粗细改为“加粗”。
(2)将窗体标题设置为“显示/修改用户口令”。
(3)将窗体边框改为“细边框”样式,取消窗体中的水平和垂直滚动条、记录选择器、导航按钮和分隔线;并且保留窗体的关闭按钮。
(4)将窗体中“退出”命令按钮(名称为“cmdquit”)上的文字颜色改为棕色(棕色代码为128)、字体粗细改为“加粗”,并在文字下方加上下划线。
(5)在窗体中还有“修改”和“保存”两个命令按钮,名称分别为“CmdEdit”和“CmdSave”,其中“保存”命令按钮在初始状态为不可用,当单击“修改”按钮后,“保存”按钮变为可用,同时在窗体的左侧显示出相应的信息和可修改的信息。如果在“口令”文本框中输入的内容与在“确认口令”文本框中输入的内容不相符,当单击“保存”按钮后,屏幕上应弹出如下图所示的提示框。现已编写了部分VBA代码,请按照VBA代码中的指示将代码补充完整。
[*]
要求:修改后运行该窗体,并查看修改结果。
注意:不允许修改窗体对象“fEdit”和“fEuser”中未涉及的控件、属性;不允许修改表对象“tAddr”和“tUser”。
程序代码只允许在“*****Add*****”与“*****Add*****”之间的空行内补充一行语句、完成设计,不允许增删和修改其他位置已存在的语句。
在宏的表达式中引用窗体控件的值可以用表达式______。
在浏览数据访问页中时,如果记录导航器中的页码显示为“4-6of28”,则在记录导航器的“ReccordSetLabel”属性应设置为【】。