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

admin2010-09-11  33

问题 下列事件过程的功能是:建立一个名为Data1的随机文件,存放角度值及这些角度的正弦函数值和余弦函数值,角度为1,2,3,…,90。请在空白处填上合适的代码,将程序补充完整。
Private Type Ang
K As Integer
Sinx As Single
Cosx As Single
End Type
______’定义Ang类型的变量Ksc
Private Sub Form_Click()
Dim Y As Single
Open "C:\Data1.txt"For Random As #1 Len=10
Put #l, 1, Ksc
Y=3.14159/180
For i=1 To 90
Ksc.K = i
_______ = Sin(i * Y)’给变量Ksc的正弦函数值赋值
Ksc. Cosx=Cos(i * Y)
Next i
Close #1
End Sub

选项

答案Dim Ksc As Ang , Ksc.Sinx

解析 声明用户定义类型的变量格式为:Dim变量名as用户定义类型名;定义了记录类型后,给该类型变量赋值时用“变量名.元素;要赋的值”的格式进行赋值。
转载请注明原文地址:https://kaotiyun.com/show/7xmp777K
0

最新回复(0)