填空题

下列程序段的执行结果为 【13】 。 Dim A (10,10) For i = 2 To 4 For j =4 To 5 A(i,j) =i*j Next Next Print A (2,5) +A(3,4) +A(4,5)

【参考答案】

42
<上一题 目录 下一题>
热门 试题

填空题
新建一个工程，内有两个窗体，窗体Form1上有一个命令按钮Command1，单击该按钮，Form1窗体消失，显示Form2窗体，程序如下，请填空。Private Sub Command1_Click()Form1.HideForm2. 【8】 End Sub
填空题
有一个事件过程，其功能是：从已存在于磁盘上的顺序文件NM1.txt中读取数据，计算读出数据的平方值，将该数据及其平方值存入新的顺序文件NM2.txt中。请填空。Private Sub Form_Click()Dim x As Single，y As SingleOpen NM1.txt For Input As #1Open NM2.txt For Input As #2Do While Not EOF(1)【10】 Print xy=x^2【11】 Print yLoopClose #1, S2End Sub
相关试题