給定n個(gè)學(xué)生成績,篩選男生或女生中成績居前百分之k的學(xué)生。篩選規(guī)則如下:m=男生或女生記錄數(shù)×k%,若m<1,則m取1;否則m向下取整,如m=3.1,則篩選最大的3項(xiàng)。若有數(shù)據(jù)和第m項(xiàng)的值相同,則一起篩選出。如有男生成績分別是“78,99,98,99,90”,以“最大10百分比”篩選,則5×10%=0.5,篩選最大的1項(xiàng),篩選出“99,99”。編寫一個(gè)VB程序,實(shí)現(xiàn)上述功能。程序運(yùn)行時(shí),在列表框List1中顯示n名學(xué)生的姓名、性別和成績,在文本框Text1中輸入性別,Text2中輸入k,單擊“篩選”按鈕Command1,在列表框List2中顯示篩選出的學(xué)生姓名、性別和成績。程序運(yùn)行界面如圖所示。
(1)下列VB語句可以實(shí)現(xiàn)清空文本框Text1 CC(A.Text1.Clear/B.Text1.Caption=““/C.Text1.Text=““)
(2)實(shí)現(xiàn)上述功能的VB程序如下,請(qǐng)?jiān)冖佗冖厶幪钊牒线m代碼 c=c+1c=c+1、Fix(m)或Int(m)或Fix(c*k/100)或Int(c*k/100)Fix(m)或Int(m)或Fix(c*k/100)或Int(c*k/100)、mm=i-1mm=i-1。
(3)程序加框處的代碼有誤,請(qǐng)改正 xb(p)<>sOrcj(j)>cj(p)xb(p)<>sOrcj(j)>cj(p)。
Dim n As Integer
Dim xm(1 To n)As String
Dim xb(0 To n)As String
Dim cj(0 To n)As Integer
Private Sub Form_Load( ?。?br />'讀取學(xué)生姓名、性別和成績分別存xm、xb和cj數(shù)組,并在列表框List1中顯示。
'學(xué)生人數(shù)存變量n,代碼略。
End Sub
Private Sub Commandl_Click0
Dim s As String,k As Single,m As Single,mm As Integer
DimcAs Integer,p As Integer,iAs Integer,j As Integer
Dim tl As String,t2 As Integer
s=Textl.Text
k=Val(Text2.Text)
c=0
For i=1To n
If xb(i)=sThen ①_____
Next i
m=c*k/100
If m<1Then
mm=1
Else
mm=②____
End If
i=1
Do While i<=n
p=i
For j=i+1To n
If xb (j)=s Then
If Then p=j
End If
Next j
If i◇p Then
t1=xb(i):xb(i)=xb(p):xb(p)=tl
2=cj(i):cjii)=cj(p):cj(p)=t2
End If
If i>mm And(xb(i)◇xb(i-1)Or cj(i)◇cj(i-1))Then Exit Do
i=i+l
Loop
③_____
For i=1To mm
List2.Addtem xm(i)+““+xb(i)+““+Str(cj(i))
Nexti
End Sub
【考點(diǎn)】應(yīng)用程序的試運(yùn)行和保存.
【答案】C;c=c+1;Fix(m)或Int(m)或Fix(c*k/100)或Int(c*k/100);mm=i-1;xb(p)<>sOrcj(j)>cj(p)
【解答】
【點(diǎn)評(píng)】
聲明:本試題解析著作權(quán)屬菁優(yōu)網(wǎng)所有,未經(jīng)書面同意,不得復(fù)制發(fā)布。
發(fā)布:2024/6/27 10:35:59組卷:1引用:1難度:0.3
相似題
-
1.有如下VB程序段:
執(zhí)行該程序段后,變量c的值是( )發(fā)布:2024/12/16 5:0:1組卷:1引用:2難度:0.3 -
2.由大寫字母組成的長度相同的兩個(gè)字符串s1和s2,檢測各字母的數(shù)量,如“ABDAC”與“AABCD”所含字母數(shù)量一樣,與“AABBC”所含字母數(shù)量不一樣。實(shí)現(xiàn)該功能的VB程序段如下:
填空處的代碼可以由以下部分組成:
①Text2.Text ②val(Text2.Text) ③b(a)=b(a)+1 ④b(a)=b(a)-1 ⑤b(i)<>0⑥b(i)=0
代碼順序正確的是( )發(fā)布:2024/12/16 9:30:1組卷:3引用:3難度:0.4 -
3.小明用python語言中對(duì)大小為100*100像素的圖像“上.jpg”(如圖所示)進(jìn)行簡單處理,部分代碼如圖:
程序執(zhí)行后的圖像效果是( )發(fā)布:2024/12/20 9:30:2組卷:3引用:5難度:0.4
把好題分享給你的好友吧~~