在窗体上有两个名称分别为Text1、Text2的文本框，一个名称为Command1的命令按钮。运行后的窗体外观如图所示。设有如下的类型和变量声明：Private Type Personname As String*8mjot As String+20End TypeDim P As Person设文本框中的数据已正确地赋值给Person类型的变量P，当单击“保存”按钮时，能够正确地把变量中的数据写入随机文件Test2．dat中的程序段是A．Open“c：＼Test2．dat”ForOutputAs#1 Put#1，1，P Close#1B．Open”c：＼Test2．dat”For Random As#l Get#1，1，P Close#1C．Open“c：＼Test2．dat”For Random As#1 Len=Len(P) Put#1，1，P C10se#1D．Open“c：＼Test2．dat”ForRandomAs#l Len=Len(p) Get#1，1，P C10Se#1
在窗体上有两个名称分别为Text1、Text2的文本框，一个名称为Command1的命令按钮。运行后的窗体外观如图所示。
设有如下的类型和变量声明：
Private Type Person
name As String*8
mjot As String+20
End Type
Dim P As Person
设文本框中的数据已正确地赋值给Person类型的变量P，当单击“保存”按钮时，能够正确地把变量中的数据写入随机文件Test2．dat中的程序段是
A．Open“c：＼Test2．dat”ForOutputAs#1 Put#1，1，P Close#1
B．Open”c：＼Test2．dat”For Random As#l Get#1，1，P Close#1
C．Open“c：＼Test2．dat”For Random As#1 Len=Len(P) Put#1，1，P C10se#1
D．Open“c：＼Test2．dat”ForRandomAs#l Len=Len(p) Get#1，1，P C10Se#1
相关考题：
在窗体上画1个名称为Command1的命令按钮和2个名称分别为Text1、Text2的文本框，如图所示，然后编写如下程序：Function Fun（x As Integer,ByVal y As Integer）As Integerx=x+yIf x0 ThenFun=xElseFun=yEnd IfEnd FunctionPrivate Sub Command1_Click（）Dim a As Integer,b As Integera=-10：b=5Text1.Text=Fun（a，b）Text2.Text=Fun（a，b）End Sub程序运行后，单击命令按钮，Text1和Text2文本框显示的内容分别是______和______。
在窗体中添加一个命令按钮，名称为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
在名为“Form1”的窗体上添加3个文本框和一个命令按钮，其名称分别为“Text1”、“Text2”、“Text3”和“Command1”，然后编写如下两个事件过程：Private Sub Commandl Click()Text3=Text1+Text2End SubPrivate Sub Form1 Load()Text1=" "Text2=" "Text3=" "End Sub打开窗体Form1后，在第一个文本框(Text1)和第二个文本框(Text2)中分别输入5和7，然后单击命令按钮Command1，则文本框(Text3)中显示的内容为【 】。
在窗体上画1个名称为Command1和命令按钮和2个名称分别为Text1、Text2的文本框，如图所示，然后编写如下程序：Function Fun(X As Integer,ByVal y As Integer)As Integerx=x＋yIf X＜0 ThenFun=xElseFun=yEnd IfEnd FunctionPrivate Sub Command1 Click()Dim a As Integer,b As Integera=-10:b=5Text1.Text=Fun(a,B)Text2.Text=Fun(a, B)End Sub程序运行后，单击命令按钮，Text1和Text2文本框显示的内容分别是【 】和【 】。
设有如下通用过程：在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如 下事件过程：End Sub 程序运行后，单击命令按钮，则在文本框中显示的内容是（ ）。A. 30B. 25C. 20D. 15
窗体上有两个名称分别为Text1、Text2的文本框，一个名称为Command1的命令按钮。运行后的窗体外观如图所示。设有如下的类型声明当单击“保存”按钮时．将两个文本框中的内容写入一个随机文件Test29.dat中设文本框中的数据已正确地赋值给Person类型的变量p。则能够正确地把数据写入文件的程序段是
在名称为Form1的窗体上画两个标签（名称分别为Label1和Label2，标题分别为“姓名”和“年龄”）、两个文本框（名称分别为Textl和Text2，初始内容均为空）和一个命令按钮（名称为Command1，标题为“显示”）。然后编写命令按钮的Click事件过程。程序运行后，在两个文本框中分别输人姓名和年龄，然后单击“显示”按钮，则在窗体上显示两个文本框中的内容，如图所示。要求程序中不得使用任何变量。注意：存盘时必须存放在考生文件夹下，工程文件名保存为sjtl．vbp，窗体文件名保存为sjtl．frm。
（1）在名为Form1的窗体上绘制两个标签（名称分别为Label1和Label2，标题分别为“长”和“宽”）、两个文本框（名称分别为Text1和Text2，Text属性均为空白）和一个命令按钮（名称为Command1，标题为“输入”）。编写命令按钮的Click事件过程，使程序运行后，若单击命令按钮，则先后显示两个“输入”对话框，在两个“输入”对话框中分别输入长和宽，并分别在两个文本框中显示出来，运行后的窗体如图21-1所示。注意：程序中不得使用任何变量；文件必须存放在考生文件夹中，工程文件名为sj1．vbp，窗体文件名为sj1．frm。（2）在名为Form1的窗体上绘制一个标签（名称为Label1，标题为“输入”）、一个文本框（名称为Text1，Text属性为空白）和一个命令按钮（名称为Command1，标题为“显示”）。请编写命令按钮的Click事件过程，使程序运行后，在文本框中输入内容，然后单击命令按钮，则标签和文本框消失，并在窗体上显示文本框中的内容。运行后的窗体如图21-2和图21-3所示。注意：要求程序中不得使用任何变量；文件必须存放在考生文件夹中，工程文件名为Sj2．vbp，窗体文件名为sj2．frm。
在窗体中添加一个命令按钮,名称为Command1,两个文本框名称分别为Text 1、Text2,然后编写如下程序:PrivateSubCommand1_Click()a=Text1.textb=Text2.textC=Lcase( )D=Ucase( )PrintC;DEndSub程序运行后,在文本框Text 1、Text2中分别输入AbC和Efg,结果是( ) A、abcEFGB.abcefgC.ABCefgD.ABCEFG
在窗体上有两个名称分别为Text1、Text2的文本框，一个名称为Command1的命令按钮，运行后的窗体外观如图所示：设有如下的类型和变量声明：Private Type Personname As STRING*8major As String*20End TypeDim P As Person设文本框中的数据已正确地赋值给Person类型的变量P，当点击“保存”按钮时，能够正确地把变量中的数据写入随机文件Test2．dat中的程序段是（ ）。A.OpenC：＼Test2．datFor Output As#1Put#1，1，pClose#1B.0penc：＼Test2．datFor Random As#1Get#1，1，PClose#1C.Open”C：＼Test2．dat”For Random As#1 Len—Len(p)Put#1，1，PClose#1D.OpenC：＼Test2．datFor Random As#1 Len=Len(p)Get#1，1，PClose#1