那是系统函数,不能这样用的,你可以用Private Sub Form_Load()Text1.Text = InputBox("对话框标题")End Sub也可以把"Text1.Text"改成"Form1.Caption"一切就OK了!