单选题
窗体上有一个列表框和一个文本框，编写下列两个事件过程：
窗体上有一个列表框和一个文本框，编写下列两个事件过程：
Private Sub Form．Load（ ）
List1．AddIte m＂北京＂
List1．AddIte m＂天津＂
List1．AddIte m＂上海＂
Textl ．Text ＝＂＂
End Sub
Private Sub List1．Click（ ）
Print Textl ．Text ＋List1．Text
End Sub
程序运行后，在文本框中输入"中国"，然后单击列表框中的"北京"，则输出结果是（ ）。
发布于 2022-05-11 09:58:43
登录后免费查看答案
关注者
0
被浏览
11
1 个回答
推荐阅读
-
在窗体上画一个列表框和一个命令按钮，其名称分别为List1和Co mmand1，然后编写如下事件过程：Private Sub Form＿Load（）List1．AddIte m＂Ite m1＂List1．AddIte m＂Ite m2＂List1．AddIte m＂Ite m3＂End SubPrivate Sub Co mmand1＿Click（）List1．List（List1．ListCount）＝＂AAAA＂End Sub程序运行后，单击命令按钮，其结果为（ ）。
2022-05-11 关注 0 浏览11 1答案
-
在窗体上画一个列表框和一个命令按钮，其名称分别为List1和Command1，然后编写如下事件过程：Private Sub Form_Load()List1.AddItem "Item 1"List1.AddItem "Item 2"List1.AddItem "Item 3"End SubPrivate Sub Command1_Click()List1.List(List1.ListCount) = "AAAA"End Sub程序运行后，单击命令按钮，其结果为
2022-05-11 关注 0 浏览11 1答案
-
设窗体上有一个名为List1的列表框，并编写下面的事件过程：Private Sub List1_Click（ ）Dim ch As Stringch=List1．List(List1．Listlndex)List1．RemoveItem List1．ListlndexList1．Addltem chEnd Sub程序运行时，单击一个列表项，则产生的结果是（ ）。
2022-05-11 关注 0 浏览14 1答案
-
在窗体上画一个文本框和一个图片框，然后编写如下两个事件过程：Private Sub Form_Click()Text1.Text = "VB程序设计"End SubPrivate Sub Text1_Change()Picture1.Print "VB Programming"End Sub程序运行后，单击窗体，则在文本框中显示的内容是 ______ ，而在图片框中显示的内容是 ______ 。
2022-05-11 关注 0 浏览18 1答案
-
在窗体上画一个文本框和一个图片框，然后编写如下两个事件过程：Private Sub Form_Load()Text1.Text=”计算机”End SubPrivate Sub Text1_Change()Picture1.Print“等级考试”End Sub 程序运行后，在文本框中显示的内容是______ ，而在图片框中显示的内容是______。
2022-05-11 关注 0 浏览9 1答案
-
在窗体上画一个名称为Lable1的标签和一个名称为List1的列表框。程序运行后，在列表框中添加若干列表项。当双击列表框中的某个项目时，在标签Label1中显示所选中的项目。请在 [14] 和 [15] 处填入适当的内容将程序补充完整。Private Sub Form_load()List1.AddItem”北京”List1.AddItem”上海”List1.AddItem”湖北”End SubPrivate Sub ______ ()Label1.Caption= ______End Sub
2022-05-11 关注 0 浏览12 1答案
-
在窗体上画两个文本框，其名称分别为Text1和Text2，然后编写如下程序：Private Sub Form_Load()ShowText1.Text = ""Text2.Text = ""Text1.SetFocusEnd SubPrivate Sub Text1_Change()Text2.Text = Mid(Text1.Text, 8)End Sub程序运行后，如果在文本框Text1中输入BeijingChina，则在文本框Text2中显示的内容是
2022-05-11 关注 0 浏览17 1答案
-
设窗体上有一个名为Text1的文本框，并编写如下程序：Private Sub Form_Load()ShowText1.Text = ""Text1.SetFocusEnd SubPrivate Sub Form_MouseUp(Button As Integer, _Shift As Integer, X As Single, Y As Single)Print "程序设计"End SubPrivate Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer)Print "Visual Basic";End Sub程序运行后，如果在文本框中输入字母“a”，然后单击窗体，则在窗体上显示的内容是
2022-05-11 关注 0 浏览16 1答案
-
在窗体（Name 属性为Form1）上画两个文本框（其Name 属性分别为Text1和Text2）和一个命令按钮（Name属性为Co mmand1），然后编写如下两个事件过程：Private Sub Co mmand1＿Click（）a＝Text1．Text ＋Text2．Text Print aEnd SubPrivate Sub Form＿Load（）Text1．Text ＝＂＂ Text2．Text ＝＂＂End sub程序运行后，在第一个文本框（Text1）和第二个文本框（Text2）中分别输入123和321，然后单击命令按钮，则输出结果为（ ）。
2022-05-11 关注 0 浏览15 1答案
-
在窗体上画一个命令按钮和一个文本框(名称分别为Command1和Text1)，并把窗体的KeyPreview属性设置为True，然后编写下列代码：Dim SaveAll As StringPrivate Sub Form Load（ ）ShowText1．Text=""Text1．SetFocusEnd SubPrivate Sub Command1 Click（ ）Text1．Text=LCase(SaveAll)+SaveAllEnd SubPrivate Sub Form KeyPress(KeyAscii As Integer)SaveAll=SaveAll+Chr(KeyAscii)End Sub程序运行后，直接用键盘输入VB，再单击命令按钮，则文本框中显示的内容为（ ）。
2022-05-11 关注 0 浏览15 1答案
