首页/ 题库 / [单选题]假设有如下的记录类型: Type Stu的答案

假设有如下的记录类型: Type Student number As String name AS String age As Integer End Type 则正确引用该记录类型变量的代码是______。

单选题
2022-01-09 20:46
A、Student. name="" s. name="张红"
B、Dim s As Student s. Dame="张红"
C、Dim s As Type Student s. name="张红"
D、Dim s As Type s. name="张红"
查看答案

正确答案
B

试题解析
解析:记录类型变量的定义与基本数据类型变量的定义没有什么区别,但在引用时有所不同。正确的引用方法是:用Type…End Type定义了一个用户定义的数据类型Student,再用Integer定义student类型的变量s,然后就可以用“变量. 元素”的格式引用记录中的各个成员。例如,s. number、s. name、s. age。

标签:
感兴趣题目
设有如下的记录类型: Type Student number As String name As String age As Integer End Type 则正确引用该记录类型变量的代码是______。
假设有如下的记录类型: Type Student number As String name AS String age As Integer End Type 则正确引用该记录类型变量的代码是______。
设有如下的记录类型: TypeStudent number As String name AS String age As Integer End Type 则正确引用该记录类型变量的代码是( )。
有变量定义语句Dim max,min As String,则可以知道max的类型是
用如下语句所定义的数组的元素个数是______个。 Dim b(-2 to 4)as string
设有以下函数过程Private Function Fun(a()As Integer,b As String)As IntegerEhd Function若已有变量声明:Dim x(5)As Integer,n As Integer,ch As String则下面正确的过程凋用语句是
以下语句执行时,从键盘上输入Zhang,执行结果是______。 Dim a As String a=InputBox("Input","","Name") Print a
AS-PATH列表{as-path-filter}配置命令ipas-path-filter as-path-filter-number{deny|permit}regular-expression,可以为同一个as-path-filter-number配置多个子句,请问这多个子句间的匹配原则是()
设在工程文件中有—个标准模块,其中定义了如下记录类型:Type Books Name As String *10 TelNum As String*20End Type在窗体上画—个名为Command1的命令按钮,要求当执行事件过程Command1_Click时,在顺序文件Petson.txt中写入一条Books类型的记录。下列能够完成该操作的事件过程是 ______。
假定在工程文件中有一个标准模块,其中定义了如下记录类型: Type Books Name As String*10 TelNum As String*20 End Type 要求当执行事件过程Command1_Click时,在顺序文件Person. txt中写入一条记录。下列能够完成该操作的事件过程是______。
设有如下声明: Dim X AS Integer 如果Sgn(X)的值为-1,则X的值是( )。
设有如下声明: Dim x As Integer 如果Sgn(x)的值为-1,则x的值是( )。
相关题目
He as well as my sister ______ a student of English.
I, as well as he, __________a student
When a BGP router is not capable of understanding 4-byte AS numbers, it will see 4-byte AS numbers as aspecial, reserved, 2-byte AS number in the AS path. Which 2-byte AS number is this reserved one?()
When a BGP router is not capable of understanding 4-byte AS numbers, it will see 4-byte AS numbers as a special, reserved, 2-byte AS number in the AS path. Which 2-byte AS number is this reserved one?()
在工程中的标准模块中定义了如下数据类型: Type fruit orange As Integer apple As Integer End Type 在窗体上有—命令按钮Command1,要求当单击命令按钮时在C:根目录下的顺序文件myfrtac.txt 中写入一条记录,下列能够完成改操作的事件过程是______ 。
He, as well as I,()a student.
He, as well as I,()a student.
编写如下事件过程和函数过程: Private Sub Command1_Click() Dim num(1 To 6)As Single num(1)=103:num(2)=190:num(3)=0 num(4)=32:num(5)=-56:num(6)=100 Print Print p2(6,num()) End Sub Private Function p2(By Val n As Integer, number() As Single) As Integer p2=number(1) For j=2 To n If number(j)<p2 Then p2=number(j) Next j End Function 程序运行后,在窗体上输出( )。
编写如下事件过程和函数过程: Private Sub Command1_Click() Dim num(1 To 6) As Single num(1)=103: num(2)=190: num(3)=0 hum(4)=32:num(5)=-56: num(6)=100 Print Print p2(6,num()) End Sub Private Function p2(ByVal n As Integer, number() As Single) As Integer p2=number(1) For j=2 To n If number(j)<p2 Then p2=number(j) Next j End Function 程序运行后,在窗体上输出( )。
设有如下变量声明Dimtimel As Date,为变量timel正确赋值的表达式是( )。
设有如下变量声明: Dim TestDate As Date 为变量TestDate正确赋值的表达式是( )。
设有如下变量声明Dim timel As Date,为变量time1正确赋值的表达式是
设有如下变量声明:Dim TestDate As Date,为变量TestDate正确赋值的表达式是( )。
设有如下变量声明语句: Dim a,b As Boolean 则下面叙述中正确的是( )。
设有如下变量声明语句:Dim a,b As Boolean则下面叙述中正确的是
设有如下的用户定义类型: Type Student number As String name As string age As Integer End Type 则以下正确引用该类型成员的代码是______。
设有如下的用户定义类型: Type Student number As String name As Suing age As Integer End Type 则以下正确引用该类型成员的代码是【 】
设有如下通用过程: Public Function Fun(xStr As String)As String Dim tStr As String,strL As Integer strL=Len(xStr) Do While i<=strL/2 tStr=tStr&Mid(xStr,i,1)&Mid(xStr,strL-i+1,1) i=i+1 Loop 在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮。然后编写如下的事件过程: Private Sub Command1_Click() Dim S1 As String Textl.Text=UCase(Fun(S1)) 程序运行后,单击命令按钮,则Textl中显示的是【 】
设有如下的用户定义类型: Type Student number As String name As string age As Integer End Type 则以下正确引用该类型成员的代码是______。
语句Dim s(1 to 5)as String定义的数组是()类型的元素。
广告位招租WX:84302438

免费的网站请分享给朋友吧