单项选择题

有如下程序： 　　Private Type stu 　　 X As String 　　 Y As Integer 　　End Type 　　Private Sub Command1 Click() 　　 Dim a As stu 　　 a．X="ABCD" 　　 a．Y=12345 　　 Print a 　　End Sub 　　程序运行时出现错误，错误的原因是( )。

A．Type定义语句没有放在标准模块中
B．变量声明语句有错
C．赋值语句不对
D．输出语句Print不对
<上一题 目录 下一题>
热门 试题

单项选择题
在窗体上画两个名称分别为Text1、Text2的文本框，一个名称为Label1标签，窗体 外观如图a所示，要求当改变任一个文本框的内容，就会将该文本框的内容显示在标签中，如图b所示。实现上述功能的程序如下：Private Sub Text1_Change() Call ShowText(Text1) End Sub Private Sub Text2_Change() Call ShowText(Text2) End Sub Private Sub ShowText(T As TextBox) Labell．Caption= 文本框中的内容是： ＆T．Text End Sub 关于上述程序，以下叙述中错误的是( )。
A．ShowText过程的参数类型可以是Control
B．ShowText过程的参数类型可以是Variant
C．两个过程调用语句有错，应分别改为Call ShowText(Text1，Text)、Call Show Text (Text2，Text)
D．ShowText过程中的T是控件变量
单项选择题
设有打开义件的语句如下： Open test_dat For Random As#1 要求把变量a中的数据保存到该文件中，应该使用的语句是( )。
A．Input#1 a
B．Write#1 a
C．Put#1，a
D．Get#1，a
相关试题