下面程序运行后,在文本框Text1中输入6并按回车键后,写出文本框中显示的内容。
60
程序运行后,当在组合框中输入一个新项目后按回车时,如果输入的项目在组合框列表中不存在,则自动添加到组合框列表中,并在label2中显示“成功添加新项目!”(界面如下图所示);若该项目存在,则显示“输入项目已存在!”。
执行下面程序,单击命令按钮Command1后,窗体上显示的内容是()。 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