题目详情
当前位置:首页 > 职业培训考试
题目详情:
发布时间:2024-01-11 06:39:33

[单项选择]在窗体上画一个命令按钮,名称为Comraandl。单击该命令按钮时,执行如下事件过程:
Private Sub Command1_Click( )
a$="software and hardware"
b$=Right(a$, 8)
c$=Mid(a$, 1, 8)+b$
MsgSox a$, 1, b$
End Sub
则在弹出的消息框的标题栏中显示的信息是______。
A. software and hardware
B. software
C. hardware
D. 1

更多"在窗体上画一个命令按钮,名称为Comraandl。单击该命令按钮时,执"的相关试题:

[单项选择]在窗体上画一个命令按钮,名称为Command1。单击命令按钮时,执行如下事件过程:
Private Sub Command1_Click( )
a$="software and hardware"
b$=Right(a$,8)
c$=Mid(a$,1,8)
MsgBox aS,b$,c$,1
End Sub
则在弹出的信息框的标题栏中显示的信息是
A. software and hardware
B. software
C. hardware
D. 1
[单项选择]在窗体上画一个命令按钮(名称为Command1)和一个文本框(名称为Text1),然后编写如下事件过程:
Private Sub Command1_Click( )
x=Val(Text1.Text)
Select Case x
Case 1.3
y=x*x
Case Is>=10.Is<=-10
y=x
Case-10 To 10
y=-x
End Select
End Sub
程序运行后,在文本框中输入3,然后单击命令按钮,则以下叙述中正确的是______。
A. 执行y=x*x
B. 执行y=-x
C. 先执行y=x*x,再执行y=-x
D. 程序出错
[单项选择]在窗体上画一个命令按钮,名称为Command1,然后编写如下事件过程:
Option Base 0
Private Sub Command1_Click( )
Dim city As Variant
city=Array(“北京”,“上海”,“天津”,“重庆”)
Print city(1)
End Sub
程序运行后,如果单击命令按钮,则在窗体上显示的内容是
A. 空白
B. 错误提示
C. 北京
D. 上海
[单项选择]在窗体上画一个命令按钮,名称为Command1,然后编写下列代码:
Option Base 0
Private Sub Command1_Click( )
Dim A1(4)As Integer,A2(4)As Integer
For k=0 To 2
A1(k+1)=InputBox("请输入一个整数")
A2(3-k)=A1(k+1)
Next k
Print A2(k)
End Sub
程序运行后,单击命令按钮,在输入对话框中依次输入2、4、6.则输出结果为( )
A. 0
B. 1
C. 2
D. 3
[填空题]在窗体上画一个命令按钮,名称为command1,然后编写如下程序:
Private Sub Command1_Click( )
Dim ct As String
Dim nt As Integer
Open "e:/stud. txt" (13)
Do While True
ct=InputBox("请输入姓名:")
If ct= (14) Then Exit Do
nt=Val(InputBox("请输入总分:"))
Write #1, (15)
Loop
Close #1
End Sub
以上程序的功能是,程序运行后,单击命令按钮,则向e盘根目录下的文件stud. txt中添加记录(保留已有记录),添加的记录由键盘输入;如果输入“end”,则结束输入。每条记录包含姓名(字符串型)和总分(整型)两个数据。请填空。
[单项选择]在窗体上画一个命令按钮,名称为Command1。然后编写如下程序:
Private Sub Command1_Click( )
For I=1 To 2
For H To 1
Print String(1,"H");
Next
Print
Next
End Sub
程序运行后,如果单击命令按钮,则在窗体上显示的内容是( )。
A. H
B. H
C. HHHHH
D. H
[单项选择]

在窗体上画一个命令按钮,其名称为Commandl,然后编写如下事件过程:
  Private Sub Command1_Click()
  Dim a$, b$,c$, k%
  a="ABCD”
  b=”123456”
  c=""
  k=1
  Do While k<= Len(a)Or k<=Len(b)
  If k<=Len(a)Then
  c=c&Mid(a, k, 1)
  End If
  If k<=Len(b)Then
  c=c&Mid(b, k, 1)
  End If
  k=k+1
  Loop
  Print c
  End Sub
  运行程序,单击命令按钮,输出结果是()


A. 123456ABCD
B. ABCD123456
C. D6C5B4A321
D. AlB2C3D456
[单项选择]在窗体上画一个命令按钮,名称为Command1,然后编写如下事件过程:
Private Sub Command1_Click( )
a$=“software and hardware“
b$=Right(a$,8)
c$=Mid(a$,1,8)
MsgBox a$,,b$,c$,1
End Sub
运行程序,单击命令按钮,则在弹出的信息框的标题栏中显示的是( )。
A. sotfware and hardware
B. software
C. hardware
D. 1
[单项选择]在窗体上画一个命令按钮(名称为Command1),然后编写如下事件过程:
Private Sub Command1_Click( )
b=5
c=6
Pdnta=b+c
End Sub
程序运行后,单击命令按钮,输出的结果是______。
A. a=11
B. a=b+c
C. a=
D. False

我来回答:

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

订单号:

截图扫码使用小程序[完全免费查看答案]
请不要关闭本页面,支付完成后请点击【支付完成】按钮
恭喜您,购买搜题卡成功
重要提示:请拍照或截图保存账号密码!
我要搜题网官网:https://www.woyaosouti.com
我已记住账号密码