-
在窗体(Name属性为Formal)上画两个文本框(其Name属性分别为Text1和Text2)和一个命令按钮(Name属性为Command1),然后编写如下两个事件过程:
https://assets.asklib.com/images/image2/2017110811221976005.jpg
程序运行后,在第一个文本框(Text1)和第二个文本框(Text2)中分别输入123和321,然后单击命令按钮,则输出结果为()
A . 444
B . 321123
C . 123321
D . 132231
-
在窗体上画两个文本框(其Name属性分别为Text1和Text2)和一个命令按钮(其Name属性为Command1),然后编写如下的事件过程:
https://assets.asklib.com/images/image2/2017110811322251127.jpg
程序执行后,单击命令按钮,在两个文本框中显示的值分别为()
A . 1和0
B . 2和72
C . 3和50
D . 4和168
-
在表单FORM1中有一个编辑框EDIT1,一个文本框TEXT1和一个命令按钮COMMAND1,现要使文本框显示编辑框中被选定的内容,应在COMMAND1的CLICK事件中编写的代码是()。
-
在窗体上画一个命令按钮和一个文本框,其名称分别为Command1和Text1,把文本框的Text属性设置为空白,然后编写如下事件过程: Private Sub Command1_Click() A =Inputbox(\Enter An Integer\) B =Inputbox(\Enter An Integer\) Text1.Text = B +A End Sub 程序运行后,单击命令按钮,如果在输入对话框中分别输入4和56,则文本框中显示的内容是_______。
-
窗体上有两个名称分别为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
-
在窗体上画一个命令按钮和一个文本框,其名称分别为Command1和Text1,把文本框的Text属性设置为空白,然后编写如下事件过程: Private Sub Command1_Click() a=InputBox("Enter an integer") b=InputBox("Enter an integer") Text1.Text=b+a End Sub 程序运行后,单击命令按钮,如果在输入对话框中分别输入8和10,则文本框中显示的内容是______。
A.108
B.18
C.810
D.出错
-
窗体中有一个名为Command1的命令按钮和一个名为Text1的文本框,事件代码如下: Private Sub Command1_Click Dim a(10)As Integer,b(10)As Integer n=3 For i=1 T0 5 a(i)=i b(n)=2*n+i Next i Me!Text1=a(n)+b(n) End Sub 打开窗体,单击命令按钮,文本框Text1中显示的内容是()。
A.13
B.14
C.15
D.16
-
在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框,然后编写如下事件过程:
Private Sub Command1_Click()
n = Val(Text1.Text)
For i = 2 To n
For j = 2 To sqr(i)
If i Mod j = 0 Then Exit For
Next j
If j > Sqr(i) Then Print i
Next i
End Sub
该事件过程的功能是()。
A.输出n以内的奇数
B.输出n以内的偶数
C.输出n以内的素数
D.输出n以内能被j整除的数
-
在下图所示的窗体上,有一个标有“显示”字样的命令按钮(名称为Command1)和一个文本框(名称为text1)。当单击命令按钮时,将变量sum的值显示在文本框内,正确的代码是______。<img src='https://img2.soutiyun.com/shangxueba/ask/1239001-1242000/1239994/ct_cstabz200802_ctabchoose_00074(20096).jpg' />
A.Me!Text1.Caption=sum
B.Me!Text1.Value=sum
C.Me!Text1.Text=sum
D.Me!Textl.Visible=sum
-
有一个窗体Form1,其中有一个文本编辑框Text1和一个命令按钮Command1。运行窗体后在文本编辑框中输入一串字符,单击命令按钮后该窗体的标题改变为文本编辑框中输入的字符串。则宏命令SetValue的参数设置是( )。
A.“项目”:[Forms]![Form1],“表达式”:[Forms]![Form1]![Text1]
B.“项目”:[Forms]![Form1].[Caption],“表达式”:[Forms]![Form1]![Text1]
C.“项目”:[Forms]![Form1].[Caption],“表达式”:[Forms]![Form1]![Command1]
D.“项目”:[Forms]![Form1]![Text1],“表达式”:[Forms]![Form1]![Command1]
-
在窗体上画一个名称为Commandl的命令按钮和一个名称为Text1的文本框。程序运行后,Command1为禁用(灰色)。当向文本框中输入任何字符时,命令按钮Command1变为可用。请在()处填入适当的内容,将程序补充完整。
<img src='https://img2.soutiyun.com/ask/uploadfile/10839001-10842000/b6e1961a1ece372d5b5d9638e1f875a5.jpg' />
-
窗体上有一个名称为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' />
-
在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框,然后编写如下事件过程:Priva
在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框,然后编写 如下事件过程: Private Sub Command1_Click() n = Val(Text1.Text) For i = 2 To n For j = 2 To Sqr(i) If i Mod j=0 Then Exit For Next j If j>Sqr(i)Then Print i Next i End Sub 该事件过程的功能是
A.输出n以内的奇数
B.输出n以内的偶数
C.输出n以内的素数
D.输出n以内能被j整除的数
-
在窗体上画二个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程:
<img src='https://img2.soutiyun.com/ask/uploadfile/2586001-2589000/23e1201b59bd107c459be2a1be30957d.jpg' />
程序运行后,单击命令按钮,在文本框中显示的值是
A.2
B.3
C.4
D.5
-
(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
-
在窗体中添加一个名称为Text1的文本框,两个名称分别为Command1和Com mand2的命令按钮。要求程序运行后,用户向文本框中输入字母,单击Command1按钮则文本框中字母全部转换为大写;然后单击Command2按钮则文本框中字母全部转换为小写。请在【 】、【 】和【 】处填入适当的内容,将程序补充完整。
-
在窗体中建立三个文本框,名称分别为text1、text2和text3,还有一个名称为label1的标签,一个名称为command1的命令按钮,编写如下代码:
Private Sub Command1_Click()
Dim x!, y!, z!, t!
x = Text1
y = Text2
z = Text3
If x< y then
t = x
x = y
y = t
End If
If y< z then
t = y
y = z
z = t
If x< y then
t = x
x = y
y = t
End If
End If
Label1.Caption = x & "," & y & "," & z
End Sub
当在文本框text1、text2 和 text3 中分别输入5、3和8,则标签显示的结果为()
A.3,5,8
B.5,3,8
C.8,5,3
D.3.8.5
-
在窗体中添加一个命令按钮、一个标签和一个文本框,并将文本框的Text属性置空,编写命令按钮Command1的Click事件代码:
<img src='https://img2.soutiyun.com/ask/uploadfile/3852001-3855000/06618ed14e1342af407ef4550c1f28b1.jpg' /><img src='https://img2.soutiyun.com/ask/uploadfile/3852001-3855000/1ebfd75144eb824dfe338ddda7667206.jpg' />程序运行后,在文本框中输入20,单击命令按钮后,标签中的内容为()。
A.20是一个奇数
B.20
C.20是一个偶数
D.2
-
(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 “ 圆的面积是 ” &3.14*r*r
End If
End Sub
-
窗体中有命令按钮Command1和文本框Text1,事件过程如下:运行程序,单击命令按钮,输入19,在Text1中会显示“19是奇数”。那么在程序的括号内应填写()
A.NOTresult(x)
B.result(x)
C.result(x)=“奇数”
D.result(x)=“偶数”
-
窗体上有一个名称为Command1的命令按钮,一个名称为Text1的文本框。编写如下程序:对于上述程序,以下叙述中错误的是()
A.语句fun=n有错,因为n是整型,fun没有定义类型
B.运行程序,输入值为5时,文本框中显示655
C.运行程序,输入值为6时,文本框中显示42
D.ByRef表示参数按址传递
-
在窗体上画两个文本框和一个命令按钮,然后在代码窗口中编写如下事件过程: Private Sub Command1_Click() Text1.Text="VB Programming" Text2.Text=Text1.Text Text1.Text="ABCD" End Sub 程序运行后,单击命令按钮,两个文本框中显示的内容分别为 (8) 和 (9) 。
-
在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框。程序运行后,Command1为禁用(灰色)。当向文本框中输入任何字符时,命令按钮Command1变为可用。请在 【6】 处填入适当的内容,将程序补充完整。 Private Sub Form_Load()Command1.Enabled=False End Sub Private Sub Text1 【6】 ()Com
-
在窗体上有一个名称为Command1的命令按钮和一个名称为Text1的文本框。程序运行后,Command1为禁用(灰色),此时如果在文本框中输入字符,则命令按钮Command1变为可用。请填空。 Private Sub Form_Load() Command1.Enabled=False End Sub Private Sub Text1_ ______ Command1.Enabled=True