相对优越性
参考答案：
是指人们认为某项创新比被其所代替的原有创新优越的程度。
如图所示，在列表框List1中已经有若干人的简单信息，运行时在Text1文本框（即“查 找对象”右边的文本框）输入一个姓或姓名，单击“查找”按钮，则在列表框中进行查 找，若找到，则把该人的信息显示在Text2文本框中。若有多个匹配的列表项，则只显 示第1个匹配项；若未找到，则在Text2中显示“查无此人”。请填空。
Private Sub Command1_Click()Dim k As Integer, n As Integer, found As Boolean found = Falsen = Len( _________)k = 0While k < List1.ListCount And Not foundIf Text1 = Left$(List1.List(k), n) ThenText2 = _________found = True End If k = k + 1Wend If Not found ThenText2 = "查无此人" End If End Su
用完整形式回答问题。
1. Do you like music?
2. Can your parents speak English?
3. What can you do?
4. Can you play the violin?
5. Do you want to join a music club?
Private Sub Command1_Click()Dim k As Integer, n As Integer, found As Boolean found = Falsen = Len( _________)k = 0While k < List1.ListCount And Not foundIf Text1 = Left$(List1.List(k), n) ThenText2 = _________found = True End If k = k + 1Wend If Not found ThenText2 = "查无此人" End If End Su