下面程序運(yùn)行后,在文本框Text1中輸入6并按回車鍵后,寫出文本框中顯示的內(nèi)容。
60
程序運(yùn)行后,當(dāng)在組合框中輸入一個(gè)新項(xiàng)目后按回車時(shí),如果輸入的項(xiàng)目在組合框列表中不存在,則自動(dòng)添加到組合框列表中,并在label2中顯示“成功添加新項(xiàng)目!”(界面如下圖所示);若該項(xiàng)目存在,則顯示“輸入項(xiàng)目已存在!”。
執(zhí)行下面程序,單擊命令按鈕Command1后,窗體上顯示的內(nèi)容是()。 Private Sub Command1_Click() Dim x As Integer,y As Integer x=-5 If Sgn(x)Then y=Sgn(x^2) Else y=Sgn(x) End If Print y End Sub