word排版程序代码

代码格式

1.        在notepad++中高亮代码:在菜单栏中选择对应的语言即可。

2.        选中目标代码,执行插件->NppExport->Cope HTML to clipboard。

3.        粘贴到word中。

如下代码即是冲notepad++中粘贴过来的。(注:此处我为代码加上了边框以示区别)

#include<stdlib.h>

 

int main()

{

    printf("helloworld!");

    return 0;

}

此操作巧用word支持html格式来实现。

代码加行号

使用宏“代码加行号”,参见‘程序代码加行号.bas’

效果如下:

#001 #include<stdlib.h>

#002

#003 int main()

#004 {

#005     printf("helloworld!");

#006     return 0;

#007 }

 

如想取消行号,可按住Alt键,选择行号,然后删除。

 

提示:Word2010默认情况下隐藏开“发工具选项”栏,因此找不到宏。可在 文件->选项->自定义功能区,勾选开发工具 来打开。

 

附录:程序代码加行号,参见:Word排版艺术10.4

#001 Sub 程序代码加行号()

#002 Dim nLineNum

#003 Dim sLineNum As String

#004 Dim selRge As Range

#005 Dim i

#006

#007 Set selRge = Selection.Range

#008 For nLineNum = 1 ToselRge.Paragraphs.Count

#009     sLineNum = Str(nLineNum)

#010     sLineNum = LTrim(sLineNum)

#011     For i = 1 To (3 -Len(sLineNum))

#012         sLineNum = "0" + sLineNum

#013     Next i

#014     sLineNum = "#" & sLineNum

#015     sLineNum = sLineNum + " "

#016     

#017     selRge.Paragraphs(nLineNum).Range.InsertBefore (sLineNum)

#018 Next nLineNum

#019 End Sub

 

评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值
>