搜题
网友您好,请在下方输入框内输入要搜索的题目:
搜题
题目内容 (请给出正确答案)
提问人:网友panmw2004 发布时间:2022-01-07
[单选题]

程序段如下,程序运行后消息框显示的结果是______。 Dim x%, y%, z%, t% x = 38 : y = 50 : z = 46 If x > y Then t = x : x = y : y = t If x > z Then t = x : x = z : z = t If y > z Then t = y : y = z : z = t MsgBox(y)

A.38

B.50

C.46

D.不确定

参考答案
简答题官方参考答案 (由简答题聘请的专业题库老师提供的解答)
查看官方参考答案
网友提供的答案
位网友提供了参考答案,
查看全部
  • · 有4位网友选择 D,占比44.44%
  • · 有2位网友选择 C,占比22.22%
  • · 有2位网友选择 A,占比22.22%
  • · 有1位网友选择 B,占比11.11%
网友13***377[103.***.***.83]选择了 D
1天前
匿名网友[26.***.***.242]选择了 D
1天前
匿名网友[65.***.***.132]选择了 A
1天前
匿名网友[1.***.***.63]选择了 A
1天前
匿名网友[17.***.***.190]选择了 D
1天前
匿名网友[137.***.***.114]选择了 B
1天前
匿名网友[249.***.***.157]选择了 D
1天前
匿名网友[28.***.***.213]选择了 C
1天前
匿名网友[18.***.***.96]选择了 C
1天前
提交我的答案
登录提交答案,可赢取奖励机会。
更多“程序段如下,程序运行后消息框显示的结果是______。 Dim x%, y%, z%, t% x = 38 : y = 50 : z = 46 If x > y Then t = x : x = y …”相关的问题
第1题
在窗体中建立三个文本框,名称分别为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

点击查看答案
第2题
下列程序段的执行结果为______。 Dim x% x = Int(Rnd( ) + 4) If x > 4 then MsgBox( "优秀" ) ElseIf x > 3 MsgBox( "良好" ) ElseIf x >2 MsgBox( "通过" ) Else MsgBox( "不通过" ) End If

A、优秀

B、良好

C、通过

D、不通过

点击查看答案
第3题
有如下程序段,该程序段运行后Label1中显示的内容为______。 Dim x$, y% x = "boy or girl?" y = Len(x) If y < 11 Then Label1.Text = "I am " & Mid(x, 1, 3) Else Label1.Text = "I am " & Mid(x, 8, 4) End If

A、boy or girl?

B、I am boy

C、I am girl

D、I am boy or girl?

点击查看答案
第4题
有如下程序段,该程序段运行后变量a的值为______。 Dim a As Integer, b As Integer a = 5 : b = 3 If a Mod b = 2 Then a = a ^ 2 Else a = b ^ 2

A、3

B、5

C、9

D、25

点击查看答案
第5题
有如下程序段,该程序段运行后变量c的值为______。 Dim c As String, a As Boolean a = True If Not a Then c = Chr(Asc("A") + 1) Else c = Chr(Asc("A") + 2) End If

A、66

B、67

C、"B"

D、"C"

点击查看答案
第6题
设a=6,b=5,c=2,执行语句MsgBox(a > b > c)后,消息框中显示的是______。

A、1

B、True

C、False

D、出错信息

点击查看答案
第7题

