下列程序实现的功能是：从键盘上输入10个整数 并把它们写到“D：”盘“a1．dat”文件中 然后从中
下列程序实现的功能是：从键盘上输入10个整数，并把它们写到“D：”盘“a1．dat”文件中，然后从中读出第5个数并输出。 Private Sub Form_Click() Dim k As Integer Dim n As Integer，i As Integer n=Len(k) Open【 】As10 Len=n For i=1 To 10 k=InputBox("请输入一个整数") 【 】 Next i 【 】 Get 10，，k Print k End Sub
请帮忙给出正确答案和分析，谢谢！
参考解答
461***263
2023-07-21 09:44:24
正确答案：'D:\a1.dat'For Random Put #10ik Seek #105
根据分析可知，本题打开的文件可以先写后读，既可以读又可以写，同时又发现文件读写使用Get#和Put#语句，因此，应该用随机方式打开文件，故[13处应填“'D:\a1.dat'ForRandom”。通过一个For循环输入10个数，并把它们写到文件中去，因此[14处应填“Put#10，i，r”。为读出第5个整数，必须首先把记录指针移到第5条记录处，可使用Seek#语句，故[15处应填“Seek#10,5”。
相似问题
语句Static x(7 8)As Double定义了【 】个元素。请帮忙给出正确答案和分析 谢谢！
语句Static x(7，8)As Double定义了【 】个元素。请帮忙给出正确答案和分析，谢谢！
假设窗体中已经有了一个驱动器列表框Drivel和一个目录列表框Dirl 如图20-10所示。当改变了
假设窗体中已经有了一个驱动器列表框Drivel和一个目录列表框Dirl，如图20-10所示。当改变了驱动器列表框中的驱动器时，希望在目录列表框中显示相应驱动器
算法一般都可以用选择结构 循环结构和【 】结构组合而成。请帮忙给出正确答案和分析 谢谢！
算法一般都可以用选择结构、循环结构和【 】结构组合而成。请帮忙给出正确答案和分析，谢谢！
编写如下通用过程： Sub proc(By Val num As Long ByRef ren As
编写如下通用过程： Sub proc(By Val num As Long，ByRef ren As Long) Dim k As Long K = 1 num=Abs(num) Do While num k= k *(
下列程序的功能是：单击窗体时将随机生成20个两位数依次赋值给一个由20个元素组成的数组 然后把数组反
下列程序的功能是：单击窗体时将随机生成20个两位数依次赋值给一个由20个元素组成的数组，然后把数组反序存放，再输出。 Option Base 1 Private Sub
