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

搜题

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

提问人：网友zhengyytt 发布时间：2022-01-07

[单选题]

在窗体中先建立一个名称为label1的控件数组(它的index属性为0)，当执行以下程序段：PrivateSubForm_Load()DimmtopAsInteger,mleftAsInteger,iAsInteger,jAsIntegermtop=0Fori=1To8mleft=50Forj=1To8k=(i-1)*8+jLoadLabel1(k)Label1(k).BackColor=IIf((i+j)Mod2=0,QBColor(0),QBColor(15))Label1(k).Visible=TrueLabel1(k).Top=mtopLabel1(k).Left=mleftmleft=mleft+Label1(0).WidthNextjmtop=mtop+Label1(0).HeightNextiEndSub执行后的效果是()

A.在窗体中显示16行的黑、白颜色相间的棋盘

B.在窗体中显示8行10列的黑色棋盘

C.在窗体中显示8行8列的黑、白颜色相间的棋盘

D.以上说法都不正确

参考答案

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

查看官方参考答案

网友提供的答案

共位网友提供了参考答案，

查看全部

ABCD

提交我的答案

登录提交答案，可赢取奖励机会。登录

更多“在窗体中先建立一个名称为label1的控件数组（它的index属性为0)，当执行以下程序段：PrivateS”相关的问题

第1题

在窗体上画一个文本框（名称为Text1)和一个标签（名称为Label1)，程序运行后如果在文本框中输入文本

在窗体上画一个文本框(名称为Text1)和一个标签(名称为Label1)，程序运行后如果在文本框中输入文本，则标签中立即显示相同的内容。以下可以实现上述操作的事件过程是（）。

A.Private Sub Text1 Change（）

Label1．Caption=Text1．Text

End Sub

B.Private Sub Label1 Change（）

Label1．Caption=Text1．Text

End Sub

C.Private Sub Text1 Click（）

Label1．Capnon=Text1．text

End Sub

D.Private Sub Label1 Click（）

Label1．Caption=Text1．Text

End sot

点击查看答案

第2题

在窗体上画一个文本框（名称为Text1)和一个标签（名称为Label1)，程序运行后如果在文本框中输入文本

在窗体上画一个文本框(名称为Text1)和一个标签(名称为Label1)，程序运行后如果在文本框中输入文本，则标签中立即显示相同的内容。以下可以实现上述操作的事件过程是()。

A．Private Sub Text1_Change() Label1．Caption=Text1．Text End Sub

B．Private Sub Label 1_Change() Label1．Caption=Text1．Text End Sub

C．Private Sub Text1_Click() Label1．Caption=Text1．text End Sub

D．Private Sub Label1_Click() Label1．Caption=Text1．Text End sot

点击查看答案

第3题

在窗体中建立三个文本框，名称分别为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

点击查看答案

第4题

在窗体上画一个名称为Command1的命令按钮，一个名称为Label1的标签，然后编写如下事件过程：Private

在窗体上画一个名称为Command1的命令按钮，一个名称为Label1的标签，然后编写如下事件过程： Private Sub Command1_Click() S=0 For i=1 To 15 x=2*i-1 1fx Mod 3=0 Then s=s+1 Next i Label1.Caption=s End Sub 程序运行后，单击命令按钮，则标签中显示的内容是

A．1

B．5

C．27

D．45

点击查看答案

第5题

在窗体上画一个名称为Command1的命令按钮、一个名称为Label1的标签，然后编写如下事件过程；Private

在窗体上画一个名称为Command1的命令按钮、一个名称为Label1的标签，然后编写如下事件过程； Private Sub Command1_Click() s=0 For i=1 to 15 x=2*i-1 If x Mod 3=0 Then s=s+1 Next i Label1. Caption=s End Sub 程序运行后，单击命令按钮，则标签中显示的内容是______。

A．1

B．5

C．27

D．45

点击查看答案

第6题

在窗体上画一个名称为Command1的命令按钮，一个名称为Label1的标签，然后编写如下事件过程：Private

