1、首先需要建立一个表格，并设置按钮控件，实现汉字甲字显示，如下图所示：
2、点击鼠标右键，找到指定宏，进入到模块代码编辑中，如下图所示：
3、进入到vba的编程模式下，可以使用代码编写汉字甲的编写空间界面中，如下图所示：
1、接下来就是编写代码，实现汉字甲字的显示，代码如下图所示：
2、代码：
Sub Msg()
Sheet1.Range("C2：D3").Borders.Weight = xlThick
Sheet1.Range("C4：D5").Borders(xlInsideVertical).Weight = xlThick
End Sub
利用线条显示汉字甲
1、最后就是点击按钮控件，执行代码，显示结果，实现汉字甲字显示，如下图所示：
2、最终可以看出，执行模块中的代码，实现汉字甲字显示，如下图所示：
