如何防止在Textfiles中创建空行

时间:2016-12-27 03:25:53

标签: excel excel-vba vba

我对生成的文本文件中创建的空白行有一个问题。我将如何防止这种情况发生?

原始文本文件没有创建空行的数据
% Create figure. figure; % Sky data for background. x_bg = [0, 0, 10, 10]; y_bg = [0, 10, 10, 0]; % Sky indexed colors. c_bg = [0, 1, 1, 0]; % Patch sky using default colormap (parula). h1 = patch(x_bg, y_bg, c_bg); % Generate custom sky colormap. sky_map = interp1([0, 1], [135, 206, 235; 255, 255, 255]./255, linspace(0, 1, 255)); % True color array. CData = [sky_map(1, :); sky_map(end, :); sky_map(end, :); sky_map(1, :)]; % Apply sky colormap to 'FaceVertexCData' property. set(h1, 'FaceVertexCData', CData); % Retain sky patch in the current axes. hold on; % Terrain data. x = [0, 0:10, 10]; y = [0, 5*rand(size(0:10)), 0]; % Fill terrain. h2 = fill(x, y, y); % Sets the colormap and color axis limits based on the elevation data % limits. demcmap(y); % Display title. title('Vertical Profile'); % Display legend underneath. legend(h2, 'Terrain', 'Location', 'southoutside');

每当我点击我的按钮(按钮指向下面发布的宏00|MAABBJQQ|AJ_20161206_001||||||||||||||||||||||||||)5次,其中包含增量功能

sub test()

以下是我的增量功能代码,供大家了解我的目标。

00|MAABBJQQ|AJ_20161206_005||||||||||||||||||||||||||  
*blank row 1
*blank row 2
*blank row 3
*blank row 4
*blank row 5

1 个答案:

答案 0 :(得分:1)

;声明的末尾添加分号Print

Print #1, txt;

可以找到Print #语句的详细信息here。请注意 charpos 参数设置。使用分号会阻止插入换行符(CRLF)。