下列事件过程的功能是:建立一个名为Data1的随机文件,存放角度值及这些角度的正弦函数值和余弦函数值,角度为1,2,3,…,90。请在空白处填入适当的内容,将程序补充完整( )。 Private Type Ang K As In

admin2010-03-30  43

问题 下列事件过程的功能是:建立一个名为Data1的随机文件,存放角度值及这些角度的正弦函数值和余弦函数值,角度为1,2,3,…,90。请在空白处填入适当的内容,将程序补充完整(    )。    Private Type Ang         K As Integer         Sinx As Single         Cosx As Single    End Type    Dim Ksc As Ang    Private Sub Form_Click()    Dim Y As Single    Dim i AS Integer    Dim Ksc As Ang        Open ______        Y=14159/180        For i=1 To 90             Ksc.K=i             Ksc.Sinx=Sin(i*Y)             Ksc.Cosx=Cos(i*Y)             ______        Next i        Close #2    End Sub

选项 A、..\Data1.txt For Random As #1 Len=10    Put #1,i,Ksc
B、..\Data1.txt For Random As #1 Len=10    Put #1,Y,Ksc
C、..\Data1.txt For Random As #1           Put #1,i,Ksc
D、..\Data1.txt For Random As #1           Put #1,Y,Ksc

答案1

解析 分析程序,程序要将角度值及这些角度的正弦函数值和余弦函数值存入Data1文件中。因此,应先打开Data1文件,应为Data1文件是随机文件,要新建并写入信息,所以应用Random方式打开文件。这里我们给随机文件指定长度为10,所以第1个空白处应填: "..\Data1.txt" For Random As #1 Len=10。要向随机文件中写入信息,应用Put语句,因此第2空应填;Put #1,i,Ksc。
转载请注明原文地址:https://kaotiyun.com/show/2p1p777K
0

最新回复(0)