首页 > 大学本科> 网课在线教育

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

请输入或粘贴题目内容搜题

搜题

拍照、语音搜题，请扫码下载APP

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

[主观题]

有如下Sub过程： Sub ind（） Ind 2 End Sub

答案

查看答案

发布时间：2021-11-06

更多“有如下Sub过程： Sub ind（） Ind 2 End Sub”相关的问题

第1题

有如下事件过程： Private Sub Command1_Click（) b=10 Do Until b=-1 a=InputBox（"请输入a的

有如下事件过程： Private Sub Command1_Click() b=10 Do Until b=-1 a=InputBox("请输入a的值") a=Val(A)b=InputBox("请输入b的值") b=Val(B)a=a * b Loop Print aEnd Sub程序运行后，依次输人数值30，20，10，-1，输出结果为

A．6000

B．-10

C．200

D．-6000

点击查看答案

第2题

假定一个工程有一个窗体文件Form1和两个标准模块文件Model1及Model2组成。 Model1代码如下: Public x As Integer, y As Integer Sub S1（） S1 End Sub 其中 Sub Main 被设置为启动过程。程序运行后,各模块的执行顺序是 ______

A.Form1 →Model1→Model2

B.Model1 →Model2→Form1

C.Model2 →Model1→Form1

D.Model2 →Form1→Model1

点击查看答案

第3题

在代码窗口中,有如下事件过程,以下叙述正确的是______。Private Sub Option1_ClickIndex As Integer)……End Sub

A、此事件过程与不带参数的事件过程没有区别

B、有一个名称为Option1的命令按钮,单击该单选按钮,则执行该过程

C、有一个名称为Option1的控件数组,数组中有多个不同类型的控件

D、有一个名称为Option1的控件数组,数组中有多个相同类型的控件

点击查看答案

第4题

一个窗体单击事件过程如下：Private Sub Form_Click（) X = Val（Tex

一个窗体单击事件过程如下：

Private Sub Form_Click()

X = Val(Text1.Text):Y = Val(Text2.Text)

If X = 0 Or Y = 0 Then Print "不在任何象限内": Exit Sub

If X ＞ 0 And Y ＞ 0 Then Print "IN A"

If X ＞ 0 And Y ＜ 0 Then Print "IN D"

If X ＜ 0 And Y ＞ 0 Then Print "IN B"

If X ＜ 0 And Y ＜ 0 Then Print "IN C"

End Sub

点击查看答案

第5题

编写如下3个事件过程:Private Sub Form. KeyDown （KeyCodeAs Integer, Shift As Integer)Prin

A.ddd

B.dDd

C.DdD

D.DDD

点击查看答案

第6题

在窗体上画一个列表框，然后编写如下两个事件过程： Private Sub Form_Click（) List1．R

在窗体上画一个列表框，然后编写如下两个事件过程： Private Sub Form_Click() List1．RemoveItem 1 List1．Removeltem 3 List1．RemoveItem 1 End Sub Private Sub Form. Load() List1．AddItem "ItemA" List1．AddItem "ItemB" List1．AddItem "ItemC" List1．AddItem "ItemD" List1．AddItem "ItemE" End Sub 运行上面的程序，然后单击窗体，列表框中所显示的项目为【】。

点击查看答案

第7题

窗体中有一个命令按钮Command1和一个文本框Text1。其中Command1的Click事件过程如下。 Private Sub Command1窗体中有一个命令按钮Command1和一个文本框Text1。其中Command1的Click事件过程如下。 Private Sub Command1_Click（）

A.5

B.8

C.9

D.10

点击查看答案

第8题

在窗体上画一个文本框和一个图片框，然后编写如下两个事件过程： Private Sub Form_Click（) Textl.

在窗体上画一个文本框和一个图片框，然后编写如下两个事件过程：

Private Sub Form_Click()

Textl.Text="VB程序设计"

End Sub

Private Sub Textl_Change()

Picturel.Print"VB programming"

End Sub

程序运行后，单击窗体，则在文本框中显示的内容是【】，而在图片框中显示的内容是【】。

点击查看答案

第9题

对窗体编写如下事件过程： Private Sub Form_MouseDown (Button As Integer, Shift As Integer, X As Single, Y As Single) If Button =2 Then Print "AAAAA" End If End Sub Private Sub Form_MouseUp (Button As Integer, Shif

对窗体编写如下事件过程： Private Sub Form_MouseDown （Button As Integer, Shift As Integer, X As Single, Y As Single) If Button =2 Then Print "AAAAA" End If End Sub Private Sub Form_MouseUp （Button As Integer, Shif

AAAAABBBBB

AAAAA

BBBBBAAAAA

点击查看答案

第10题

窗体中有一个命令按钮Command 1。其Click事件过程如下。 Private Sub Command1_Click（) A=75 IF A＞60 Th

窗体中有一个命令按钮Command 1。其Click事件过程如下。

Private Sub Command1_Click()

A=75

IF A＞60 Then i=1

IF A＞70 Then i=2

IF A＞80 Then i=3