网友您好, 请在下方输入框内输入要搜索的题目:

题目内容 (请给出正确答案)

下列事件过程的功能是:建立一个名为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=3.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.txtFor Random As #1 Len=10 Put#1,i,Ksc

B...\Data1.txtFor Random As #1 Len=10 Put#1,Y,Ksc

C...\Data1.txtFor Random As #1 Put#1,i,Ksc

D...\Data1.txtFor Random As #1 Put#1,Y,Ksc


参考答案

更多 “ 下列事件过程的功能是:建立一个名为Data1的随机文件,存放角度值及这些角度的正弦函数值和余弦函数值,角度为1,2,3,…,90。请在空白处填入适当的内容,将程序补充完整( )。Private Type AngK As IntegerSinx As SingleCosx As SingleEnd TypeDim Ksc As AngPrivate Sub Form_Click()Dim Y As SingleDim i As IntegerDim Ksc As AngOpen______Y=3.14159/180For i=1 To 90Ksc.K=iKsc.Sinx=Sin(i*Y)Ksc.Cosx=Cos(i*Y)Next iClose #2End SubA...\Data1.txtFor Random As #1 Len=10 Put#1,i,KscB...\Data1.txtFor Random As #1 Len=10 Put#1,Y,KscC...\Data1.txtFor Random As #1 Put#1,i,KscD...\Data1.txtFor Random As #1 Put#1,Y,Ksc ” 相关考题
考题 下列事件过程的功能是:建立一个名为Datal的随机文件,存放角度值及这些角度的正弦函数值和余弦函数值,角度为1,2,3,…,90。请在空白处填入适当的内容,将程序补充完整。Private Type AngK As IntegerSinx As SingleCosx As SingleEnd TypeDim Ksc As AngPrivate Sub Form_Click()Dim Y As SingleOpen 【14】Y=3.14159 / 180For I=1 To 90Ksc.K=IKsc.Sinx=Sin(I * Y)Ksc.Cosx=Cos(I * Y)【15】Next IClose #2End Sub

考题 (12)下列事件过程的功能是:建立一个名为Datal的随机文件,存放在角度值及这些角度的正炫函数值和余弦函数值,角度为1,2,3···,90.请在空白处填上合适的代码,将程序补充完整。 Pivate Type Ang K As Integer Sinx As Single Cosx As Single End Type 定义Ang类型的变量Ksc Pivate Sub Form_Click() Dim Y As Single Open "C:\Datal.txt"For Random As#1 Len=10 Put#1,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

考题 (35)下列事件过程的功能是:建立一个名为Datal的随机文件,存放角度值及这些角度的正炫函数值和余弦函数值,角度为1,2,3…,90。请在空白处填入适当的内容,将程序补充完整 Pivate 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=3.14159/180 For i=1 To 90 Ksc.K=i Ksc.Sin=Sin(i*Y) Ksc.Cosx=Cos(i*Y) Next i Close#1 End SubA."‥\Datal.txt"For Random As#1 Len=10 Put#1,i,KscB."‥\Datal.txt"For Random As#1 Len=10 Put#1,Y,KscC."‥\Datal.txt"For Random As#1 Put#1,i,KscD."‥\Datal.txt"For Random As#1 Put#1,Y,Ksc

考题 (34)下列事件过程的功能是:建立一个名为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=3.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 SubA."‥\Datal.txt"For Random As#1 Len=10 Put#1,i,KscB."‥\Datal.txt"For Random As#1 Len=10 Put#1,Y,Ksc C."‥\Datal.txt"For Random As#1 Put#1,i,KscD."‥\Datal.txt"For Random As#1 Put#1,Y,Ksc

考题 折光率是( )。A.折射角的角度B.入折射角与折射角角度的比值C.折射角与入射角角度的比值D.入射角正弦与折射角正弦的比值E.入射角余弦与折射角余弦的比值

考题 折光率是A.折射角的角度B.入折射角与折射角角度的比值C.折射角与入射角角度的比值D.入射角正弦与折射角正弦的比值E.入射角余弦与折射角余弦的比值

考题 下列事件过程的功能是:建立一个名为Datal的随机文件,存放角度值及这些角度的正弦函数值和余弦函数值,角度为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 DimA...\Data1.txtFor Random As #1 Len=10 Put #1,i,KscB...\Data1.txtFor Random As #1 Len=10 Put #1,Y,KscC...\Data1.txtFor Random As #1 Put #1,i,KscD...\Data1.txtFor Random As #1 Put #1,Y,Ksc

考题 光率是 A .折射角的角度 B .入折射角与折射角角度的比值 C .折射角与入射角角度的比值 D .入射角正弦与折射角正弦的比值 E .入射角余弦与折射角余弦的比值

考题 折光率是 A.折射角的角度 B.入射角与折射角角度的比值 C.折射角与入射角角度的比值 D.入射角正弦与折射角正弦的比值 E.入射角余弦与折射角余弦的比值