A.A
B.a
C.C
D.c
[单选题]窗体上有名称分别为Text1、Text2的2个文本框,要求文本框Text1中输入的数据小于500,文本框Text2中输入的数据小于1000,否则重新输入。为了实现上述功能,在以下程序中问号(?)处应填入的内容是。Private Sub Text1_LostFocus()C.all CheckInput(Text1,500)E.nd SubPrivate Sub Text2_LostFocus()C.all CheckInput(Text2,1000)E.nd SubSub CheckInput(
[单选题]( 28 ) 窗体上有名称分别为 Text1 、 Text2 的 2 个文本框 , 要求文本框 Text1 中输入的数据小于 500 , 文本框 Text2 中输入的数据小于 1000 ,否则重新输入。为了实现以上功能,在下列程序中问号( ? )处应填入的内容是( )。Private Sub Text1_LostFocus( )C.all CheckInput(Text1,500)E.nd SubPrivate Sub Text2_LostFocus( )C.all CheckInput(Tex
[单选题]窗体上有名称分别为Text1、Text2的2个文本框,要求文卒框Text1中输入的数据小于500,文本框Text2中输入的数据小于1000,否则重新输入。为了实现上述功能,在以下程序中问号(?)处应填入的内容是______。 Private Sub Text1 LostFocus() Call CheckInput(Text1,500) End Sub Private Sub Text2 LostFocus() Call CheCkInput(Text2,1000) End Sub Sub Ch
[单选题]窗体上有两个名称分别为Text1、Text2的文本框,一个名称为Commandl的命令按钮。 运行后的窗体外观如下图所示。设有如下的类型声明: Type Person name As String*8 major As String*20 End Type 当单击“保存”按钮时,将两个文本框中的内容写入一个随机文件Test290.dat中。设文本框中的数据已正确地赋值给Person类型的变量P。则能够正确地把数据写入文件的程序段是( )。A.Open"c:/Test29.dat"ForRan
[单选题]窗体上有两个名称分别为Text1、Text2的文本框,一个名称为Command1的命令按钮。运行后的窗体外观如图所示。设有如下的类型声明当单击“保存”按钮时.将两个文本框中的内容写入一个随机文件Test29.dat中设文本框中的数据已正确地赋值给Person类型的变量p。则能够正确地把数据写入文件的程序段是
[单选题]窗体上有两个名称分别为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的文本框,一个名称为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
[单选题]窗体上有两个名称分别为Text1、Text2的文本框。Text1的KeyUp事件过程如下:当向文本框Text1中输入小写字母a时,文本框Text2中显
[单选题]( 19 )在窗体上画两个文本框(名称分别为 text1 和 text2 )和一个命令按钮(名称为 command1 ) , 然后编写如下事件过程:Private Sub Command1_Click()x = 0D.o While x < 50x = (x + 2) * (x + 3)n = n + 1Looptext1.Text = Str(n)text2.Text = Str(x)E.nd Sub 程序运行后,单击命令按钮,在两个文本框中显示的值分别为A. ) 1 和 0B. ) 2
[单选题]在窗体上有两个文本框控件,名称分别为Text1和Text2,以下程序实现的功能是希望在文本框Text1中输入字符时,输入的字符也将出现在Text2文本框中。运行时的程序界面如图20-1所示,下划线处应填( )。Private Sub Text1_ _________() TextText=Text1.Text End SubA.SetFocusB.ChangeC.GetFocusD.Click