首页 > 高职专科

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

[主观题]

窗体上有一个命令按钮，数据文件data.txt的内容如下： "语文" "2001", 87 "数学"

"2002", 75 "英语" "2003", 92 "体育" "2004", 66 Type bs aa As String * 2 bb As String * 4 cc As Integer End Type Private Sub command1_Click(Dim xs As bs Dim fl As Integer fl = FreeFile Open "d:\data.txt" For Input As fl Do While Not EOF(fl) Input fl, xs.aa, xs .bb, xs.cc List1.AddItem xs.bb List1.AddItem xs.aa List1.AddItem xs.cc Loop Print EOF(fl) Close End Sub 问：在列表框中第一行、第三行、第四行的内容是【】、【】、【】。窗体上打印出的是【】。

查看答案

如果结果不匹配，请联系老师获取答案

您可能会需要：

重置密码查看订单联系客服

安装优题宝APP，拍照搜题省时又省心！

更多“窗体上有一个命令按钮，数据文件data.txt的内容如下： …”相关的问题

第1题

窗体上有一个名称为Command1的命令按钮，其单击事件过程代码如下：Private Sub Command1 Click（）

窗体上有一个名称为Command1的命令按钮，其单击事件过程代码如下：

Private Sub Command1 Click（）

Static x As Variant

n=0

x=Array(1，2，3，4，5，6，7，8，9，10)

While n＜=4

x(n)=x(n+5)

Print x(n)：

n=n+1

Wend

End Sub

运行程序，单击命令按钮Command1，窗体上显示的是（）。

A.1 2 3 4 5

B.6 7 8 9 10

C.2 3 4 5 6

D.6 2 3 4 5

点击查看答案

第2题

在一个窗体上有两个命令按钮，cmdMax 和 cmdMin。单击cmdMax时，窗体上显示“字体由小变大”，字号每次

增加2；单击cmdMin时，窗体上显示“字体由大变小”，字号每次减小2。请填空。 Private Sub Form_Load() Forml．Caption =“字体变化示范” cmdMax．Caption=“字体变大” cmdMin．Caption=“字体变小” End Sub Private Sub cmdMax_Click() 【】 Forml．Print”字体由小变大” End Sub Private Sub cmdMin_Click() 【】 Forml．Print“字体由大变小” End Sub

点击查看答案

第3题

某窗体中有一命令按钮，在窗体视图中单击此命令按钮打开一个查询，需要执行的宏操作是【】。

某窗体中有一命令按钮，在窗体视图中单击此命令按钮打开一个查询，需要执行的宏操作是【】。

点击查看答案

第4题

在窗体中添加一个命令按钮（名称为Command1)，然后编写如下代码：Private Sub Command1_Click（) a=0

在窗体中添加一个命令按钮(名称为Command1)，然后编写如下代码： Private Sub Command1_Click() a=0:b=5:c=6 MsgBox a=b＋c End Sub 窗体打开运行后，如果单击命令按钮，则消息框的输出结果为______。

A．11

B．a=11

C．0

D．False

点击查看答案

第5题

将宏对象拖入到窗体的设计视图，会自动添加一个()。

A.标签

B.文本框

C.列表框

D.命令按钮

点击查看答案

第6题

在窗体上画一个名称为Commandl的命令按钮然后编写如下通用过程和命令按钮的事件过程：Private Fu（）

A.6

B.7

C.8

D.9

点击查看答案

第7题

在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Command1_Click（) a=0 For i=1 To 3

在窗体上画一个命令按钮，然后编写如下事件过程：

Private Sub Command1_Click()

a=0

For i=1 To 3

For j=1 To 4

If j Mod 2＜＞0 Then

a=a+1

End If

a=a+1

Next j

Next i

Print a

End Sub

程序执行后，单击命令按钮，输出结果是【】。

点击查看答案

第8题

在窗体上画一个名称为Command1的命令按钮。编写如下事件过程： Private Sub Command1_Click（) Di

在窗体上画一个名称为Command1的命令按钮。编写如下事件过程： Private Sub Command1_Click() Dim a As String A=【】 For i=1 To 5 Print Space(6-i); Mid$(a, 6-i, 2*i-1) Next i End Sub 程序运行后，单击命令按钮，要求窗体上显示的输出结果为： 5 456 34567 2345678 123456789 请填空。

点击查看答案

第9题

在窗体中有一个命令按钮command1，编写事件代码如下：Private Sub Command1_Click（)Dim s As Integ

在窗体中有一个命令按钮command1，编写事件代码如下： Private Sub Command1_Click() Dim s As Integer s=P(1)+P(2)+P(3)+P(4) Debug.Print s End Sub Public Function P(N As Integer) Dim Sum As Integer Sum=0 For i=1 To N Sum=Sum+1 Next i P=Sum End Function 打开窗体运行后，单击命令按钮，输出的结果是()。

A．15

B．20

C．25

D．35

点击查看答案

长沙壹依黑科技有限公司版权所有 ©2024

湘ICP备2024047451号营业执照

违法和不良信息举报电话：400-118-7898

举报/反馈/投诉邮箱：deng＃ujigu.com（请将＃替换成@）