网友您好，请在下方输入框内输入要搜索的题目：

搜题

题目内容（请给出正确答案）

提问人：网友jeeyoo 发布时间：2022-01-06

[主观题]

有如下程序，运行时从键盘输入3，输出结果是 ______。Private Sub Command1_Click（)a=InputBox（"请

有如下程序，运行时从键盘输入3，输出结果是 ______。 Private Sub Command1_Click() a=InputBox("请输入一个数字：") Select Case a Case Is＞2 b=a+1 Case Is＞3 b=a+2 Case Is＞4 b=a＋3 Case Is＞5 b＝a＋4 End Select Print a ＋ b End Sub

A．8

B．7

C．6

D．9

简答题官方参考答案（由简答题聘请的专业题库老师提供的解答）

查看官方参考答案

更多“有如下程序，运行时从键盘输入3，输出结果是 ______。Private Sub Command1_Click（)a=InputBox（"请”相关的问题

第1题

当运行如下程序时，若输入：1 2，运行结果并不是3，请分析原因，并给出解决方案。 /*两个整数的和*/ #include <stdio.h> int main(void) { int m, n, sum; sum = m + n; scanf( "%d%d", &m, &n); printf("%d", sum); return 0; }

点击查看答案

第2题

在窗体上画一个命令按钮Command1和一个文本框Text1，然后编写如下程序： Private Sub Command1_Click() A=InputBox("请输入日期(1～31)") t="旅游景点:" & IIf(A＞0 And A＜=10,"长城","")_ & IIf(A＞10 And A＜=20,"故宫","")_ & IIf(A＞20 And A＜=30,"颐和园","") Text1.Text=t End Sub 程序运行后，如果从键盘输入5，则在文本框中显示的内容是()。

A．旅游景点：长城

B．旅游景点：长城颐和园

C．旅游景点：颐和园

D．旅游景点：故宫

点击查看答案

第3题

在窗体上画—命令按钮和一个文本框；名称分别为Command1和Text1，然后编写如下程序： Private Sub Command1_Click() a=InputBox(“请输入日期(1～31)”) t=“旅游景点” &llf(a＞0 And a＜=10，“长城”，“”，)_ &Ill(a＞10 And a＜=20，“故宫”，“”)_ &Iff(9＞20 And a＜=31，“颐和园”，“”) TextI.Text=t End Sub 程序运行后，如果从键盘—亡输A16，则在文本框中显示的内容是

A．旅游景点：长城故宫

B．旅游景点：长城颐和园

C．旅游景点：颐和园

D．旅游景点：故宫

点击查看答案

第4题

在窗体上画一个命令按钮和一个文本框，名称分别为Command1和Text1，然后编写如下程序： Private Sub Command1_Click() a = InputBox("请输入日期（1～31）") t = "去往" & IIf(a > 0 And a <= 15, "杭州", "") _ & iif(a> 15 And a <= 31, "苏州", "") text1.text="t" & "方向旅游" end sub> A、去往方向旅游

B、去往苏州方向旅游

C、去往杭州方向旅游

D、去往杭州，苏州方向旅游

点击查看答案

第5题

在窗体上画一个命令按钮和一个文本框，名称分别为Commandl和Text1，然后编写如下程序： Private Sub Commandl_click() a=InputBox(“请输入日期(1～31)”) t="旅游景点:" & IIf(a＞0 And a＜=10,"长城","")_ & IIf(a＞10 And a＜=20,"故宫","")_ & IIf(a＞20 And a＜=31,"颐和园","") Text1.Text=t End Sub 程序运行后，如果从键盘上输入16，则在文本框显示的内容是______。

A．旅游景点：长城故宫

B．旅游景点：长城颐和园

C．旅游景点：颐和园

D．旅游景点：故宫

点击查看答案

第6题

在窗体上画一个命令按钮Command1和两个文本框，名称分别为Text 1和 Text 2 Text 2。编写如下两个事件过程： Dim str As String, strl As String Private Sub form_load() TextText = " " TextText = " " TextEnabled = False TextEnabled = False End Sub Private Sub Form. KeyPress(KeyAscii As Integer) str= str&Chr(KeyAscii) End Sub Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer) str1 = strl&Chr(KeyCode) End Sub Private Sub Command1_Click() TextText =str TextText = str1 str= " " str1= " " End Sub 当在设计阶段把窗体KeyPreview属性设置为True时，程序运行过程中，在键盘上输入小写字母abc，然后单击命令按钮，则文本框Text1中显示的内容为 ______ 。

A．abc

B．不显示任何信息

C．ABC

D．出错

点击查看答案

第7题

在窗体上画一个命令按钮Command1和两个文本框，名称分别为Text1和Text2。编写如下两个事件过程：

Dim Str1 As String，str2 As String

Private Sub form_load()

Text1.Text=""

Text2.Text=""

Text1.Enabled=False

Text2.Enabled=False

End Sub

Private Sub Form_KeyPress(KeyAscii As Integer)

str1=str1 & Chr(KeyAscii)

End Sub

Private Sub Form_KeyDown(KeyCode As Integer，Shift As Integer)

str2=str2 & Chr(KeyCode)

End Sub

Private SubCommand1_Click()

Text1.Text=str1

Text2.Text=str2

str1=""

str2=""

End Sub

当在设计阶段的窗体的KeyPreview属性设置为True时，程序运行过程中，在键盘上输入小写字母abc，然后单击命令按钮，则文本框Text1中显示的内容为

A．abc

B．不显示任何信息

C．ABC

D．出错

点击查看答案

第8题

下列语句： X=5 If X＞0 Then Y＝5 Y=10 运行程序后，下列叙述中正确的是 ______。

A．变量Y的值是5

B．变量Y的值是10

C．变量X的值是10

D．变量Y的值无法确定

点击查看答案

第9题

当Form_Click事件发生时，程序输出的结果是 ______。 Private Sub Form. Click() Dim a As Integer，b As Integer，c As Integer a=1: b=1 Print a; b Do c=a+b Print c a=b:b=c Loop Until c＞=5 End Sub

A．1 1 1

B．2 3 5

C．2 5 7

D．2 3 4

点击查看答案

第10题

已知窗体上一个名称为Pic1的图片框，现在要把图片文件peach.bmp装载到该图片框中，使用的语句是 ______。

A．Pic1= "peach.bmp"

B．Pic1=LoadPicture("peach.bmp")

C．Pic1.Picture="peach.bmp"

D．Pic1.Picture=LoadPicture("peach.bmp")

点击查看答案

账号：尚未登录

登录没有账号？去注册

搜题记录

联系客服

购买搜题卡

考试指南全部 >

初中毕业33岁提升学历还有必要吗含金量高不高初中升如何考大专需要什么条件 2024成人自考本科怎么报名报考有什么要求 2024年初中毕业怎么直接考本科有哪些方法 2024年初中毕业如何提高学历要多久考下来初中学历可以考本科证吗报名条件有哪些 2024年小学学历该怎么提升考试科目有哪些自考大专需要学哪些知识通过率是多少初中学历怎么考大学本科有哪些方式 2024年初中毕业提升学历的顺序步骤流程是什么

购买搜题卡查看答案

购买前请仔细阅读《购买须知》

请选择支付方式

微信支付

支付宝支付

点击支付即表示你同意并接受《服务协议》和《购买须知》

立即支付已付款，但不能查看答案，请点这里登录即可>>

搜题卡使用说明

1. 搜题次数扣减规则：

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