Private Sub Form_Click() Dim i As Integer, k As Integer k = 0 For i = 1 To 4 If i > 2 Then k = k

1. 【加试题】小张同学设计一个“簡单数据筛选”程序程序启动时运行界面如第17题图所示。程序运行时列表框List1中产生15个随机整数在文本框Text1中输入筛选条件(大于或小于某个数)后单击“筛选”按钮Command1,右边列表框List2中显示符合筛选条件的数据同时标签Label2上显示符合条件的数据个数。

实现上述功能的VB程序如下但加框处代码有错误,请改正

Dim f String 'f存放筛选天健的符号部分:大于号或者小于号

我要回帖

更多关于 I。 的文章

 

随机推荐