更多"建立随机文件F1.DAT，存放职工姓名和编号，然后把该文件中数据读出显"的相关试题:
[填空题]建立随机文件Workers．dat。存取职工的姓名和职工号，然后把该文件中的数据读出显示。请在空白处填入适当的语句。
Type Worker
name As String*8
number As Integer
End Type
Open"e:/Workers．dat"For Random As #1 Len=Len(Workerl)
Workerl．name="zn"：Worker1．number=100#
【 】
Close #1
Open"Workers．dat"For Random As #1 Len=Len(Worker1)
【 】
Print"Worker1："，Worker1．name
Print "Worker1："，Worker1．number
Close #1
[填空题]建立随机文件TEST．DAT，存放学生的姓名和总分，然后把该文件中的数据读出来显示。
请在空白处填适当的内容，将程序补充完整。
Type Record
Student As String *20
Score As Single
End Type
Dim Class As Record
Open "Text．dat" For ______ As #1 Len=Len (Class)
Class.Student= "LiuMin"： Class.Score=596
Put #1，1，Class
Close #1
Open "Text.dat" For Random As #1 Len=Len(Class)
______
Print "STUDENT："， Class， Studnet
Print "SCORE://"，Class．Score
Close #1
End
[填空题]建立随机文件TEST.DAT，存放学生的姓名和总分，然后把该文件中的数据读出来显示。请在 【10】 和 【11】 处填适当的内容，将程序补充完整，
Type Record
Student As String*20
Score As Single
End Type
Dim Class As Record
Open"TEXT.DAT"For 【10】 As #1 Len=Len(Class)
Class.Student=“LiuMin”：Class.Score=596
Put #1，1，Class
Close #1
Open"TEXT.DAT"For Random As #1 Len(Class)
【11】
Print"STUDENT："，Class.Student
Print"SCORE://"，Class.Score
Close #1
End
[简答题]
【问题1】
下面是创建职工关系的SQL语句，职工编号唯一识别一个职工，职工姓名不能为空。请将空缺部分补充完整。
CREATE TABLE职工(
职工编号CHAR(6)，
姓名CHAR(8) (a) ，
性别CHAR(2)，
城市VARCHAR(20)，
PRIMARYKEY (b) ；
[填空题]下列事件过程的功能是：建立一个名为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
Open“c:/Datal.txt”For Random As #2 Len=10
Y=3.14159/180
For i=1 To 90
Ksc.K=i
Ksc.Sinx=Sin(i * Y)
Ksc.Cosx=Cos(i * Y)
______
Next
Close #2
End Sub
