更多"有如下用户定义类型及操作语句: Type Student No "的相关试题:
[填空题]有如下用户定义类型及操作语句:
Type Student
No As String
Name As String
Age As Integer
End Type
Dim Stu As Student
With Stu
.No="200801001"
.Name="高强"
.Age=23
End With
执行MsgBox Stu.Name后,消息框输出结果是______。
[填空题]有如下用户定义类型及操作语句:
Type Student
No As String
Name As String
Age As Integer
End Type
Dim Stu As Student
With Stu
.No="200801001"
.Name="高强"
.Age=23
End With
执行MsgBox Stu.Name后,消息框输出结果是______。
[填空题]有如下用户定义类型及操作语句:
Type Student
SNo As String
SName As String
IAge AS Integer
End Type
Dim Stu As Student
With Stu
.SNo=“200609001”
.SName=“陈果果”
.IAge=19
End With
执行MsgBox Stu.IAge后,消息框的输出结果是______。
[填空题]有如下用户定义类型及操作语句:
Type Student
Sno As String
Sname As String
Sage As Integer
End Type
Dim Stru AS Student
With Stu
.SNO="200609001"
.Shame="陈果果"
.Abe=19
End With
执行MsgBox Stu.Age后,消息框的输出结果是______。
[填空题]有如下用户定义类型及操作语句:
Type Student
SNo As String
SName As String
SAge As Integer
End Type
Dim Stu As Student
With Stu
.SNo="200609001"
.SName="陈果果"
.Age=19
End With
执行MsgBox Stu.Age后,消息框输出结果是______。
[填空题]有如TNP定义类型及操作语句:
Type Student
SNo As String
SName As String
IAge As Integer
End Type
Dim Stu As Student
With Stu
.SNo="200609001"
.SName="陈果果"
.IAge=19
End With
执行MsgBox Stu.IAge后,消息框的输出结果是______。
[填空题]有如下用户定义类型及操作语句:
Type Teacher
TNo As String
TName As String
IAge As Integer
End Type
Dim Tea As Teacher
With Tea
.TNo="20080001"
.TName="张三"
.IAge=32
End With
执行MsgBox Tea. TName后,消息框输出结果是 (14) 。
[填空题]有如下用户定义类型及操作语句:
Type Student
SNo As String
SName As String
IAge As Integer
End Type
Dim StuAs Student
With Stu
SNo="200609001"
SName="陈果果"
IAge=19
End With
执行MsgBox Stu.IAge后,消息框输出结果是【 】。
[单项选择]设有如下的记录类型:
Type Student
Number As String
Name As String
Age As Integer
End Sub
则能正确引用该记录类型变量的代码是( )。
A. Student.name=""
B. Dim s As Students.name=“张红”
C. Dims As Tye Students.name=“张红”
D. DimsAsTypes.name=“张红”
[填空题]设有如下记录类型:
Type student
Number As String*10
Name As String*8
End Type
窗体中有若干控件,单击其中的一个按钮Command1时,执行如下事件过程,该过程的功能是把数据输出到指定的文件中。根据题意,请完善下列程序。
Private sub Command1_click( )
Dim stu As student
Open "C:/file, dat" For Random As #1 Len=Len( 【11】 )
Title $="写记录到随机文件"
Str1 $="请输入学生名"
Str2 $="请输入学生名"
For i=1 To 5
stu. Number=InputBox(Str1 $, Title $)
stu. Name=InputBox$(Str2 $, Title $)
【12】 #1, i, stu
Next i
Close 【13】
End Sub
[填空题]有如下用户定义类型及操作语句:
Type Teacher
TNo As String
TName As String
IAge As Integer
End Type
Dim Tea As Teacher
With Tea
.TNo="20080001"
.TName="张三"
.IAge=32
End With
执行MsgBox Tea.TName后,消息框的输出结果是______。
[填空题]有如下用户定义类型及操作语句:
Type Teacher
TNo As String
TName AS Strxng
IAge As Integer
End Type
Dim Tea AS Teacher
With Tea
.TNO="20080001"
.TName="张三"
.IAge=32
End With
执行MsgBox Tea.TNaiqle后,消息框的输出结果是______。
[填空题]设有如下记录类型:
Type student
Number As String*10
Name As String*8
End Type
窗体中有若干控件,单击其中的一个按钮Command1时,执行如下事件过程,该过程的功能是把数据输出到指定的文件中。根据题意,请完善下列程序。
Private Sub Command1_click( )
Dim stu As student
Open"C:/file. dat" For Random As #1 Len=Len( 【13】 )
Title $="写记录到随机文件"
Str1 $="请输入学生名"
Str2 $="请输入学生名"
For i=1 To 5
stu. Number=InputBox(Str1 $, Title $)
stu. Name=InputBox$(Str2 $, Title $)
【14】 #1, i, stu
Next i
Close 【15】
End Sub