[问答题] 在名为Form1的窗体上建立一个文本框(名称为Text1,MultiLine属性为True,ScrollBars属性为2)和两个命令按钮(名称分别为Cmd1和Cmd2,标题分别为Read和Save),如下图所示。要求程序运行后,如果单击Read按钮,则读入in18.txt文件中的100个整数,放入一个数组中(数组下界为1);如果单击Save按钮,则挑出100。个整数中的所有奇数,在文本框Text1中显示出来,并把所有奇数之和存入考生文件夹中的文件out18.txt中(在考生文件夹下有标准模块model.has,其中putdata过程可以把一个整型数存入out18.txt文件,考生可以把该模块文件添加到自己的丁程中)。注意:程序中对文件的 *** 作统一使用相对路径;文件必须存放在考生文件夹中,窗体文件名为sjt5.frm,工程文件名为sjt5.vbp;结果存入out18.txt文件,否则没有成绩。
正确答案:第一步:新建一个名为Form1的窗体。第二步:单击工具箱中的TextBox控件图标,在窗体上拖拉出一个文本框,在属性窗口设置该文本框名称为Text1,将MultiLine属性设置为True,ScrollBars属性设置为2。第三步:单击工具箱中的CommandButton控件图标,在窗体上拖拉出两个命令按钮,在属性窗口设置该命令按钮名称分别为Cmd1和Cmd2,Caption分别为Read和Save。第四步:打开代码窗口输入如下代码:1 Private Sub Cmd1_Click( )2 Open Ap
参考解析:本题主要考查数据的输入输出及Visual Basic的控制结构及函数设计。
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)