怎把optbutton的caption帶入msgbox的內容

Q1
直接帶入Caption即可
範例如下
Private Sub OptionButton_Yes_Click()
MsgBox OptionButton_Yes.Caption
End Sub

Q2
請用Fromat
範例如下
A1=2009/2/12
TextBox1.Text=Format(A1,"MM/DD")

Q3
請設定userform.StartUpPosition
預設值如下
Manual 0 沒有初始設定。
CenterOwner 1 在 UserForm 所屬項目的中央。
CenterScreen 2 在整個螢幕的中央。
WindowsDefault 3 在螢幕的左上角。

Q4
基本上沒有
要的話要用外部
但是不建議
可用折中法
Label
用一個Label
BorderColor = 00000000
BorderStyle = fmBorderStyle
Height = 1
就很像線了

2009-02-24 18:37:48 補充：
Q2.EX
ActiveCell.Offset(1, 0).Range("A1") = TextBox1.Text
這是TextBox1.Text 值 回傳至A1
我2個都寫給你參考

TextBox1.Text 值 回傳至 A1
ActiveCell.Offset(1, 0).Range("A1") = Format(TextBox1.Text,"MM/DD")

A1 值 回傳至 TextBox1.Text
TextBox1.Text = Format(ActiveCell.Offset(1, 0).Range("A1"),"MM/DD")

2009-02-24 18:39:01 補充：
Format
能依照EXCEL的儲存格格式放式來指定出你要的格式

2009-02-24 18:48:32 補充：
MSGBOX 有2種用法(在EXCEL VBA裡)
第一種是 常數
可使用於程式碼中的任何地方，以用來代替實際值
也就是只有顯示警告的功能

第二種是 函數
將訊息顯示在對話方塊中，等使用者按下按鈕，並傳回一 Integer 來指示使用者按下的是那一個鈕
這就像是給使用者選擇來決定

2009-02-24 19:18:23 補充：
Q1 EX
預設有以下物件
TextBox1
Optionbutton_Y
Optionbutton_N

MsgBox("Date:" & TextBox1.Text & Chr(13) & "YorNo:" & iif(Optionbutton_Y.Value ,"YES","NO"), vbOKCancel, "確認視窗")

試試看吧