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

admin2009-01-15  31

问题 下列事件过程的功能是:建立一个名为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
    Open【  】
    Y=14159/180
    For I=1 To 90
     KsC.K=I
     KsC.Sinx=Sin(I*Y)
     KsC.Cosx=Cos(I*Y)
    【  】
    Next I
    Clise #2
  End Sub

选项

答案“c:\Datal.txt”For Random As #2 Len=10 , Put#2,I,Ksc

解析 第一个空白行已经告诉我们是打开文件的语句,现在要将它填写完整。该语句应确定文件的存取方式是随机存取。在自定义变量中,有3成员,其中角度为整型数据,占2个字节;弦和余弦函数值为单精度类型,各占4个字节,故文件的记录占10个字节。若不指定Len参数,则隐含一个记录占128字节。为了节省存储空间,可在Open语句中指写Len参数值。程序中没有将数据写入随机文件的语句,第二个空白行应是Put语句。
转载请注明原文地址:https://jikaoti.com/ti/ER80FFFM
0

最新回复(0)