填空题

窗体上有两个控件：一个是驱动器列表框Drive1，另一个是目录列表框Dir1，现在要使目录列表框跟随驱动器列表框的变化而变化，则需在Drive1_Change事件过程中填入语句 【7】 。

【参考答案】

Dir1．Path=Drive1．Drive
<上一题 目录 下一题>
热门 试题

填空题
在窗体上画一个名称为Combo1的组合框，画两个名称分别Labe11和Labe12及Caption属性分别为“城市名称”和空白的标签。程序运行后，当在组合框中输入一个新项后按(Enter)键(ASCII码为13)时，如果输入的项在组合框的列表中不存在，则自动添加到组合框的列表中，并在Labe12中给出提示“已成功添加输入项”，如图20-3所示；如果存在，则在Labe12中给出提示“输入项已在组合框中”。请在【8】、【9】和【10】处将程序补充完整。Private Sub Combo1 【8】 (KeyAscii As Integer)If KeyAscii=13 ThenFor i=0 To Combo1；ListCount-1 If Combo1．Text= 【9】 ThenLabe12．Caption= 输入项已在组合框中 Exit SubEnd IfNext iLabe12．Caption= 已成功添加输入项 Combo1． 【10】 Combo1．TextEnd IfEnd Sub
填空题
下列程序实现的功能是：当在窗体上单击时，将随机产生100个3位数，并把它们写到D盘根目录下的文件myfile1．Dat中。Private Sub Form_Click()Dim k As IntegerOpen 【13】 RandomizeFor i=1 To 10k=100+Int(899*Rnd)【14】 Next i【15】 End Sub
相关试题