有一个窗体Form1，其中有一个文本编辑框Text1和一个命令按钮Command1。运行窗体后在文本编辑框中输入一串字符，单击命令按钮后该窗体的标题改变为文本编辑框中输入的字符串。则宏命令SetValue的参数设置是( )。

相似题目

• 在表单FORM1中有一个文本框TEXT1，TEXT1的INIT事件代码如下：THIS.VALUE=0TEXT1的VALID事件代码如下：S=0FORi=1TOTHIS.VALUEIFi%5=0S=S+iENDIFENDFORTHIS.VALUE=S在TEXT1中输入22，然后按回车键，TEXT1中将显示（）。

  A . 0 B . 22 C . 50 D . 100

  查看最佳答案

• 在表单FORM1中有一个编辑框EDIT1，一个文本框TEXT1和一个命令按钮COMMAND1，现要使文本框显示编辑框中被选定的内容，应在COMMAND1的CLICK事件中编写的代码是（）。

  查看最佳答案

• 在表单Form1中有一个文本框text1，text1的InteractiveChange事件代码如下：CHAR1=ALLTRIM（THIS.VALUE）ASC1=ASC（CHAR1）+32THIS.VALUE=CHR（ASC1）该表单运行后，在文本框中输入一个大写ASCII码“T”，则文本框中显示内容将是（）。

  A . T+32 B . T32 C . t D . 97

  查看最佳答案

• 设窗体上有一个文本框Text1，程序代码中有以下赋值语句（假定用到的控件和变量都存在），其中错误的是________。

  查看最佳答案

• 设窗体中有一个文本框Text1，若在程序中执行了Text1.SetFocus，则触发 。

  查看最佳答案

• 设窗体中有一个文本框Text1，若在程序中执行了Text1.SetFocus，则触发 。

  查看最佳答案

• 窗体上有文本框Text1和一个菜单，菜单标题、名称见表，结构见图。要求程序执行时单击“保存”菜单项，则把其标题显示在Text1文本框中。下面可实现此功能的事件过程是（）。

  <img src='https://img2.soutiyun.com/ask/uploadfile/4317001-4320000/63c20c661602bfec53b19f6c83268fac.jpg' /> A.Private Sub save Click（） Text1．Text=file．save．Caption End Sub B.Private Sub save Click（） Text1．Text=save．Caption End Sub C.Private Sub file Click（） Text1．Text=file．save．Caption End Sub D.Private Sub file Click（） Text1．Text=save．Caption End Sub

  查看最佳答案

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

  <img src='https://img2.soutiyun.com/shangxueba/ask/4359001-4362000/4359886/ct_ctvbbm_choose_05019(20092).jpg' /> 设有如下的类型声明 TyPe Person name AS String*8 major AS String*20 End TyPe 当单击“保存”按钮时，将两个文本框中的内容写入一个随机文件Test29 .dat中。设文本框中的数据已正确地赋值给Person类型的变量P.则能够正确地把数据写入文件的程序段是 A．Open"c：\Test29.dat"For Random As1 Put1，1，p C10se 1 B．OpeH"c：\Test29.dat"For Random As 1 Get1，1，p C108C1 C．Open"c：\Test29.dat"For Random As1 Len=Len(p) Put1，1，p C108C1 D．OPell"c：\Test29.dat"For，Random As1 Len=Len(p) Get1，1，p C106e1

  查看最佳答案

• 下图窗体上有三个文本框Text1、Text2和Text3以及一个按钮Command1。为完成已知圆直径求圆周长和圆面积的功能，程序如下：

  <img src='https://img2.soutiyun.com/shangxueba/ask/11175001-11178000/11176558/ct_cstvbm_ctvbbblank_00048(200912).jpg' /> 程序填空处应是______。

  查看最佳答案

• 设窗体上有一个文本框，Text1,要求只能显示信息，不能输入

  A．Text1.MaxLength = 0 B．Text1.Enabled = False C．Text1.Visible = False D．Text1.Width = 0

  查看最佳答案

• 窗体中有一个命令按钮Command1和一个文本框Text1。其中Command1的Click事件过程如下。 Private Sub Command1窗体中有一个命令按钮Command1和一个文本框Text1。其中Command1的Click事件过程如下。 Private Sub Command1_Click（）

  A．5 B．8 C．9 D．10

  查看最佳答案

