题目

(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 Sub
A."‥\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

提示:未搜索到的试题可在搜索页快速提交,您可在会员中心"提交的题"快速查看答案。
答案
查看答案
相关试题

(21) 属性用于设置组合框的风格。
A.Backstyle B.Borderstyle C.Style D.Sorted

(11)下列是一个体操评分程序。设满分为10分,20位评委,除去一个最高分和一个最低分,计算平均分。 Private Sub Command1_Click() Max=0 Mix=10 For i=1 To 20 n=Val(InputBox("请输入分数")) If n>Max Then Max=n If n>Mix Then Mix=n s=s+n s=s-Mix-Max P=s/18 Print"最高分";Max;"最低分";Mix Print"最后得分:";p End Sub

(6)为了选择多个控件,可以按住键,然后单击每个控件。

(33)VisualBasic根据计算机访问文件的方式将文件分成3类,其中不包括
A.顺序文件B.Unix文件C.二进制文件D.随机文件

(12)下列程序段的执行结果是。 i=4 a=5 Do i=i+1 a=a+2 Loop Until i>=7 Print"A=";a

联系我们 会员中心
返回顶部