患者，女，11岁。替牙
，上牙前突，有间隙，前牙深覆，下颌明显后缩，面下1／3短。诊断：安氏I2类1分类。矫治器设计为功能性(FR-I1)矫治器，导下颌向前
FR-I1型功能调节器适用于矫治的牙畸形是
A:安氏I2类1 B:安氏I2类2 C:安氏I3类 D:安氏Ⅳ类 E:开
某患者，女，19岁。医生的诊断记录是：安氏I2类2分类；毛氏Ⅳ类1分类加I1类1分类。
毛氏Ⅳ类1分类的表现是
A:第一磨牙远中关系，前牙覆
B:第一磨牙近中关系，前牙深覆 C:上牙弓宽于下牙弓后牙深覆盖 D:前牙深覆，面下1／3过低 E:双颌或双牙弓前突
患者，女，11岁。替牙
，上牙前突，有间隙，前牙深覆，下颌明显后缩，面下1／3短。诊断：安氏I2类1分类。矫治器设计为功能性(FR-I1)矫治器，导下颌向前
FR-I1型功能调节器适用于矫治的牙畸形是
A:安氏I2类1 B:安氏I2类2 C:安氏I3类 D:安氏Ⅳ类 E:开
患者，女，11岁。替牙
，上牙前突，有间隙，前牙深覆，下颌明显后缩，面下1／3短。诊断：安氏I2类1分类。矫治器设计为功能性(FR-I1)矫治器，导下颌向前
FR-I1型功能调节器适用于矫治的牙畸形是
A:安氏I2类1 B:安氏I2类2 C:安氏I3类 D:安氏Ⅳ类 E:开
在E盘当前目录文件夹下建立一个名为“Student.txt”的随机文件，要求用InputBox函数输入5个学生的姓名(StuName)、年级(StuGrade)和年龄(StuAge)。在程序中有以下记录类型和窗体的事件过程，请选择正确的语句完成程序( )。
Private Type student
StuName As String*10
StuGrade As String*10 StuAge As Integer
End Type
Private Sub Form_Click（ ）
Dim s As student
Open "c：/student.txt" For Random As #1 Len=Len(s)
For i=1 To 1
s.StuName=InputBox("请输入姓名")
s.StuGrade=InputBox("请输入年级号")
s.StuAge=Val(InputBox("请输入年龄"))
Next i
Close #1
End Sub
A:Print #1，s B:Print #1，i C:Put #1，，s D:Put #1，，i
在E盘当前目录文件夹下建立一个名为“Student.txt”的随机文件，要求用InputBox函数输入5个学生的姓名(StuName)、年级(StuGrade)和年龄(StuAge)。在程序中有以下记录类型和窗体的事件过程，请选择正确的语句完成程序( )。
Private Type student
StuName As String * 10
StuGrade As String * 10
StuAge As Integer
End Type
Private Sub Form_Click（ ）
Dim s As student
Open "c:/student.txt" For Random As #1 Len = Len(s)
For i = 1 To 1
s. StuName = InputBox("请输入姓名")
s. StuGrade = InputBox("请输入年级号")
s. StuAge = Val(InputBox("请输入年龄"))
Next i
Close #1
End Sub
A:Print #1,s B:Print #1,i C:Put #1,,s D:Put #1,,i
在E盘当前目录文件夹下建立一个名为“Student.txt”的随机文件，要求用InputBox函数输入5个学生的姓名(StuName)、年级(StuGrade)和年龄(StuAge)。在程序中有以下记录类型和窗体的事件过程，请选择正确的语句完成程序( )。
Private Type student
StuName As String*10
StuGrade As string*10
StuAgc As Integer
End Type
Private Sub Form_Click（ ）
Dim s As student
Open "c:/student.txt" For Random As #1 Len=Len(s)
For i=1 To 1
s.StuName=InputBox("请输入姓名")
s.StuGrade=Input. Box("请输入年级号")
s.StuAge=Val(InputBox("请输入年龄"))
Next i
Close #1
End Sub
A:Print #1,s B:Print#1,i C:Put#1,,s D:Put#1,,i
在E盘当前目录文件夹下建立一个名为“Student.txt”的随机文件，要求用InputBox函数输入5个学生的姓名(StuName)、年级(StuGrade)和年龄(StuAge)。在程序中有以下记录类型和窗体的事件过程，请选择正确的语句完成程序( )。
Private Type student
StuName As String * 10
StuGrade As String * 10
StuAge As Integer
End Type
Private Sub Form Click（ ）
Dim s As student
Open "c:/student.txt"For Random As#1 Len=Len(s)
For i=1 To 5
s.StuName=InputBox("请输入姓名")
s.StuGrade=InputBox("请输入年级号")
s.StuAge=Val(InputBox("请输入年龄"))
______
Next i
Close #1
End Sub
A:Print #1,s B:Print #1,i C:Put #1,,s D:Put #1,i
下列事件过程的功能是：建立一个名为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=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:"../Datatxt"For Random As #1 Len=10 Put #1，i，Ksc B:"../Datatxt"For Random As #1 Len=10 Put #1，Y，Ksc C:"../Datatxt"For Random As #1 Put #1，i，Ksc D:"../Datatxt"For Random As #1 Put #1，Y，Ksc
在E盘当前目录文件夹下建立一个名为“Student.txt”的随机文件，要求用InputBox函数输入5个学生的姓名(StuName)、年级(StuGrade)和年龄(StuAge)。在程序中有以下记录类型和窗体的事件过程，请选择正确的语句完成程序( )。 Private Type student StuName As String * 10 StuGrade As String * 10 StuAge As Integer End Type Private Sub Form_Click（ ） Dim s As student Open "c:/student.txt" For Random As #1 Len = Len(s) For i = 1 To 1 s. StuName = InputBox("请输入姓名") s. StuGrade = InputBox("请输入年级号") s. StuAge = Val(InputBox("请输入年龄")) Next i Close #1 End Sub
A:Print #1,s B:Print #1,i C:Put #1,,s D:Put #1,,i
单选题