• 窗体上有一个名称为Text1的文本框和一个名称为Command1的命令按钮，要求程序运行时，单击命令按钮（

  窗体上有一个名称为Text1的文本框和一个名称为Command1的命令按钮，要求程序运行时，单击命令按钮(如图1所示)，就可以把文本框中的内容写到文件Out．txt中，每次写 入的内容附加到文件原有内容之后。以下能正确实现上述功能的程序是（）。<img src='https://img2.soutiyun.com/ask/uploadfile/2340001-2343000/9ee39e48e3711140203a592ce77b107b.jpg' /><img src='https://img2.soutiyun.com/ask/uploadfile/2340001-2343000/54c76f430783fad60b8a548d0f7a9765.jpg' />

  查看最佳答案

• （26 ） 在下图所示的窗体上 ， 有一个标有 “ 显示 ” 字样的命令按钮 （名称为 Command1 ） 和一个文本框 （名称为 text1 ） 。当单击命令按钮时，将变量 sum 的值显示在文本框内，正确的代码是（） 。

  <img src='https://img2.soutiyun.com/ask/uploadfile/4884001-4887000/bf8d65c222511bcbd6a987853bf72602.gif' /> A ） Me!Text1.Caption=sum B ） Me!Text1.Valuc=sum C ） Me!Text1.Text=sum D ） Me!Text1.Visiblc=sum

  查看最佳答案

• 在名为Form1的窗体上绘制一个文本框（名称为Text1)和一个水平滚动条（名称为 HSl)。在属性窗口中对

  在名为Form1的窗体上绘制一个文本框(名称为Text1)和一个水平滚动条(名称为 HSl)。在属性窗口中对滚动条设置如下属性： Min 500 Max 2000 LargeChange 50 SmallChange 20 编写适当的事件过程，使程序运行后，若移动滚动条上的滚动框，则可扩大或缩小文本框的高度，并使得文本框的宽度始终是其高度的1.2倍。运行后的窗体如下图所示。 <img src='https://img2.soutiyun.com/shangxueba/ask/11181001-11184000/11182470/ct_ctvbjj_ctvbjbasicope_00061(20096).jpg' /> 注意： 要求程序中不得使用任何变量；文件必须存放在考生文件夹中，工程文件名为execise58.vbp，窗体文件名为execise58.frm。

  查看最佳答案

• 在考生文件夹下有一个工程文件execise3.vbp及窗体文件execise3.frm。在名称为Form1的窗体上已有3个文本框Text1、Text2和Text3，以及程序。请完成以下工作：

  (1)在属性窗口中修改Text3的适当属性，使其在运行时不显示，窗体如下图所示。 <img src='https://img2.soutiyun.com/shangxueba/ask/11181001-11184000/11182683/ct_ctvbjj_ctvbjcompapp_00297(20096).jpg' /> (3)窗体文件中始出了所有事件过程，但不完整，请去掉程序中的注释符“'”，把程序中的问号“？”改为正确的内容，以便实现以下功能：当光标所在的文本框中无内容时，“剪切”和“复制”菜单项不可用，否则可以把该文本框中的内容剪切或复制到Text3中；若Text3中无内容，则“粘贴”菜单项不能用，否则可以把Text3中的内容粘贴在光标所在的文本框中的内容之后。 注意： 不能修改程序中的其他部分。各菜单项的标题名称必须正确。存盘时，工程文件名为 execise3.vbp，窗体文件名为execise3.frm。

  查看最佳答案

• 在名称为Form1的窗体上绘制一个文本框，其名称为Text1，在属性窗口中把该文本框的MultiLine属性设置为True，然后编写如下的事件过程：

  Private Sub Form. Click() Open "d：\test\smtext1.txt" For Input As 1 Do While Not Line Input 1，aspects whole$=whole$+aspect$+Chr$(13)+Chr$(10) Loop Text1.Text=whole$ Close 1 Open "d：\test\smtext2.txt" For Output As 1 Print 1, ______ Close 1 End Sub 上述程序的功能是，把磁盘文件smtext1.txt的内容读到内存并在文本框中显示出来，然后把该文本框中的内容存入磁盘文件smtext2.txt。

  查看最佳答案

