题目详情
当前位置:首页 > 职业培训考试
题目详情:
发布时间:2023-12-11 23:54:52

[单项选择]在窗体上画两个文本框Text1和Text2,一个命令按钮Command1,请阅读以下程序段: Private Sub Command1_Click( ) x=0 Do Until x>=50 x=(x+4)*(x+3) n=n+1 Loop Text1.Text=Str(n) Text2.Text=Str(x) End Sub 运行程序后,单击命令按钮,在两个文本框中显示的值分别为( )。
A. 1和0
B. 2和240
C. 3和50
D. 4和168

更多"在窗体上画两个文本框Text1和Text2,一个命令按钮Command"的相关试题:

[单项选择]在窗体上按顺序,分别画出变量按钮command1、文本框Text1和文本框Text2。为了把Text2的Tab顺序设置为第一,应将Text2的TabIndex属性没置为______。
A. 0
B. 1
C. 2
D. 3
[单项选择]窗体上有三个文本框Text1、Text2和Text3以及一个命令按钮Command1,设文本框Text1中内容为 12,文本框Text2中内容为34。下面程序的执行结果为______。Private Sub Command1_ Cilick( ) Text3.Text = Str$(Val(Text1.Text)) + Val(Text2.Text) Print val(Text3,Text)End Sub
A. 12
B. 34
C. 46
D. 1234
[单项选择]在窗体上画一个命令按钮和一个文本框,其名称分别为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. 出错
[单项选择]窗体上有两个名称分别为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. A
B. a
C. C
D. c
[单项选择]窗体上有两个名称分别为Text1、Text2的文本框,一个名称为Command1的命令按钮。设有如下的类型声明: Type Person name As String*8 major As String*20 End Type 当单击“Command1”按钮时,能够正确地把数据写入文件的程序段是______。
A. Private Sub Command1_Click() Dim p As Person name=Text1. Text major=Text2. Text Open"C:/dat dat" For Random As #1 Put #1, 1, p Close #1 End Sub
B. Private Sub Command1_Click() Dim p As Person name=Text1.Text major=Text2. Text Open"C:/dat dat" For Random As #1 Get #1, 1, p Close #1 End Sub
C. Private Sub Command1_Click() Dis p As Person name=Text1. Text major=Text2. Text open "C:/dat dat" For Random As #1 Len=Len( Put #1, 1, p Close #1 End Sub
D. Private Sub Command1_Click() Dim p As Person name=Text1. Text major=Text2. Text Open "C:/dat dat" For Random As #1=Len( Get #1, 1, p Close #1 End Sub
[单项选择]在窗体上按顺序,分别画出变量按钮Command1、文本框Text1和Text2。为了将Text2的Tab顺序设置为第一,应将Text2的TabIndex属性设置为
A. 0
B. 1
C. 2
D. 3
[单项选择]在窗体中添加一个命令按钮,名称为Command1,两个文本框名称分别为Text1、Text2,然后编写如下程序: Private Sub Command1_Click( ) a=Text1.Text b=Text2.Text c=LCase (a) d=UCase (b) Print c;d End Sub程序运行后,在文本框Text1、Text2中分别输入AbC和Efg,结果是______ 。
A. abcEFG
B. abcefg
C. ABCefg
D. ABCEFG
[单项选择]窗体有命令按钮Command1和文本框Text1,对应的事件代码如下:  Private Sub Command1_Click( )   For i=1 To 4  x=3  For j=1 To 3  For k=1 To 2  x=x+3  Next k  Next j  Next i  Text1.Value=Str(x)   End Sub  运行以上事件过程,文本框中的输出是
A. 6
B. 12
C. 18
D. 21
[单项选择]

窗体上有名称为Command1的命令按钮和名称为Text1的文本框
  Private Sub Command1_Click( )
  Text1.Text=”程序设计”
  Text1.SetFocus
  End Sub
  Private Sub Text1_GotFocus( )
  Text1.Text=”等级考试”
  End Sub
  运行以上程序,单击命令按钮后


A. 文本框中显示的是“程序设计”,且焦点在文本框中
B. 文本框中显示的是“等级考试”,且焦点在文本框中
C. 文本框中显示的是“程序设计”,且焦点在命令按钮上
D. 文本框中显示的是“等级考试”,且焦点在命令按钮上
[单项选择]在窗体上有文本框Text1和命令按钮Command1,并有如下事件过程: Private Sub Command1_Click( ) Dim i As Integer, n As Integer For j=0 To 50 i=i+3 n=n+1 If i>10 Then Exit For Next Text1.Text=Str(n) End Sub
A. 2
B. 3
C. 4
D. 5

我来回答:

购买搜题卡查看答案
[会员特权] 开通VIP, 查看 全部题目答案
[会员特权] 享免全部广告特权
推荐91天
¥36.8
¥80元
31天
¥20.8
¥40元
365天
¥88.8
¥188元
请选择支付方式
  • 微信支付
  • 支付宝支付
点击支付即表示同意并接受了《购买须知》
立即支付 系统将自动为您注册账号
请使用微信扫码支付

订单号:

请不要关闭本页面,支付完成后请点击【支付完成】按钮
恭喜您,购买搜题卡成功
重要提示:请拍照或截图保存账号密码!
我要搜题网官网:https://www.woyaosouti.com
我已记住账号密码