如果Cs的，客戶端退出應該有個logout處理。也可以ping客戶機，判斷在不線上。list可以試試1. 判斷list上mousemove事件，如滑鼠在list控制元件上時暫停重新整理，等待選擇。2.如果選擇了，記下選擇的listitem， 在重新整理list後，自動把該item的selected() 設為true.

ListView1.View = lvwReport "設定ListView控制元件中ListItem物件的外觀形式為報表，其值為3

ListView1.ColumnHeaders.Clear "清除原有的列標題

With ListView1.ColumnHeaders "新增新的列標題

.Add , , "", 10

.Add , , "第一列", 1000 "第一列標題，標題內容為“第一列”，列寬為1000

.Add , , "第二列", 1000 "第二列標題，標題內容為“第二列”，列寬為1000

End With

ListView1.ListItems.Clear "清除原有的記錄內容

With ListView1.ListItems.Add "新增新記錄

.SubItems(1) = 1 "第一列內容

.SubItems(2) = 2 "第二列內容

End With

End Sub