在窗体上画一个名称为Command1的命令按钮，一个名称为Label1的标签，然后编写如下事件过程： Private Sub Command1_Click() s=0 For i=1 To 15 x=2*i-1 if x Mod 3=0 Then s=s+1 Next i LabeCaption=s End Sub 程序运行后，单击命令按钮，则标签中显示的内容是______。

A．1

B．5

C．27

D．45

点击查看答案

第7题

在窗体上画一个名称为Label1的标签，然后编写如下事件过程：Private Sub Form_Click（)Dim arr（10,

在窗体上画一个名称为Label1的标签，然后编写如下事件过程： Private Sub Form_Click() Dim arr(10, 10)As Integer Dimi As Integer, j As Integer For i=2 To 4 For j=2 To 4 arr(i, j)=i*j Next j Next i Label1. Caption=Str(arr(2, 2)+arr(3, 3)) End Sub 程序运行后，单击窗体，在标签中显示的内容是______。

A．12

B．13

C．14

D．15

点击查看答案

第8题

在窗体上画一个名称List1的列表框，一个名称为Label1的标签。列表框中显示若干城市的名称。当单A．Pr

在窗体上画一个名称List1的列表框，一个名称为Label1的标签。列表框中显示若干城市的名称。当单

A．Private Sub list1_Click() Label1. Caption= List1. ListIndex End Sub

B．Private Sub Listl_Click() Label1. Name= List1. ListIndex End Sub

C．Private Sub List1_Click() Label1. Name== List1. Text End Sub

D．Private Sub List1_Click() Label1. Caption: List1. Text End Sub

点击查看答案

第9题

在窗体上绘制一个名称为Label1的标签，然后编写如下事件过程：Private Sub Form_Click（) Dim arr（

在窗体上绘制一个名称为Label1的标签，然后编写如下事件过程： Private Sub Form_Click() Dim arr(10,10)As Integer Dim i As Integer,j As Integer For i =2 To 4 For j =2 To 4 arr(i,j)=i*j Next j Next i Label1.Caption=Str(arr(2,2)+arr(3,3)) End Sub 程序运行后，单击窗体，在标签中显示的内容是()。

A．12

B．13

C．14

D．15

点击查看答案

第10题

在窗体上画一个名称为List1的列表框，一个名称为Label1的标签。列表框中显示若干国家的名称，当单击

列表中的某个国家名时，在标签中显示选中国家的名称。下列正确实现上述功能的程序是()。

A．Private Sub List_Click() Label1.Caption=List1.ListIndex End Sub

B．Private Sub List1_Click() Label1.Name=List1.ListIndex End Sub

C．Private Sub List1_Click() Label1.Name=List1.Text End Sub

D．Private Sub List1_Click() Label1.Caption=List1.Text End Sub

点击查看答案

账号：尚未登录

登录没有账号？去注册

购买搜题卡

考试指南全部 >

【南京师范大学专升本】学历方面，专升本要什么条件,，2024年南京林业大学成人高吉林成人高考报名时间2024年具体日期是几月 24上半年河南自学考试成绩查询具体步骤解析 2024年自考还是成人高考好有什么区别统招专升本：能否只考一本？河南24年成人高考专升本考几科如何在学信网要查询成人高考学历成人高考专升本难考吗（成人高考有什么用处）统招专升本一共多少分？2023年后的最新要求解析！函授专升本有用吗,，【成人高考报名】成人高考毕业流程辽宁2024成考什么时候开始报名

购买搜题卡查看答案

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

请选择支付方式

微信支付

支付宝支付

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

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

搜题卡使用说明

1. 搜题次数扣减规则：

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

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

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

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

找回账号密码

联系在线客服

警告：系统检测到您的账号存在安全风险

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

- 微信扫码关注简答题 -

警告：系统检测到您的账号存在安全风险

抱歉，您的账号因涉嫌违反简答题购买须知被冻结。您可在“简答题”微信公众号中的“官网服务”-“账号解封申请”申请解封，或联系客服。

- 微信扫码关注简答题 -

下载APP

关注公众号

TOP