执行下面的程序段，x的值为【】。　　Private Sub Command1_Click()　　　For i=1 To 9　　　　　a=a + i　　　Next i　　　x=Val(i)　　　MsgBox x　　End Sub

受入境检疫的船舶，必须按规定悬挂检疫信号等候查验( )