题目内容

有如下函数： Function fun(a As Integer，n As Integer)As Integer Dim m AS Integer While a＞=n a=a-n：m=m+1 Wend Fun=m End Function 该函数的返回值是。 A．a乘以n的乘积 B．a加n的和 C．a减n的差 D．a除以n的商(不含小数部分)

查看答案

搜索结果不匹配？点我反馈

更多问题

某人在窗体上画了一个名称为Timerl的计时器和一个名称为Label1的标签，计时器的属性设置为Enabled=True，Interval=0，并编程如下。希望在程序运行时，可以每2秒在标签上显示一次系统当前时间。 Private SubTimer1_Timer Labell.Caption=Time$ End Sub 在程序执行时发现未能实现上述目的，那么，他应做的修改是。 A．通过属性窗口把计时器的Interval属性设置为2000 B．通过属性窗口把计时器的Enabled属性设置为False C．把事件过程中的Label1.Caption=Time$语句改为Timer1.Interval=Time$ D．把事件过程中的Label1.Caption=Time$语句改为Label1.Caption=Timer1.Time

在窗体上画一个名称为Commandl的命令按钮，并编写以下程序： Private Sub Commandl_Click Dim n％，b，t T=1：b=1：n=2 DO B=b*n：t=t+b：n=n+1 Loop Until n＞9 Ptint t End Sub 此程序计算并输出一个表达式的值，该表达式是。 A．9! B．10! C．1! +2! +…+9! D．1!+2!+…+10!

下面关于文件的叙述中错误的是。 A．随机文件中各条记录的长度是相同的 B．打开随机文件时采用的文件存取方式应该是Random C．向随机文件中写数据应使用语句Print#文件号 D．打开随机文件与打开顺序文件一样，都使用Open语句

执行以下程序后输出的是。 Private Sub Commandl_Click ch$ = "ABCDEFGH": Print Mid(Right(ch$, 6), Len(Left(ch$, 4)), 2) End Sub A．CDEFGH B．ABCD C．FG D．AB