在窗体上添加1个文本框Txt1;1个列表框Lst1,列表框中有4项选项条目,分别为“兰州理工大学”、“兰州交通大学”、“兰州大学”和“西北师范大学”;2个命令按钮Cnd1和Cnd2。程序运行后,单击【添加】按钮,将文本框中的内容添加到列表框的首行,文本框的内容清空,如果文本框中没有内容,则给出提示“无法添加,请在文本框中输入添加内容”; 单击【删除】按钮,将列表框中选中的项目(单击列表框中需要删除的选项后,其内容应出现在文本框内)删除,文本框的内容清空,如果没有选择要删除的选项,则给出提示“请选择要删除的选项”。程序运行界面如图所示。保存工程和窗体,窗体文件名为:昵称-9-2.frm;工程名为:昵称-9-2.vbp。将工程文件和窗体文件压缩成:昵称-9-2.rar,以附件形式提交。
第1题
A.Enabled
B.Visible
C.Interval
D.Timer
第2题
Private Sub Command1_Click()
txt3=txt1+txt2
End Sub
Private Sub Form. l_Load()
txt1=" "
txt2=" "
txt3=" "
End Sub
当打开窗体Form. 1后,在txt1和txt2中分别输入3和5,然后单击命令按钮Command1,则文本框txt3中显示的内容为______。
第3题
Private Sub Commandl_Click()
txt3=txt1+txt2
End Sub
Private Sub Form1_Load()
txt1=""
txt2=""
txt3=""
End Sub
当打开窗体Form1后,在txt1和txt2中分别输入3和5,然后单击命令按钮Commandl,则文本框txt3中显示的内容为_
第4题
A.1245
B.456123
C.123456
D.0
第5题
Private Sub Form_Load()
List1.AddItem"357"
List1.AddItem"246"
List1.AddItem"123"
List1.AddItem"456"
Text1.Text=""
End Sub
Private Sub List1 DblClick()
m=List1.Text
Print m+Text1.Text
End Sub
程序运行后,在文本框中输入“123”,然后双击列表框中的"456",输出结果是( )。
A.1245
B.456123
C.123456
D.0
第6题
Private Sub Form_Load()
For i=1 To 100
If i Mod 7 =0 Then
________
End If
Next
End Sub
Private Sub Command1_Click()
Sum = 0
For i = 0 To ________
Sum = Sum + ________
Next
Text1.Text = Sum
End Sub
第7题
第8题
A. Geffocus
B. Click
C. Change
D. LostFocus
第9题
A.Geffocus
B.Click
C.Change
D.LostFocus
为了保护您的账号安全,请在“上学吧”公众号进行验证,点击“官网服务”-“账号验证”后输入验证码“”完成验证,验证成功后方可继续查看答案!