A: A) Type TelBook
B: Name As String*10
C: TelNum As Integer
D: End Type
E: B) Type TelBook
F: Name As String*10
G: TelNum AS Integer
H: End TelBook
I: C) Type TelBook
J: Name String*10
K: TelNum Integer
L: End Type TelBook
M: D) Typedef TelBook
N: NameString*10
O: TelNum Integer
P: EndType
举一反三
- 以下能正确定义数据类型TelBook的代码是：____。 A: Type TelBook<br/>Dim Name As String * 10<br/>Dim TelNum As Integer End Type B: Type TelBook<br/>Name As String * 10<br/>TelNum As Integer End Type C: Type TelBook<br/>Name As String * 10<br/>TelNum As Integer End TelBook D: Type TelBook<br/>Name As String * 10<br/>TelNum As Integer End Type TelBook
- 以下能正确定义数据类型TelBook的代码是： A: Type TelBook Dim Name As String * 10 Dim TelNum As IntegerEnd Type B: Type TelBook Name As String * 10 TelNum As IntegerEnd Type C: Type TelBook Name As String * 10 TelNum As IntegerEnd TelBook D: Type TelBook Name As String * 10 TelNum As IntegerEnd Type TelBook
- 在窗体的通用声明段自定义了数据类型Students，下列____定义方式是正确的。 A: Public Type Students Name As String *10 StudNo As Integer End Type B: Type Students Dim Name As String *10 Dim StudNo As Integer End Students C: Type Students Name String *10 StudNo Integer End Type D: Private Type Students Name As String *10 StudNo As Integer End Type
- 以下自定义数据类型的语句中，正确的是 A: A．Type student ID As String * 20 name As String * 10 age As Integer End student B: B．Type student ID As String * 20 name As String * 10 age As Integer End Type C: C．Type student ID As String name As String age As Integer End student D: C．Type ID As String * 20 name As String * 10 age As Integer End Type student
- 以下能正确定义数据类型TelBook的代码是
内容
- 0
在窗体的通用声明段自定义了数据类型Students,下列_____定义方式是正确的。 A: TypeStudents Name String*10 Studno IntegerEnd Type B: Private Type Students Name AsString*10 Studno AsInteger End Type C: Type Students Name AsString*10 Studno AsIntegerEnd Students D: Type Students Name As String*10 Studno AsIntegerEnd Type
- 1
设有如下的记录类型： Private Type Employee num As String name As String End Type 则下列语句中正确的是________。
- 2
以下程序段中，执行结果与其他3个选项不同的是 A: Dim y As Integer B: y = 11 C: Select Case y D: Case 15 To 5 E: Print "Executed" F: End Select G: Dim y As Integer H: y = 10 I: Select Case y J: Case Is > 10, Is < 10 K: Print " Executed " L: End Select M: Dim y As Integer N: y = 10 O: Select Case y P: Case Is > 15, 1, 5 To 8 Q: Print " Executed " R: End Select S: Dim y As Integer T: y = 10 U: Select Case y V: Case 1, 3, Is > 6 W: Print " Executed " X: End Select
- 3
以下能正确定义数据类型StuInfo的代码是（ ）。 A: Type StuInfo Xm As String*8 Xh As IntegerEnd Type StuInfo B: Type StuInfo Xm As String*8 Xh As IntegerType End C: Type StuInfo Xm As String*8 Xh As IntegerEnd Type D: Type StuInfo Xm String*8 Xh As IntegerEnd StuInfo
- 4
以下有关数组定义的语句序列中，错误的是 ______。 A: Static arrl(3) B: arrl(1)=100 C: arrl(2)="Hello" D: arrl(3)123.45 E: Dim arr2()As Integer F: Dim size As Integer G: Private Sub Command2_click() H: size=InputBox("输入:") I: ReDimarr2(size) J: End Sub K: Option Base1 L: Private Sub Command3_click() M: Dim arr3(3)As Integer N: End Sub O: Dim n As Integer P: Private Sub Command4_Click() Q: Dim arr4(n)As Integer R: End Sub