必须将源代码粘贴到答题的文本编辑框中,无需上传附件。 注意:如果未将源代码粘贴到文本框中,则本题不给分。 随机生成由四个字符构成的验证码。字符可为大写字母、小写字母或者数字字符。 要求: (1)单击Button1,则随机生成四位字符构成的验证码。 (2)生成的验证码显示在文本框txtResult中。显示的内容是:“打死也不告诉其他人,验证码为????”,其中的????显示生成的验证码。例如,生成的验证码为M8tY,则显示内容为“打死也不告诉其他人,验证码为M8tY” 提示: (1)大写字母A-Z,对应的ASCII码为ASC(“A”) –ASC(“Z”),见本题附带的ASCII表可知,即为整数范围[65,90]。 因此,要随机生成大写字母,就转换为要随机生成[65,90]范围内的整数,使用随机函数rnd()可以生成该范围内的整数。具体推导过程为: [65,90]范围内的整数 => [65,91)范围内的整数 => [65-65,91-65)+65范围内的整数 =>[0,26)+65范围内的整数 =>26*[0,1)+65范围内的整数 =>故随机生成的整数为int(26*rnd()+65),即int(26*rnd()+ASC(“A”) 假设生成的该整数为intA,然后使用整数转换为字符的函数Chr()函数进行转换,即Chr(intA),转换后即为随机生成的大写字母。 (2)小写字母a-z,对应的ASCII码为ASC(“a”) -ASC(“z”),也是一个连续的整数区间,可用类似上面的方法推导出随机生成的整数的表达式,然后再用Chr()函数将该整数转换为小写字母。 (3)数字字符0-9, 对应的ASCII码为ASC(“0”) -ASC(“9”),也是一个连续的整数区间,可用类似上面的方法推导出随机生成的整数的表达式,然后再用Chr()函数将该整数转换为数字字符。 (4)随机生成的字符,可为大写字母、小写字母或者数字字符,可以把这个步骤转换为掷一个三面骰子的过程。假设该三面骰子的三面分别是数字1,2,3。如果掷到数字1,则随机生成大写字母;如果掷到数字2,则随机生成小写字母;如果掷到数字3,则随机生成数字字符。 通过这种转换方法之后,当前生成的字符是大写字母、小写字母、数字字符中的哪一种,就转换成为随机生成[1,3]范围内的整数,并根据整数的值来判断需要生成哪种字符类型。 说明:假设方法有多种,这里举出一个例子,也可以用其他假设实现,例如随机生成[0,2]之间的三个整数。 (5)随机生成一个字符的过程(即代码)重复四次,最后将这四个字符使用字符串连接运算&进行连接,即可生成四位的验证码。

点击查看答案
第8题
以下程序运行后,标签中显示的内容是______。 Dim S%, X% For i = 1 To 15 X = 2 * i - 1 If X Mod 3 = 0 Then S = S + 1 Next Label1.Text = S

A、1

B、5

C、27

D、45

点击查看答案
第9题
以下程序执行完毕后,在消息框中显示的消息是______。 Dim k as integer For k=1 to 5 step 2 k=k+3 Next MsgBox(k)

A、3

B、4

C、5

D、6

点击查看答案
重要提示: 请勿将账号共享给其他人使用,违者账号将被封禁!
查看《购买须知》>>>
重置密码
账号:
旧密码:
新密码:
确认密码:
确认修改
购买搜题卡查看答案
购买前请仔细阅读《购买须知》
请选择支付方式
微信支付
支付宝支付
点击支付即表示你同意并接受《服务协议》《购买须知》
立即支付
搜题卡使用说明

1. 搜题次数扣减规则:

功能 扣减规则
基础费
(查看答案)
加收费
(AI功能)
文字搜题、查看答案 1/每题 0/每次
语音搜题、查看答案 1/每题 2/每次
单题拍照识别、查看答案 1/每题 2/每次
整页拍照识别、查看答案 1/每题 5/每次

备注:网站、APP、小程序均支持文字搜题、查看答案;语音搜题、单题拍照识别、整页拍照识别仅APP、小程序支持。

2. 使用语音搜索、拍照搜索等AI功能需安装APP(或打开微信小程序)。

3. 搜题卡过期将作废,不支持退款,请在有效期内使用完毕。

请使用微信扫码支付(元)

订单号:

遇到问题请联系在线客服

请不要关闭本页面,支付完成后请点击【支付完成】按钮
遇到问题请联系在线客服
恭喜您,购买搜题卡成功 系统为您生成的账号密码如下:
重要提示:请勿将账号共享给其他人使用,违者账号将被封禁。
发送账号到微信 保存账号查看答案
怕账号密码记不住?建议关注微信公众号绑定微信,开通微信扫码登录功能
警告:系统检测到您的账号存在安全风险

为了保护您的账号安全,请在“简答题”公众号进行验证,点击“官网服务”-“账号验证”后输入验证码“”完成验证,验证成功后方可继续查看答案!

- 微信扫码关注简答题 -
警告:系统检测到您的账号存在安全风险
抱歉,您的账号因涉嫌违反简答题购买须知被冻结。您可在“简答题”微信公众号中的“官网服务”-“账号解封申请”申请解封,或联系客服
- 微信扫码关注简答题 -
请用微信扫码测试
欢迎分享答案

为鼓励登录用户提交答案,简答题每个月将会抽取一批参与作答的用户给予奖励,具体奖励活动请关注官方微信公众号:简答题

简答题官方微信公众号

简答题
下载APP
关注公众号
TOP