首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt5.vbp,相应的窗体文件为sjt5.frm,此外还有一个名为datain.txt 的文本文件,其内容如下: 32437658281298573142536475869713243546576879805937
在考生文件夹下有一个工程文件sjt5.vbp,相应的窗体文件为sjt5.frm,此外还有一个名为datain.txt 的文本文件,其内容如下: 32437658281298573142536475869713243546576879805937
admin
2018-10-29
35
问题
在考生文件夹下有一个工程文件sjt5.vbp,相应的窗体文件为sjt5.frm,此外还有一个名为datain.txt 的文本文件,其内容如下:
32437658281298573142536475869713243546576879805937
程序运行后单击窗体,将把文件datain.txt 中的数据输入到二维数组Mat 中,在窗体上按5行、5列的矩阵形式显示出来,并输出矩阵右上-左下对角线上的数据,如图1-68所示。在窗体的代码窗口中,已给出了部分程序,这个程序不完整,请把它补充完整,并能
正确运行。
要求:去掉程序中的注释符,把程序中的?改为正确的内容,使其实现上述功能,但不能修改程序中的其他部分。最后把修改后的文件按原文件名存盘。
选项
答案
【操作步骤】 步骤1:打开本题对应工程文件sjt5.vbp。 步骤2:打开代码编辑窗口,去掉程序中的注释符“’”,将问号“?”改为正确的内容。 参考代码: Dim Mat%(M, N) Open App.Path & "\" & "in5.txt" For _ Input As #1 Input #1, Mat(i, j) If i + j = 6 Then 步骤3:按要求将文件保存在考生文件夹中。
解析
转载请注明原文地址:https://kaotiyun.com/show/stFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
如果在VisualBasic集成环境中没有打开属性窗口,下列可以打开属性窗口的操作是( )。
为了用键盘打开菜单和执行菜单命令,第一步应按的键是( )。
在窗体上画一个名称为Combo1的组合框,名称为Text1的文本框,以及名称为Command1的命令按钮,如图所示。运行程序,单击命令按钮,将文本框中被选中的文本添加到组合框中,若文本框中没有选中的文本,则将文本框中的文本全部添加到组合框中。命令按钮的
以下能够触发文本框Change事件的操作是( )。
某人编写了下面的程序,希望能把Text1文本框中的内容写到out.txt文件中:PrivateSubCommand1_Click() Open"out.txt"ForOutputAs#2 Print"Text1" Close
在窗体上有两个名称分别为Text1、Text2的文本框,一个名称为Command1的命令按钮。运行后的窗体外观如图所示。设有如下的类型和变量声明:PrivateTypePerson nameAsString*8 majorAsSt
支持子程序调用的数据结构是( )。
能够用于标识对象名称的属性是( )。
下面不是键盘事件的是( )。
随机试题
1岁时头围、身高是
《上海期货交易所风险控制管理办法》规定,在某一期货合约的交易过程中,连续数个交易日的累积涨跌幅达到一定水平时,交易所可以根据市场风险调整其交易保证金水平。()
下列不属于基金托管业务的重大事件的是()。
下列()情况属于在职培训的成本支出。
利润表反映了企业一定会计期间的经营成果;现金流量表反映了一定会计期间现金和现金等价物流入和流出情况。二者都属于动态财务报表。()
A:Goodnews!Ourclasshaswonthefirstplaceinthebasketballgame.B:Really?【K1】______A:Mr.Zhang,ourP.E.teac
教育内容是教育者与受教育者共同认识的()。
如果全球变暖导致海平面大幅上升,和其他国家一样,中国将要_______被海水淹没地区的人口,特别是长江下游河段,或者建造大坝保护地处低洼地区的沿海城市,这些都需要巨大的花费。中国和其他国家面临的挑战是限制二氧化碳的排放,从而_______全球变暖所导致的最
与只操纵单个变量的实验设计相比,能同时操纵多个自变量的实验设计的优点有()
设c1,c2,…,cn均为非零实常数,A=(aij)n×n为正定矩阵,令bij=aijcicj(i,j=1,2,…,n),矩阵B=(bij)n×n,证明矩阵B为正定矩阵.
最新回复
(
0
)