1,451
社区成员
发帖
与我相关
我的任务
分享
Private Sub LVData_ItemClick(ByVal Item As MSComctlLib.ListItem)
txtsend.Text = LVData.SelectedItem.SubItems(1)
End Sub
Private Sub txtsend_Change()
LVData.SelectedItem.SubItems(1) = txtsend.Text
End Sub