下列程序段实现的功能为：在文本框中输入一个整数，然后判断该整数的奇偶性。请完成相应的程序代码。 Private Sub Command1_Click（) Dim x AS Integer x=Val（Right （Text1．Text，2)) If x Mod 2=0 Then Labe11．Caption=“偶数” Else Labe11．Caption=“奇数” End If Text1．Se

在窗体上画一个命令按钮和一个文本框，名称分别为Command1和Text1，然后编写如下程序：程序运行后，如果从键盘上输入16，则在文本框显示的内容是（）。 在窗体上画一个命令按钮和一个文本框，其名称分别为Command1和Text1，再编写如下程序：程序运行后在文本框中输入“Number100”，并单击命令按钮，则文本框中显示的是（） 下列程序段实现的功能为：在文本框中输入一个整数，然后判断该整数的奇偶性。请完成相应的程序代码。 Private Sub Command1_Click（) Dim x AS Integer x=Val（Right （Text1．Text，2)) If x Mod 2=0 Then Labe11．Caption=“偶数” Else Labe11．Caption=“奇数” End If Text1．Se 若设置了文本框的属性Password Char=“$”,则运行程序时向文本框中输入8个任意字符后,文本框中显不的是【 】 在窗体上放一个文本框Text1，在文本框中输入456，并有下列事件过程： Private Sub Form_Click() x=InputBox("请输入一个整数") Print x+Text1.Text End Sub 单击该窗体，在输入对话框中输入123，单击“确定”按钮后，窗体上显示的是( )。 设窗体上有一个文本框，名称为Text1，程序运行后，要求该文本框只能显示信息，不能接收输入信息，以下能实现该操作的语句是 向文本框中输入一个字符，下列事件不会发生。（） 设窗体上有一个文本框，名称为text1，程序运行后，要求该文本框只能显示信息，不能接受输入的信息，以下能实现该操作的语句是()。 在窗体中添加一个文本框时，这个文本框控件还自带一个标签控件。() 下列程序段的功能是：从文本框中输入一个数值，如果该数值满足“除以4余1，除以5余2”条件，则在窗体上输山文本框中的数值，否则，将焦点定位在文本框中，并清除文本框的内容。请填空。 Private Sub Command1_Click（)x=Val（Text1.Text)If______Then Print xElse ______ Text1.Text=""End If End Sub 下列程序段的功能是：从文本框中输入一个数值，如果该数值满足“除以4余1，除以5余2”条件，则在窗体上输出文本框中的数值，否则，将焦点定位在文本框中，并清除文本框的内容。请填空。Private Sub Commandl_Click（) x=Val（Textl.Text) If______Then Print x Else _______ Textl.Text="" End IfEnd Sub 在窗体上画一个名称为Text1的文本框，然后画一个名称为HScroll1的滚动条，其Min和Max属性分别为0和100，程序运行后，如果移动滚动框，则在文本框中显示滚动条的当前值。以下能实现上述操作的程序段是 ( ). 如果想在窗体上添加一个计算型文本框，可以使用“窗体设计工具”添加一个文本框控件，然后在“属性表”的控件来源属性中输入计算公式,以上说法是否正确？ 指定在一个文本框中如何输入和显示数据的属性是（ ）。 在学生统计报表中，添加一个统计学生人数的文本框控件，在文本框中输入的表达式是（） 下列程序段的功能是：从文本框中输入一个数值，如果该数值满足“除以4余1，除以5余2”条件，则在窗体上输f“文本框中的数值，否则，将焦点定位在文本框中，并清除文本框的内容。请填空。 Private Sub Command1_Click（) x=1Val（Text1. Text) If______Then Print x Else ______ Text1.Text="" End If End Sub 在窗体上画一个文本框，然后编写如下事件过程： 在名称为Form1的窗体上添加一个文本框，其名称为Text1，然后通过属性窗口设置窗体和文本框的属性，实现如下功能： ①在文本框中，MultiLine属性设置为True。 ②ScrollBars属性设置为2； ③文本框中显示的初始文本为“程序设计”； ④文本框中显示的字体为三号规则黑体； ⑤窗体的标题为“设置文本框属性”。 完成设置后的窗体如图所示。 要求：不编写任何代码。 注意：存盘时必须存放在 在窗体上画两个文本框，然后编写程序。程序运行后，如果在第一个文本框中输入A和B、 C、D或a、b、c、d，则在第二个文本框中显示EFDH。请完善下列程序。 Private Sub Form_Load（)ShowText1．Text=" "Text2．Text=" "Text1．SetFocus End Sub Private Sub Text1_KeyDown（KeyCode As Integer 在窗体上画两个文本框，然后编写程序。程序运行后，如果在第一个文本框中输入A和B、C、D或a、b、c、d，则在第二个文本框中显示EFDH。请完善下列程序。 Private Sub Form_Load（) Show Text1.Text="" Text2.Text="" Text1.SetFocus End Sub Private Sub Text1_KeyDown（KeyCode As Integ