单选题
在窗体上画一个列表框和一个命令按钮，其名称分别为List1和Command1，然后编写如下事件过程：
在窗体上画一个列表框和一个命令按钮，其名称分别为List1和Command1，然后编写如下事件过程：
Private Sub Form_Load()
List1.AddItem "Item 1"
List1.AddItem "Item 2"
List1.AddItem "Item 3"
End Sub
Private Sub Command1_Click()
List1.List(List1.ListCount) = "AAAA"
End Sub
程序运行后，单击命令按钮，其结果为
发布于 2022-05-11 10:19:25
登录后免费查看答案
关注者
0
被浏览
12
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答案
-
在窗体上画一个名称为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答案
-
设窗体上有一个名为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．Load（ ）List1．AddIte m＂北京＂List1．AddIte m＂天津＂List1．AddIte m＂上海＂Textl ．Text ＝＂＂End SubPrivate Sub List1．Click（ ）Print Textl ．Text ＋List1．TextEnd Sub程序运行后，在文本框中输入"中国"，然后单击列表框中的"北京"，则输出结果是（ ）。
2022-05-11 关注 0 浏览10 1答案
-
在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程：Private Sub Command1_Click()a = 12345Print Format$(a, "000.00")End Sub程序运行后，单击命令按钮，窗体上显示的是
2022-05-11 关注 0 浏览12 1答案
-
窗体上有List1、List2两个列表框，List1中有若干列表项(见图)，并有下面的程序：Private Sub Command1_Click（ ）For k=List1．ListCout-1 To 0 Step-1If List1．Selected(k)ThenList2．Addltem List1．List(k)List1．Removeltem kEnd IfNext kEnd Sub 程序运行时，按照图示在List1中选中2个列表项，然后单击Command1命令按钮，则产生的结果是（ ）。
2022-05-11 关注 0 浏览19 1答案
-
窗体上有list1、list2两个列表框，list1中有若干列表项(见图)，并有下面的程序： private sub comand1_click()for k=list1.listcount-1 to 0 step -1if list1.selected(k) thenlist2.additem list1.list(k)list1.removeitem kend ifnext kend sub程序运行时，按照图示在list1中选中2个列表项，然后单击commandl命令按钮，则产生的结果是
2022-05-11 关注 0 浏览14 1答案
-
在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：Private Sub Command1_Click()a$="VisualBasic"Print String(3,a$)End Sub程序运行后，单击命令按钮，在窗体上显示的内容是
2022-05-11 关注 0 浏览21 1答案
-
在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：Private Sub Command1_Click()Move 500，500End Sub程序运行后，单击命令按钮，执行的操作为
2022-05-11 关注 0 浏览11 1答案
-
Private Sub Command1_Click() Call MoveAllEnd SubPublic Sub MoveItem(L1 As ListBox, L2 As ListBox)' L2.AddItem ?' L2.AddItem L1.Text L2.AddItem L1.List(L1.ListIndex)' L1.RemoveItem ? L1.RemoveItem L1.ListIndexEnd SubPublic Sub MoveAll()' For i = 0 To ? For i = 0 To List1.ListCount - 1 List2.AddItem List1.List(i) NextEnd SubPrivate Sub List1_DblClick()' Call MoveItem(?) Call MoveItem(List1, List2)End Sub
2022-05-11 关注 0 浏览30 1答案
