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

[主观题]

单击窗体时，程序运行的结果是。 Private Sub Form_Click（) multi 20, 3 End Sub Public Sub multi（k As Integer, s As Integer) If k ＜ 50 Then k = k * s Call multi（k, s) End If k = k + k * s Print k; End Sub

暂无答案

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

您可能会需要：

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

安装上学吧APP，拍照搜题省时又省心！

更多“单击窗体时，程序运行的结果是。 Private Sub F…”相关的问题

第1题

（ 10 ）在窗体上画一个文本框，其名称为 Text1 ，在属性窗口中把该文本框的 Mult i Line 属性设置为 True ，然后编写如下的事件过程：

Private Sub Form_Click （）

Open " d:\test\smtext1.Txt " For Input As #1

Do While Not 【 13 】

Line Input #1, aspect$

W hole$=whole$+aspect$+Chr$ （ 13 ） +Chr$ （ 10 ）

Loop

Text1.Text=whole$

【 14 】

Open " d:\test\smtext2.Txt " For Output As #1

Print #1, 【 15 】

Close #1

End Sub

运行程序，单击窗体，将把磁盘文件 smtext1.txt 的内容读到内存并在文本框中显示出来，然后把该文本框中的内容存入磁盘文件 smtext2.txt 。请填空。

点击查看答案

第2题

（ 10 ）在窗体上画一个文本框，其名称为 Text1 ，在属性窗口中把该文本框的 Mult i Line 属性设置为 True ，然后编写如下的事件过程：

Private Sub Form_Click （）

Open " d:\test\smtext1.Txt " For Input As #1

Do While Not 【 13 】

Line Input #1, aspect$

W hole$=whole$+aspect$+Chr$ （ 13 ） +Chr$ （ 10 ）

Loop

Text1.Text=whole$

【 14 】

Open " d:\test\smtext2.Txt " For Output As #1

Print #1, 【 15 】

Close #1

End Sub

运行程序，单击窗体，将把磁盘文件 smtext1.txt 的内容读到内存并在文本框中显示出来，然后把该文本框中的内容存入磁盘文件 smtext2.txt 。请填空。

点击查看答案

第3题

在名称为Form1的窗体上绘制一个文本框，其名称为Text1，在属性窗口中把该文本框的MultiLine属性设置为True，然后编写如下的事件过程：

Private Sub Form. Click()

Open "d：\test\smtext1.txt" For Input As 1

Do While Not

Line Input 1，aspects

whole$=whole$+aspect$+Chr$(13)+Chr$(10)

Loop

Text1.Text=whole$

Close 1

Open "d：\test\smtext2.txt" For Output As 1

Print 1, ______

Close 1

End Sub

上述程序的功能是，把磁盘文件smtext1.txt的内容读到内存并在文本框中显示出来，然后把该文本框中的内容存入磁盘文件smtext2.txt。

点击查看答案

第4题

在名称为Form1的窗体上画一个文本框，其名称为Text1，在属性窗口中把该文本框的MultiLine属性设置为True，然后编写如下的事件过程：

Private Sub Form_Click（）

Open "d:\test\smtext1.txt" For Input As #1

Do While Not ______

Line Input #1, aspect$

whole$ = whole$ + aspect$ + Chr$（13） + Chr$（10）

Loop

Text1.Text = whole$

Close #1

Open "d:\test\smtext2.txt" For Output As #1

Print #1, ______

Close #1

End Sub

上述程序的功能是，把磁盘文件smtext1.txt的内容读到内存并在文本框中显示出来，然后把该文本框中的内容存入磁盘文件smtext2.txt。请填空。

点击查看答案

第5题

把一个磁盘文件的内容读到内存并在文本框中显示出来，然后把该文本框中的内容存入另一个磁盘文件，请填空完成程序。

在窗体上建立一个文本框，在属性窗口中把该文本框的MultiLine属性设置为 True，然后编写如下的事件过程：

Prlvate Sub Form_Click()

Open"D:\test1.txt"For Input As 1

