
A.form
B.list
C.FORM
D.LIST
[单选题]窗体上有名称分别为Text1、Text2的文本框,名称为Command1的命令按钮。运行程序,在Text1中输入“FormList”,然后单击命令按钮
[单选题]窗体上有名称分别为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(
[单选题]窗体上有名称分别为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
[单选题]在窗体上画—个命令按钮和—个文本框,名称分别为Command1和Text1,然后编写如下程序: Private Sub Command1_Click() a=InputBox("请输入日期(1~31)") t="旅游景点:"&IIf(a>0 And a<=10,"长城","")&_ IIf(a>10 And a<=20,"故宫","")&IIf(a>20 And a<=31,"颐和园","") Text1.Text=t End Sub 程序
[试题]( 9 ) 窗体上有名称为 Command1 的命令按钮及名称为 Text1 、 能显示多行文本的文本框 。 程序运行后 ,如果单击命令按钮,则可打开磁盘文件 c:/test.txt ,并将文件中的内容(多行文本)显示在文本框中。下面是实现此功能的程序,请填空。Private Sub Command1_Click()Text1= ””Number=FreeFileOpen “ c:/test.txt ” For Input As NumberD.o While Not Eof( ( 14 ) )L
[单选题]窗体上有两个名称分别为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
[单选题]( 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
[单选题]( 19 )窗体上有名称为 Command1 的命令按钮和名称为 Text1 的文本框Private Sub Command1_Click()Text1.Text= ” 程序设计 ”Text1.SetFocusE.nd SubPrivate Sub Text1_GotFocus()Text1.Text= ” 等级考试 ”E.nd Sub运行以上程序,单击命令按钮后A. )文本框中显示的是 “ 程序设计 ” ,且焦点在文本框中B. )文本框中显示的是 “ 等级考试 ” ,且焦点在文本框中C. )文
[单选题]在窗体上画两个文本框(名称分别为Text1和Text2)和—个命令按钮(名称为Cotranand1),然后编写如下事件过程:Private Sub Command1_Click() x=0 Do While x<50 x=(x+2)*(x+3) n=n+1 Loop Text1.Text=Str(n) Text2.Text=Str(x)End Sub 程序运行后,单击命令按钮,在两个文本框中显示的值分别为______。A.1和0B.2和72C.3和50D.4和168