条码打印机,
用word,然后保存为txt格式,不过由于光txt格式在word中种类就有三四种,选择适当的格式就可以了。
用新建文件的那个中断
fsutil file createnew test.txt 10485761k=1024 1m=1048576 1g=1073741824
参考方法如下:
1、在桌面鼠标依次右键——新建——文本文档;
2、在记事本中输入命令:
@echo off echo 正在清除系统垃圾文件,请稍等...... del /f /s /q %systemdrive%\*.tmp del /f /s /q %systemdrive%\*._mp del /f /s /q %systemdrive%\*.log del /f /s /q %systemdrive%\*.gid del /f /s /q %systemdrive%\*.chk del /f /s /q %systemdrive%\*.old del /f /s /q %systemdrive%\recycled\*.* del /f /s /q %windir%\*.bak del /f /s /q %windir%\prefetch\*.* rd /s /q %windir%\temp & md %windir%\temp del /f /q %userprofile%\cookies\*.* del /f /q %userprofile%\recent\*.* del /f /s /q %userprofile%\Local Settings\Temporary Internet Files\*.* del /f /s /q %userprofile%\Local Settings\Temp\*.* del /f /s /q %userprofile%\recent\*.* echo 清除系统垃圾完成! echo. & pause
3、依次点击文件——另存为;
4、将文件扩展名改为.bat,然后点击确定保存即可,这样一个简单批处理文件创建完成。
非常简单。
...
mytxt : TStringList;
...
mytxt := TStringList.Create;
mytxt.Add('Hello!');
mytxt.SaveToFile('mytxt.txt');
mytxt.Clear;
mytxt.Free;
插入超链接的步骤: 选中某内容(文字或图片)-------插入-------超链接------选择电脑上某文件-------确定
假设你的图片文件夹是在D盘的img下面,图片格式是jpg
选定A2单元格:
= HYPERLINK([D:\img\ & A2 & .jpg],A2)
然后直接向下拖。
如果嫌拖得太累了,那就用vba吧。
如下:
假设这些数据放在第一个sheet里面
在sheet1(右下第一个标签)右键-查看代码
双击这个(如图)
添加以下代码:完事后要重新打开下表格。
Private Sub Workbook_Open()
Sheet1.Activate
Dim i As Integer
Dim j As Integer
For i = 2 To 100 Step 1 ----可以修改100,末行号(箭头后面的要去掉哈,粘贴进入时,切记切记。下同)
For j = 1 To 100 Step 1 ------可以修改100,末列号
Dim name As String
name = Trim(Sheet1.Cells(i, j).Text)
If name = Then
Else
Sheet1.Cells(i, j) = D:\img\ & name & .jpg
Sheet1.Cells(i, j).Hyperlinks.Add Anchor:=Cells(i, j), Address:=D:\img\ & name & .jpg
End If
Next
Next
End Sub

直接在空白处点右键,有超链接