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

搜题

题目内容（请给出正确答案）

提问人：网友qxf1547 发布时间：2022-01-07

[主观题]

下列事件过程的功能是：建立一个名为Data1的随机文件，存放角度值及这些角度的正弦函数值和余弦函

数值，角度为1，2，3，…，90。空白处应填入的内容是（）。

Private Type Ang

K As Integer

Sinx As Single

Cosx As Single

End Type

Private Sub Form_Click（）

Dim Y As Single

Dim i As Integer

Dim Ksc As Ang

Open_______

Y=3．14159／180

For i-1 T0 90

KSC．K-i

KSC．Sinx=Sin(i*Y)

KSC．Cosx=Cos(i+Y)

________

Next i

Close#2

Elld Stub

A."．．＼Data1．txt"For RandomAs#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

简答题官方参考答案（由简答题聘请的专业题库老师提供的解答）

查看官方参考答案

更多“下列事件过程的功能是：建立一个名为Data1的随机文件，存放角度值及这些角度的正弦函数值和余弦函”相关的问题

第1题

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

B．..\Datal.txtFor Random As #1 Len=10 Put #1，Y，Ksc

C．..\Datal.txtFor Random As #1 Put #1，i，Ksc

D．..\Datal.txtFor Random As #1 Put #1，Y，Ksc

点击查看答案

第2题

下列事件过程的功能是：建立一个名为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 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, Kse

C．..\Data1.txt For Random As #1 Put #1, i, Ksc

D．..\Data1.txt For Random As #1 Put #1, Y, Ksc

点击查看答案

第3题

下列事件过程的功能是：建立一个名为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

点击查看答案

第4题

（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

点击查看答案

第5题

（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

点击查看答案

第6题

（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

点击查看答案

第7题

如果要打开E盘上user子目录下名为test.txt的文本文件进行读、写操作，下面符合要求的函数调用是（）。

A、fopen("E:\user\test.txt","r");

B、fopen("E:\\user\\test.txt", "r+");

C、fopen("E:\user\test.txt","rb");

D、fopen("E:\\user\\test.txt", "w");

点击查看答案

第8题

将E—R图转换为关系模式时，实体和联系都可以表示为（）。

A.属性

B.键

C.关系

D.域

点击查看答案

第9题

若在窗体模块的声明部分声明了如下自定义类型和数组：

Private Type rec

Code As Integer

Caption As St ring

End Type

Dim art(5)As rec

则下面的输出语句中正确的是（）。

A.Print arr．Code(2)，art．Caption(2)

B.Print art．Code，arr．Caption

C.Print arr(2)．Code，arr(2)．Caption

D.Print Code(2)，Caption(2)

点击查看答案

账号：尚未登录

登录没有账号？去注册

搜题记录

联系客服

购买搜题卡

考试指南全部 >

报考湖南成人高考艺术类专业注意事项! 2024年自考准考证打印入口官网有什么注意事项 2024年自考大专报名需要中专毕业证吗都要哪些材料湖南成人高考艺术类专业录取控制分数线划定方式？初中可以自考本科文凭吗报考要求有哪些考生报名2024年湖南成人高考要趁早，注意改革变化! 2024年自考本科报名限制学历吗流程步骤是什么 2024年考自考大专要具备什么学历有哪些要求 2024年初中学历去自考大专怎么报名需要什么条件 2024年湖南成人高考录取查询时间！

购买搜题卡查看答案

购买前请仔细阅读《购买须知》

请选择支付方式

微信支付

支付宝支付

点击支付即表示你同意并接受《服务协议》和《购买须知》

立即支付已付款，但不能查看答案，请点这里登录即可>>

搜题卡使用说明

1. 搜题次数扣减规则：

功能	扣减规则
功能	基础费（查看答案）	加收费（AI功能）
文字搜题、查看答案	1/每题	0/每次
语音搜题、查看答案	1/每题	2/每次
单题拍照识别、查看答案	1/每题	2/每次
整页拍照识别、查看答案	1/每题	5/每次