Para uma pergunta diferente, devias era abrir um tópico novo
Tirar o Cancel não. Só se fizeres subclassing, mas acredita, é bem mais fácil recriares a inputbox num novo form.
No entanto, é possível detectar o Cancel. Assim,
Código:
Private Sub Form_Load()
Dim resposta
resposta = InputBox("Pergunta", "Titulo", "Default")
If StrPtr(resposta) = 0 Then
MsgBox "Cancel"
Else
MsgBox resposta
End If
End Sub
Este código distingue um OK com uma string vazia de um Cancel. Num nível mais extremo,
Código:
Private Sub Form_Load()
Dim resposta
Do
resposta = InputBox("Pergunta", "Titulo", "Default")
Loop While StrPtr(resposta) = 0
End Sub