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

搜题

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

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

[主观题]

在窗体上绘制一个名称为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

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

查看官方参考答案

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

第1题

窗体的单击事件过程如下，当单击窗体3次后，在标签 Label1中输出的结果是__________。 Private Sub Form1_Click(......) Handles Me.Click Static k% = 2 k = k +3 Label1.Text = k End Sub

A、11

B、2

C、5

D、8

E、14

点击查看答案

第2题

在窗体上画两个标签和一个命令按钮，其名称分别为Labell、Label2和Command1，然后编写如下程序： Private Sub func(L As Label，ByVal a As Integer) L.Caption="1234" a=a*a End Sub Private Sub Form_Load() Label1.Caption="ABCD" Label2.Caption=10 End Sub Private Sub Command1_Click() a=Val(Label2.Caption) Call func(Labell，A)Label2.Caption=a End Sub 程序运行后，单击命令按钮，在两个标签Label1和Label2中显示的内容分别是 ______。

A．ABCD和10

B．1234和100

C．ABCD和100

D．1234和10

点击查看答案

第3题

执行以下程序段后，变量C$的值为()。 A$="Visual Basic Programing" B$="Quick" C$=B$ & Ucase(Mid$(A$,7,6)) & Right$(A$,11)

A．Visual BASIC Programing

B．QuickBasic Programing

C．QUICK Basic Programing

D．Quick BASIC Programing

点击查看答案

第4题

在窗体上画一个文本框，其名称为Text1，然后编写如下事件过程： Private Sub Text1_KeyPress(KeyAscii As Integer) Dim strAs String,n As Integer Str=UCase(Chr(KeyAscii) n=Len(str) Text1=String(n,str) End Sub 程序运行后，如果在键盘上输入单字母“k”，则在文本框Text1中显示的内容为()。

A．kk

B．kK

C．KK

D．Kk

点击查看答案

第5题

在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Crick() 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

点击查看答案

第6题

下列程序的输出结果为()。 Private Sub Command1_Click() Dim a(20) For j=1 To 20 Step2 a(j)=j Next i Print a(1)+a(2)+a(3) End Sub

A．4

B．5

C．6

D．7

点击查看答案

第7题

如果模块定义为： DefStr C-F 则以下语句运行后输出结果是()。 d$="321" f="654" print d+f$

A．321654

B．975

C．654321

D．显示出错信息

点击查看答案

第8题

在窗体上画一个命令按钮和两个文本框，其名称分别为Command1、Text1和Text2，然后编写如下程序： Dim S1 As String．S2 As String Private Sub Form_Load0 Text1.Text="" Text2.Text="" End Sub Private Sub Text1_KeyDown(KeyCode As Integer,Shift As Integer) S2=S2&Chr(KeyCode) End Sub Private Sub Text1_KeyPress(KeyAscii As Integer) S1=S1 & Chr(KeyAscii) End Sub Private Sub Command1_Click() Text1.Text=S2 Text2.Text=S1 S1="" S2="" End Sub 程序运行后，在Text1中输入“abc”，然后单击命令按钮，在文本框Text1和Text2中显示的内容分别为()。

A．abc和AB

B．abc和abc

C．ABC和abc

D．ABC和ABC

点击查看答案

第9题

已知x代表某个百分制成绩，下列程序段用于显示对应的五级制成绩，正确的是()

A．If x＞=60 Then Print"及格" Else If x＞=70 Then Print"中" Else If x＞=80 Then Print"良" Else If x＞=90 Then Print"优" Else Print"不及格" End If

B．If x＜90 Then Print"良" Else If x＜80 Then Print"中" Else If x＜70 Then Print"及格" Else If x＜60 Then Print"不及格" Else Print"优" End If

C．If x＞=90 then Print"优" Else If x＞=80 Then Print"良" Else If x＞=70 Then Print"中" Else If x＞=60 Then Print"及格" Else Print"不及格" End If End Select

D．Select Case x Case x＞=90 Print"优" Case x＞=80 Print"良" Case x＞=70 Print"中" Case x＞=60 Print"及格" Case Else Print"不及格"

点击查看答案

第10题

单击窗体时，下列程序段的执行结果为()。 Private Sub Form_Crick() Line(200,200)-(400,400) Print"+++++++++++++++++++" Print"*******************" End Sub

A．在窗体上画一斜线，从斜线终点处开始打印两行符号

B．在窗体上画一斜线，从斜线起点处开始打印两行符号

C．在窗体上画一斜线，从窗体左上角开始打印两行符号

D．从窗体左上角开始打印两行符号，从符号结束处开始画一斜线

点击查看答案

账号：尚未登录

登录没有账号？去注册

搜题记录

联系客服

购买搜题卡

考试指南全部 >

2024下半年网上自考报名流程及费用是多少 2024自考本科报名和考试时间分别是什么时候成人自考护理专业需要什么条件才能报名成人自考本科需要哪些条件流程是怎样的自考专升本科怎么报名在哪考试正规 2024年10月自考需要满足什么条件与要求 2024年南大自考本科含金量高吗考哪些内容 50岁拿到自考学历还有用吗有没有含金量 2024年自考本科考试时间公布具体是几月几号 2024全国各省10月自考考试安排汇总

购买搜题卡查看答案

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

请选择支付方式

微信支付

支付宝支付

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

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

搜题卡使用说明

1. 搜题次数扣减规则：

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