[单选题]

在窗体上有两个名称分别为Text1、Text2的文本框,一个名称为Command1的命令按钮。运行后的窗体外观如图所示。

设有如下的类型和变量声明:

设文本框中的数据已正确地赋值给Person类型的变量P,当单击“保存”按钮时,能够正确地把变量中的数据写入随机文件Test2.dat中的程序段是(  )。

A.

B.

C.

D.

参考答案与解析:

相关试题

在窗体上有两个分别为Text1和Text2的文本框,一个名为Command1的命令按钮。运行后的窗体外观如下图所示。<br /><img border="0" s

[单选题]在窗体上有两个分别为Text1和Text2的文本框,一个名为Command1的命令按钮。运行后的窗体外观如下图所示。设有如下类型和变量声明:设文本框中

  • 查看答案
  • 在窗体上画两个文本框(名称分别为Text1和Text2)和一个命令按钮(名称为Command1),然后编写如下事件过程:<br /><img border="0"

    [单选题]在窗体上画两个文本框(名称分别为Text1和Text2)和一个命令按钮(名称为Command1),然后编写如下事件过程:程序运行后单击命令按钮,在两个

  • 查看答案
  • 窗体上有两个名称分别为Text1、Text2的文本框,一个名称为Command1

    [单选题]窗体上有两个名称分别为Text1、Text2的文本框,一个名称为Command1的命令按钮。运行后的窗体外观如图所示。设有如下的类型声明当单击“保存”按钮时.将两个文本框中的内容写入一个随机文件Test29.dat中设文本框中的数据已正确地赋值给Person类型的变量p。则能够正确地把数据写入文件的程序段是

  • 查看答案
  • 窗体上有两个名称分别为Text1、Text2的文本框,一个名称为Command1

    [单选题]窗体上有两个名称分别为Text1、Text2的文本框,一个名称为Command1的命令按钮。设有如下的类型声明: Type Person name As String*8 major As String*20 End Type 当单击“Command1”按钮时,能够正确地把数据写入文件的程序段是______。A.Private Sub Command1_Click() Dim p As Person p. name=Text1. Text p. major=Text2. Text Open"C

  • 查看答案
  • 在窗体上有两个名称分别为Text1、Text2的文本框,一个名称为Command

    [单选题]在窗体上有两个名称分别为Text1、Text2的文本框,一个名称为Command1的命令按钮。运行后的窗体外观如图所示。设有如下的类型和变量声明:Private Type Personname As String*8mjot As String+20E.nd TypeD.im P As Person设文本框中的数据已正确地赋值给Person类型的变量P,当单击“保存”按钮时,能够正确地把变量中的数据写入随机文件Test2.dat中的程序段是A.Open“c:\Test2.dat”ForOutpu

  • 查看答案
  • 在窗体上画一个命令按钮Command1和两个文本框,名称分别为Text1和Text2。编写如下两个事件过程:<br /><img border="0" style

    [单选题]在窗体上画一个命令按钮Command1和两个文本框,名称分别为Text1和Text2。编写如下两个事件过程:当在设计阶段的窗体的KeyPreview属

  • 查看答案
  • 在窗体中添加一个命令按钮,名称为Command1,两个文本框名称分别为Text1

    [单选题]在窗体中添加一个命令按钮,名称为Command1,两个文本框名称分别为Text1和.Text2,然后编写如下程序: Private Sub Command1_Click() Dim x As String,y As String, C As String,d As String x = Text1.Text : y = TextText c = LCase(x):d = UCase(y) Print c; d End Sub 程序运行后,在文本框Texn、Text2中分别输入AbC和efG,结果

  • 查看答案
  • 在窗体中添加一个命令按钮,名称为Command1,两个文本框名称分别为Text1

    [单选题]在窗体中添加一个命令按钮,名称为Command1,两个文本框名称分别为Text1、Text2,然后编写如下程序: Private Sub Command1_Click() a=Text1.Text b=Text2.Text c=LCase (A)d=UCase (B)Print c;d End Sub程序运行后,在文本框Text1、Text2中分别输入AbC和Efg,结果是______ 。A.abcEFGB.abcefgC.ABCefgD.ABCEFG

  • 查看答案
  • 在窗体上画两个名称分别为Text1、Text2的文本框和一个名称为Command

    [单选题]在窗体上画两个名称分别为Text1、Text2的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Dim x As Integer,n As Integer x=1 n=0 Do While x<20 x=x*3 n=n+1 Loop Text1.Text=Str(x) Text2.Text=Str(n) End Sub 程序运行后,单击命令按钮,在两个文本框中显示的值分别是 ______。A.15和1B.27和3C.

  • 查看答案
  • 在窗体上画两个名称分别为Text1,Text2的文本框和一个名称为Command

    [单选题]在窗体上画两个名称分别为Text1,Text2的文本框和一个名称为Command1命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Dim x As Integer,n As Integer x=1 n=0 Do While x<20 x=x*3 n=n+1 Loop Text1.Text=str(x) Text2.Text=Str(n) End Sub 程序运行后,单击命令按钮,在两个文本框中显示的值分别是( )。A.15和1B.27和3C.195和3

  • 查看答案