Text1.FontSize＝14

Text1.FontName=“幼圆”

Do While Not EOF(1)

【】

whole$=whole$+aspect$+Chr$(13)+Chr$(10)

Loop

Text1.Text＝【】

Close

Open"D:\test2.txt"For Output As 1

Print 1,【】

Close

End Sub

点击查看答案

第6题

执行下列程序后，鼠标单击窗体，输出结果为 Private Sub Form_Click() Print "Click"； End Sub Private Sub Form_MouseDown(Button As Integer，Shift As Integer，X As Single，Y As Single) Print "Donw" End Sub Private Sub Form_MouseUp(Button As Integer，Shift As Integer，X As Single，Y As single) Print "Up" End Sub

A．DownUpClick

B．ClickDownUp

C．DownClickUp

D．UpDownclick

点击查看答案

第7题

执行下列程序后，鼠标单击窗体，输出结果为

Private Sub Form_Click()

Print "Click"；

End Sub

Private Sub Form_MouseDown(Button As Integer，Shift As Integer，X As Single，Y As Single)

Print "Donw"

End Sub

Private Sub Form_MouseUp(ButtonAs Integer，Shift As Integer，X As Single，Y As Single)

Print "Up"

End Sub

A．DownUpClick

B．ClickDownUp

C．DownClickUp

D．UpDownCliek

点击查看答案

第8题

执行下列程序后，鼠标单击窗体，输出结果为。 Private Sub Form_Click() Print“Click”； End Sub Private Sub Form_MouseDown(Button As Integer，Shift_ As Integer，X As Single，Y As Single) Print “Donw” End Sub Private Sub Form_MouseUp(Button As Integer，Shift_ As Integer，X As Single，Y As Single) Print“Up” End Sub

A．DownUpClick

B．ClickDownUp

C．DownClickUp

D．UpDownClick

点击查看答案

第9题

有如下程序，单击窗体Form1后运行结果是（）。 Private Sub Form_Click() Print "数字"; Spc(5); "中国" End Sub

A、"数字" "中国"

B、"数字";"中国

C、数字中国

D、数字中国

点击查看答案

第10题

单击窗口时，下列程序代码的执行结果为 Private Sub Form_Click( ) Text1 End Sub Private Sub Text(x As Integer) x=x*3+1 if x＜6 Then call Text(x) End if x=x*2+1 Print x； End Sub

A．27 55

B．11 35

C．22 45

D．24 51

点击查看答案

热门考试全部 >

2022年威海市专业技术人员继续教育公需科目考试试题及答案 2022年绵阳市专业技术人员继续教育公需科目考试试题及答案 2022年宜宾市专业技术人员继续教育公需科目考试试题及答案 2022年潍坊市专业技术人员继续教育公需科目考试试题及答案 2022年浙江省专业技术人员继续教育公需科目考试试题及答案 2022年河南省执业药师继续教育公需科目考试试题及答案 2022年自贡市专业技术人员继续教育公需科目考试试题及答案 2022年陕西省专业技术人员继续教育公需科目考试试题及答案 2022年江西省专业技术人员继续教育公需科目考试试题及答案 2022年吉林省专业技术人员继续教育公需科目考试试题及答案

相关试卷全部 >

2024教师资格《初中语文》模拟试卷（十）2024教师资格《初中语文》模拟试卷（九）2024教师资格《初中语文》模拟试卷（八）2024教师资格《初中语文》模拟试卷（七）2024教师资格《初中语文》模拟试卷（六）2024教师资格《初中语文》模拟试卷（五）2024教师资格《初中语文》模拟试卷（四）2024教师资格《初中语文》模拟试卷（三）2024教师资格《初中语文》模拟试卷（二）2024教师资格《初中语文》模拟试卷（一）

谢谢您的反馈

您认为本题答案有误，我们将认真、仔细核查，
如果您知道正确答案，欢迎您来纠错

开始纠错>>>

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

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

微信搜一搜

上学吧

点击打开微信

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

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

微信搜一搜

上学吧

点击打开微信