填空题

下列程序是用来计算1+2+3……+10的程序段,请补充该程序。
Dim i, s, k As Integer
s =0: k = 0
For 【9】 To 1
k=k+1
s=s+ k
Next i
Print s

【参考答案】

[9]j=-10
<上一题 目录 下一题>
热门 试题

填空题
在Select case 结构中,使用“To表达式”来指定一个范围时,必须把 【15】 的值写在前面。
填空题
窗体中有图片框(Pieture1)和计时器(Timer1)两个控件。运行程序时,将图片加载到图片框中,然后图片框以每2秒钟一次的速度向窗体的右下角移动,每次向左,向右移动100twip。请填空。 Private Sub Form_ Load() Picture1_icture=LoadPicture(“c: pic mouth.ico”) 【6】 .Interval=2000 End Sub Private Sub Timer1_ Timer() Static x,y As Integer x=x+100 y=y+100 Pictuer1.Move [x, y] End Sub
相关试题
  • 面向对象的程序设计方法是把 【10】 封...
  • 下面的程序代码实现将一个一维数组中元素向...
  • 以下程序用来建立一个10*10矩阵,该矩...