- 帖子
- 163
- 主題
- 1
- 精華
- 0
- 積分
- 170
- 點名
- 0
- 作業系統
- Window 7
- 軟體版本
- Office 2007
- 閱讀權限
- 20
- 性別
- 男
- 註冊時間
- 2010-9-5
- 最後登錄
- 2022-7-20
|
回復 3# lifedidi
Q1:請將CommandButton1_Click事件程序改為如下試試看。
Private Sub CommandButton1_Click()
With ListBox1
MsgBox "編號:" & Split(.Value, " ")(0)
MsgBox "姓名:" & Split(.Value, " ")(1)
End With
End Sub
Q2:於UserForm_Initialize事件程序後面加入底下兩行。
ListBox1.ListIndex = 0
ListBox2.ListIndex = 0 |
|