跪求~VB如何点击按钮剪裁前16行，请高手帮忙

你原来的内容在什么里面存放？文本框？标签？文件？还是变量？数组？

添加一个text 一个按钮 代码如下~功能是 将文本文档拖入到text中 显示其内容 点击按钮将删除前16行的内容

Private Declare Function SendMessageLong _
Lib "user32" _
Alias "SendMessageA" (ByVal hwnd As Long, _
ByVal wMsg As Long, _
ByVal wParam As Long, _
ByVal lParam As Long) As Long

Const EM_GETLINECOUNT = &HBA

Private Const EM_GETLINE = &HC4

Private Const EM_LINELENGTH = &HC1

Private Const EM_LINEINDEX = &HBB

Private Declare Function SendMessage _
Lib "user32" _
Alias "SendMessageA" (ByVal hwnd As Long, _
ByVal wMsg As Long, _
ByVal wParam As Long, _