• 设工程中有2个窗体：Form1、Form2、Form1为启动窗体。Form2中有菜单，其结构如表。要求在程序运行时，在Form1的文本框Text1中输人口令并按回车键(回车键的

  ASCII码为13)后，隐藏Form1，显示Form2。若口令为“Teacher”，所有菜单项都可见；否则看不到“成绩录入”菜单项。为此．某人在Form1窗体文件中编写如下程序： Private Sub Text 1 KeyPress(KeyAscii As Integer) If KeyAscii=13 Then If Text1．Text=&quot;Teacher&quot;Then Form2．input．Visible=True Else Form2．input．Visible False End If End If Forml．Hide Form2．Show End Sub 菜单结构 标题 名称 级别 成绩管理 mark 1 成绩查询 query 2 成绩录入 mput 3 程序运行时发现刚输入口令时就隐藏了Form1，显示了Form2，程序需要修改。下面修改方案中正确的是（）。 A.把Form1中Text1文本框及相关程序放到Form2窗体中 B.把Form1．Hide、Form2．Show两行移动2个End If之间 C.把If KeyAscii=13 Then改为If KeyAseii=&quot;Teacher&quot;Then D.把2个Form2 input．Visible中的“Form2．”删去

  查看最佳答案

• 在窗体（Name属性为Form1)上画两个文本框（其Name属性分别为Text1和Text2)和一个命令按钮（Name属性

  在窗体(Name属性为Form1)上画两个文本框(其Name属性分别为Text1和Text2)和一个命令按钮(Name属性为Command1)，然后编写如下两个事件过程： Private Sub Command1_Click() A=Text1.Text+TextText Print a End Sub Private SUb Form胃Load() Text1.Text= " " TextText=" " End Sub程序运行后，在第一个文本框(Text1)和第二个文本框(Text2)中分别输入33和44，然后单击命令按钮，则输出结果为 A．77 B．33+44 C．3344 D．4433

  查看最佳答案

• （6 ）工程中有 Form1 、 Form2 两个窗体。 Form1 窗体外观如图 1 所示。程序运行时，在 Form1 中名称为 Text1 的文本框中输入一个数值 （圆的半径 ） ， 然后单击命令按钮 “ 计算并显示 ” （其名称为Command1 ） ，则显示 Form2 窗体，且根据输入的圆的半径计算圆的面积，并在 Form2 的窗体上显示出来，如图 2 所示 。如果单击命令按钮时，文本框中输入的不是数值，则用信息框显示 “ 请输入数值数据！ ” 请填空。

  <img src='https://img2.soutiyun.com/ask/uploadfile/10839001-10842000/7c4eb92b855187d3640f75c558488d4a.gif' /> Private Sub Command1_Click() If Text1.Text= ”” Then MsgBox “ 请输入半径！ ” Else If Not IsNumeric(【 6 】 ) Then MsgBox “ 请输入数值数据！ ” Else r=val(【 7 】 ) Form2.show 【 8 】 .Print “ 圆的面积是 ” &amp;3.14*r*r End If End Sub

  查看最佳答案

• 在窗体上有一个文本框，其名称为Text1，编写下列事件过程：Private（）

  A．aaa B．AAA C．AA D．aa

  查看最佳答案

• 窗体上有一个名称为Command1的命令按钮，一个名称为Text1的文本框。编写如下程序：对于上述程序，以下叙述中错误的是（）

  A．语句fun=n有错，因为n是整型，fun没有定义类型 B．运行程序，输入值为5时，文本框中显示655 C．运行程序，输入值为6时，文本框中显示42 D．ByRef表示参数按址传递

  查看最佳答案

• 在窗体中有一个文本框Text1，编写事件代码如下：PrivatesubForm_Click（）X=val（Inputbox（&quot;输入x的值&quot;））Y=1IfX＜＞0ThenY=2Text1.Value=YEndSub打开窗体运行后，在输入框中输入整数12，文本框Text1中输出的结果是（）

  A．1 B．2 C．3 D．4

  查看最佳答案

• 在名称为Form1的窗体上画一个文本框，名称为Text1，其宽度为1000；再画一个滚动条，名称为HS1。其刻度值的范围是1000&mdash;2000。请编写滚动条的Change事件过程，程序运行后，如果移动滚动框，则可按照滚动条的刻度值改变文木框的宽度。运行时的窗体如下图所示。程序中不能使用任何变量，事件过程只能写一条语句。*注意：存盘时必须存放在考生文件夹下，工程文件名为sjt12.vbp，

  查看最佳答案

• 设在窗体Form1上有一个列表框List1，其中有若干个项目。要求单击列表框中的某一项时，把该项显示在窗体上，正确的事件过程是（)

  A．Private Sub List1_Click() Print List1.Text End Sub B．Private Sub Form1_Click() Print List1.Text End Sub C．Private Sub List1_Click() Print Form1.Text End Sub D．Private Sub Form1_Click() List1.Print List1.Text End Sub

  查看最佳答案