网友您好， 请在下方输入框内输入要搜索的题目：
题目内容
（请给出正确答案）
以下程序的功能是：将文本框Text1中的文本，逆序在Text2中输出。 
参考答案
参考解析
略
更多 “以下程序的功能是：将文本框Text1中的文本，逆序在Text2中输出。 ” 相关考题
考题
在窗体中有两个文本框分别为 text1 和 text2 ，一个命令按钮 command1, 编写如下两个事件过程：Private sub command1_click()A=text1.value+text2.valueMsgbox aEnd subPrivate sub form_load()Text1.value= ””Text2.value= ””End sub程序运行时，在文本框 text1 中 78 ，在文本框 text2 中输入 87 ，单击命令按钮，消息框中输出的结果为____ 11 ___
考题
窗体上有名称分别为Text1、Text2的2个文本框，要求文本框Text1中输入的数据小于500，文本框Text2中输入的数据小于1000，否则重新输入。为了实现上述功能，在以下程序中问号（?）处应填入的内容是。Private Sub Text1_LostFocus（）Call CheckInput（Text1，500）End SubPrivate Sub Text2_LostFocus（）Call CheckInput（Text2，1000）End SubSub CheckInput（t As ?，x As Integer）If Val（t.Text）x ThenMsgBox"请重新输入!"End IfEnd SubA．TextB．SelTextC．ControlD．Form
考题
（ 28 ） 窗体上有名称分别为 Text1 、 Text2 的 2 个文本框 ， 要求文本框 Text1 中输入的数据小于 500 ， 文本框 Text2 中输入的数据小于 1000 ，否则重新输入。为了实现以上功能，在下列程序中问号（ ? ）处应填入的内容是（ ）。Private Sub Text1_LostFocus( )Call CheckInput(Text1,500)End SubPrivate Sub Text2_LostFocus( )Call CheckInput(Text2,1000)End SubSub CheckInput(t As ?,x As Integer)If Val(t.Text)x ThenMsgBox" 请重新输入 !"End IfEnd SubA ） TextB ） SelTextC ） ControlD ） Form
考题
在窗体上画一个文本框(其Name属性为Text1)，然后编写如下事件过程：Private Sub Form_Load()Text1.Text=""Text1.SetFocusFor i=1 To 9Sum=Sum=iNext iText1.Text=SumEnd Sub上述程序的运行结果是A．在文本框Text1中输出45B．在文本框Text1中输出0C． 出错D． 在文本框Text1中输出不定值
考题
窗体上有名称分别为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 CheckInput(t AS ?,x As Integer) If Val(t.Text)＞X Then MsgBox "请重新输入!" End If End SubA．TextB．SelTextC．ControlD．Form
考题
在窗体上画一个文本框(其中Name属性为Text1)，然后编写如下事件过程： Private Sub Form_ Load() Text1.Text=“” Text1.SetFocus For i=1 To 10 Sum=Sam+ i Next i Text1.Text=Sam End Sub上述程序的运行结果是______ 。A．在文本框Text1中输出55B．在文本框Text1中输出0C．出错D．在文本框Text1中输出不定值
考题
在窗体上一个文本框，其名称为Text1,然后编写如下事件过程：PrivateSubText2_KeyPress(KeyAsciiAsInteger)DimstrAsString,nAsIntegerstr=Ucase(Chr(KeyAscii))n=Len(str)Text1=String(n,str)EndSub程序运行后，如果在TEXT2中通过键盘上输入单字母k，则在文本框Text1中显示的内容为( )A.kB.KC.KKD.Kk
考题
在n个运动员中选出任意r个人参加比赛，有很多种不同的选法，选法的个数可以用公式 计算。下图窗体中3个文本框的名称依次是Text1、Text2、Text3。程序运行时在Text1、Text2中分别输入n和r的值，单击Command1按钮即可求出选法的个数，并显示在Text3文本框中（见下图）。请填空。Private Sub Command1_Click（ ）Dim r As Integer, n As Integern = Text1r = Text2Text3 = fun（n） / fun（______） / fun（r）End SubFunction fun（n As Integer） as longDim t As Long ______For k = 1 To nt = t * kNextfun = tEnd Function
考题
以下是一个比赛评分程序。在窗体上建立一个名为Text1的文本框数组，然后画一个名为Text2的文本框和名为Command1的命令按钮。运行时在文本框数组中输入7个分数，单击“计算得分”命令按钮，则最后得分显示在Text2文本框中（去掉一个最高分和一个最低分后的平均分即为最后得分），如图所示。请填空。Private Sub Command1_Click（ ）Dim k As IntegerDim sum As Single, max As Single, min As Singlesum = Text1（0）max = Text1（0）min = ______For k = ______ To 6If max Text1（k） Thenmax = Text1（k）End IfIf min Text1（k） Thenmin = Text1（k）End Ifsum = sum + Text1（k）Next kText2 = （______） / 5
考题
在窗体上画两个文本框，其名称分别为Text1和Text2，然后编写如下程序：Private Sub Form_Load（）ShowText1.Text = ""Text2.Text = ""Text1.SetFocusEnd SubPrivate Sub Text1_Change（）Text2.Text = Mid（Text1.Text, 8）End Sub程序运行后，如果在文本框Text1中输入BeijingChina，则在文本框Text2中显示的内容是（ ）。A．BeijingChinaB．ChinaC．BeijingD．BeijingC
考题
在窗体上画两个名称分别为Text1、Text2的文本框。Text 1的Text的属性为“DataBase”，如图所示。 现有如下事件过程 Private Sub Text1_Change（ ） Text 2．Text=Mid(Text1，1，5) End Sub 运行程序，在文本框Text1中原有字符之前输入a，Text2中显示的是（ ）。A.DataAB.DataBC.aDataD.aBase
考题
在n个运动员中选出任意r个人参加比赛，有很多种不同的选法，选法的个数可以用公式计算，在窗体上设计3个文本框，Text1、Text2、Text3。程序运行时在Text1、Text2中分别输入n和r的值，单击Command1按钮即可求出选法的个数，并显示在Text3文本框中，请填空。Private Sub Command1_Click()Dim r As Integer,n As IntegerEnd SubDim t As Long( )For k=1 To nNext kfun=tEnd Function
考题
在n个运动员中选出任意r个人参加比赛，有很多种不同的选法，选法的个数可以用公式 n!计算。下图窗体中3个文本框的名称依次是Text1、Text2、Text3。程序运行时在 (n-r)!r!Text1、Text2中分别输入n和r的值，单击Commandl按钮即可求出选法的个数，并显示在Text3文本框中。请填空。Private Sub Commandl_Click()Dim r As Integer，n As htegern=Text1r=Text
考题
窗体上有两个名称分别为Text1、Text2的文本框。Text1的KeyUp事件过程如下： Private Sub Text1_KeyUp(KeyCode As Integer, Shift As Integer) Dim c As String c=UCase(Chr(KeyCode)) Text2.Text=Chr(Asc(C+2) ) End Sub 当向文本框Text1中输入小写字母a时，文本框Text2中显示的是( )。A．AB．aC．CD．c
考题
在窗体上画一个文本框(其NAME属性为TExT1)，然后编写如下事件过程： PRIVATE SUB FORM_LOAD( ) DIM SUM TEXT1="" FOR I=1 TO 10 SUM=SUM+I NEXT I TEXT1=SUM END SUB上述程序的运行结果是( )。A．在文本框TEXT1中输出55B．在文本框TEXT1中输出0C．出错D．在文本框TEXT1中输出不定值
考题
在n个运动员中选出任意r个人参加比赛，有很多种不同的选法，选法的个数可以用公式(作图)计算，在窗体上设计3个文本框，名称依次是Text1、Text2、Text3。程序运行时在Text1、Text2中分别输入n和r的值，单击Command1按钮即可求出选法的个数，并显示在Text3文本框中，请在空白处填入适当语句使程序完整。Private Sub Command1_Click()Dim r As Integer，n As Integern=Text1r=Text2Text3=fun(n)/(______)/fun(r)End SubFunction fun(n As Integer)As longDim t As Long______For k=1 To nt=t*kNext kfun=tEnd Function
考题
窗体上有一个文本框，其Name属性为Text1，如图1所示，并有如下事件过程：上述程序的运行结果是（ ）。A. 在文本框Text1中输出55B. 在文本框Text1中输出0C. 语法错误D. 在文本框Text1中输出不定值
考题
在窗体上画两个名称分别为Text1、Text2的文本框，一个名称为Label1标签，窗体外观如图a所示，要求当改变任一个文本框的内容，就会将该文本框的内容显示在标签中，如图b所示。实现上述功能的程序如下：Private Sub Text1_Change（ ）Call ShowText(Text1)End SubPrivate Sub Text2_Change（ ）Call ShowText(Text2)End SubPrivate Sub ShowText(T As TextBox)Labell．Caption=文本框中的内容是：＆T．TextEnd Sub关于上述程序，以下叙述中错误的是（ ）。A.ShowText过程的参数类型可以是ControlB.ShowText过程的参数类型可以是VariantC.两个过程调用语句有错，应分别改为Call ShowText(Text1，Text)、Call Show Text (Text2，Text)D.ShowText过程中的T是控件变量
考题
在窗体上有两个文本框控件，名称分别为Text1和Text2，以下程序实现的功能是希望在文本框Text1中输入字符时，输入的字符也将出现在Text2文本框中。运行时的程序界面如图20-1所示，下划线处应填( )。Private Sub Text1_ _________() TextText=Text1.Text End SubA．SetFocusB．ChangeC．GetFocusD．Click
考题
在n个运动员中选出任意r个人参加比赛,有很多种不同的选法,选法的个数可以用公式n!/(n-r)!r!计算,下图窗体中3个文本框的名称依次是Text1、Text2、Text3。程序运行时在Text1、Text2中分别输入n和r的值,单击Command1按钮即可求出选法的个数,并显示在Text3文本框中(见下图)。请填空。click()Private Sub Command 1Dim r As Integer,n As Integern=Text1r=Text2Text3=fun(n)/ fun(【 】)/ fun(r)End SubFunction fun(n As Integer)as longDim t As Longx=1For k=1 To nt=t*kNextfun=tEnd Function
考题
在窗体上画两个文本框，其名称分别为Text1和Text2，然后编写如下程序： Private Sub Form_Load0 Show Text1.Text="" Text2.Text="" Text1.SetFocus End Sub Private Sub Text1 Change() Text2.Text=Mid(Text1.Text,8) End Sub 程序运行后，如果在文本框Text1中输入BeijingChina，则在文本框Text2中显示的内容是( )。A．BeijingChinaB．ChinaC．BeijingD．BeijingC
考题
在窗体中添加两个文本框(其Name属性分别为Text1和Text2)和一个命令按钮(其Name属性为Command1)，然后编写如下程序：PrivateSubCommand1_Click()X=0DoWhileXX=(X+1)*(X+2)n=n+1LoopText1.Text=Str(n)Text2.Text=Str(X)EndSub程序运行后，单击命令按钮，在两个文本框Text1和Text2中分别显示的值是( )A、1和0B.2和12C.2和72D.3和12
考题
在n个运动员中选出任意r个人参加比赛，有很多种不同的选法，选法的个数可以用公式计算，图的窗体中3个文本框的名称依次是Text1、Text2、Text3。程序运行时，在Text1、Text2中分别输入n和r的值，单击Command1按钮即可求出选法的个数，并显示在Text3文本框中(见图)。请填空。Private Sub Command1_Click()Dim r As Integer，n As Integern=Text1r=Text2Text3=fun(n)/fun(______)/fun(r)End SubFunction fun(n As Integer) as longDim t As Longx=1For k=1 To nt=t*kNextfun=tEnd Function
考题
在窗体中绘制两个文本框和一个命令按钮，然后在命令按钮的代码窗口中编写如下事件过程：Private Sub Command1_Click()Text1＝"VB programming"Text2＝Text1Text1＝"ABCD"End Sub程序运行后，单击命令按钮，文本框Text2中显示的内容为【 】。
考题
单选题在窗体上画两个文本框，其名称分别为Text1和Text2，然后编写如下程序：程序运行后，如果在文本框Text1中输入China Beijing，则在文本框Text2中显示的内容是（ ）。A
China BeijingB
ChinaC
BeijingD
ChinaB
热门标签
最新试卷