又有问题了，请大侠再解答一次。（有点难）

Question

Option ExplicitPrivate Sub Command1_Click()
Label1.FontSize = 18
Dim i  As Integer
i = MsgBox("do you love me?" & Chr(10) & Chr(13) & "Who are you,my pretty sister?", vbYesNoCancel)
If i = vbYes Then
    Label1.Caption = "Very good!I love you,too!"
ElseIf i = vbNo Then
    Label1.Caption = "Go away! I hate you!"
ElseIf i = vbCancel Then
    Label1.Caption = "God knows!"
End If
End SubPrivate Sub Command2_Click()
End
End Sub

Answer 1

api:shellabout hwnd,title,说明,,icon,
对于你来说，还是自己建个窗体做对话框，
这样一来就可疑方便的改色和字体
换行在vb里用vbnewline

Answer 2

第一个问题:integer是整型,第二个问题:字色和字号好象都不能改,第三个问题:"do you love me?"& chr(13) & chr(10) &"Who are you my pretty sister",试试这样的语句,不行把chr(13)和chr(10)位置对换一下试试,第四个问题:1.用msgbox,2.用input

Answer 3

(1）integer 是什么类型？
是整型(2) 如何改变MsgBox所建立的对话框弹出时所显示字符的字号，字色等？以下是我所作的？请指教。
不能修改（３）如何将"do you love me?"和“who are you my pretty sister”分成两行显示？
"do you love me?" & vbcrlf & “who are you my pretty sister”,也就是加一个换行符