以下程序段的功能是：从文本框中输入一个数值，如果该数值满足“除以4余1，除以5余2”的条件，则在窗体上输出文本框中的数值，否则，将焦点定位在文本框中，并清除 文本框的内容，在横线处应填写（ ）。A. x％4=1 And x％5=2B. x％4=1 Or x％5=2C. x Mod 4=1 And x Mod 5=2D. x Mod 4=1 Orx Mod 5=2

题目

以下程序段的功能是：从文本框中输入一个数值，如果该数值满足“除以4余1，除以5余2”的条件，则在窗体上输出文本框中的数值，否则，将焦点定位在文本框中，并清除 文本框的内容，在横线处应填写（ ）。

A. x％4=1 And x％5=2

B. x％4=1 Or x％5=2

C. x Mod 4=1 And x Mod 5=2

D. x Mod 4=1 Orx Mod 5=2

相似考题

1.在有下面一个程序段从文本框中输入数据，如果该数据满足条件，除以6余2，除以5余3，则输出，否则，将焦点定位在文本框中，并清除文本框的内容。Private Sub Command1_Click（）num=Val（Text1.Text）If 【8】 ThenPrint numElseText1.Text=""【9】End IfEnd Sub

2.有下面一个程序段，从文本框中输人数据，如果该数据满足条件“除以4余1，除以5余 2”，则输出，否则，将焦点定位在文本框中，并清除文本框的内容。Private Sub Commandl_Click()x=Val(Text1.Text)If [9] ThenPrintXElseText1.Text=""[10]End IfEnd Sub

3.（7）下列程序段的功能是：从文本框中输入一个数值，如果该数值满足“除以4余1，除以5余2”条件，则在窗体上输出文本框中的数值，否则，将焦点定位在文本框中，并清除文本框的内容。请填空。 Private Sub Command1_Click() x=Val(Text1.Text) IfThen Print x Else ________ Text1.Text="" End If End Sub

4.有下面一个程序段，从文本框中输入数据，如果该数据满足条件，除以4余1，除以5余2，则输出，否则，将焦点定位在文本框中，并清除文本框的内容。Private Sub Command1_Click（）x=Val（Text1.Text）If 【6】 ThenPrint xElseText1.Text=""【7】End IfEnd Sub

更多“ 以下程序段的功能是：从文本框中输入一个数值，如果该数值满足“除以4余1，除以5余2”的条件，则在窗体上输出文本框中的数值，否则，将焦点定位在文本框中，并清除 文本框的内容，在横线处应填写（ ）。A. x％4=1 ”相关问题

  • 第1题：

    设有如右图所示的窗体和下列程序：

    Private Sub Command1_Click() Text1.Text="Visual Basic" End Sub Private Sub Text1_LostFocus() If Text1.Text＜＞"BASIC" Then Text1.Text=" " Text1.SetFocus End If End Sub程序运行时，在Text1文本框中输入“Basic”(如图所示)，然后单击Command1按钮，则产生的结果是( )。

    A．文本框中无内容，焦点在文本框中

    B．文本框中为"Basic"，焦点在文本框中

    C．文本框中为"Basic"，焦点在按钮上

    D．文本框中为"Visual Basic"，焦点在按钮上


    正确答案：A
    解析：本题考查的考点是有关事件执行过程的。由于先在文本框中输入数据，所以焦点在文本框中。当单击命令按钮时，首先应该执行文本框的LostFocus事件。本题中由于在文本框的LostFocus事件中执行到了Text1.Setfocus，所以焦点不能离开文本框，也就不执行命令按钮的Click事件。

  • 第2题：

    下列程序执行后,按住键,并在文本框中输入“a”,则在窗体上输出结果为()。Private Sub Text1_K

    下列程序执行后，按住＜Ctrl＞键，并在文本框中输入“a”，则在窗体上输出结果为( )。 Private Sub Text1_KeyDown(KeyCode As Integer，Shift As Integer) Print KeyCode，Shift End Sub

    A．a 2

    B．65 2

    C．97 1

    D．97 2


    正确答案：B
    解析：文本框的KeyDown事件有两个参数：KeyCode和Shift。KeyCode参数返回用户所操作的那个键的扫描代码，它告诉事件过程用户所操作的物理键，“a”的扫描码为65。Shift参数用来描述用户按下了Shift＞、Ctrl＞与Alt＞键中的一个或多个，当用户按下Shift＞键时，Shift参数的位0将变成1，当用户按下Ctrl＞键时，Shift参数的位1将变成1，当用户按下Alt＞键时，Shift参数的位2将变成1，因此当按下Ctrl＞键时，Shift参数的值为2。

  • 第3题：

    10、如何改变参数“模糊X”和“模糊Y”？（）

    A．可以通过直接在数值上拖拽鼠标进行调整

    B．可以单击数值在文本框中输入数值进行调整

    C．可以通过直接在数值上拖拽鼠标或单击数值在文本框中输入数值来进行调整

    D．无法改变


    可以通过直接在数值上拖拽鼠标或单击数值在文本框中输入数值来进行调整

  • 第4题：

    有一个VBA计算程序的功能如下：该程序用户界面由3个文本框和3个按钮组成，3个文本框的名称分别为Text1、Text2和Text3，3个按钮分别为清除(名为Command1) 、计算(名为 Command2) 和退出(名为Command3) 。窗体打开运行后，单击清除按钮，则清除所有文本框中显示的内容；单击计算按钮，则计算在Text1和Text2两个文本框中输入的数值的和并将结果存放在Text3文本框中；单击退出按钮则退出。请将下列程序填空补充完整。

    Private Sub Command1_Click(


    正确答案：
    解析： 由题目可知，Text3中存放的是两个文本框数值的和，所以第1空应该填gal(Me!Text1)；If…Else…End If语句中，缺少结束语句，所以第2空应该填End If；Command3的功能是退出，而退出有两种，一种是退出窗体，一种是退出Access，如果是退出窗体，则使用Close方法，如果是退出Access，则使用Quit方法。

  • 第5题：

    以下程序段的功能是：从文本框中输入一个数值，如果该数值满足“除以4余1，除以5余2”条件，则在窗体上输出文本框中的数值，否则，将焦点定位在文本框中，并清除文本框的内容。请填空。


    正确答案：
    XMod4=1AndXMod5=2Text1.SetFocus【解析】题目要求程序满足的条件是“除以4余1，除以5余2”，这个条件中包含了一个逻辑并和两个求模运算。其中，逻辑并运算符用“And”表示，取余运算符用Mod表示，因此。程序中的“条件应是“XMod4=1AndXMod5=2”：SetFocus方法是将焦点移至指定的控件或窗体。

相关内容