菁于教,優(yōu)于學(xué)
旗下產(chǎn)品
校本題庫
菁優(yōu)備課
開放平臺(tái)
菁優(yōu)測(cè)評(píng)
菁優(yōu)公式
小優(yōu)同學(xué)
菁優(yōu)App
數(shù)字備考
充值服務(wù)
試卷征集
申請(qǐng)校本題庫
智能組卷
錯(cuò)題庫
五大核心功能
組卷功能
資源共享
在線作業(yè)
在線測(cè)評(píng)
試卷加工
游客模式
登錄
試題
試題
試卷
課件
試卷征集
加入會(huì)員
操作視頻
高中信息
小學(xué)
數(shù)學(xué)
語文
英語
奧數(shù)
科學(xué)
道德與法治
初中
數(shù)學(xué)
物理
化學(xué)
生物
地理
語文
英語
道德與法治
歷史
科學(xué)
信息技術(shù)
高中
數(shù)學(xué)
物理
化學(xué)
生物
地理
語文
英語
政治
歷史
信息
通用
中職
數(shù)學(xué)
語文
英語
推薦
章節(jié)挑題
知識(shí)點(diǎn)挑題
智能挑題
收藏挑題
試卷中心
匯編專輯
細(xì)目表組卷
組卷圈
當(dāng)前位置:
2015年江蘇省信息技術(shù)專題練習(xí):VB程序設(shè)計(jì)(3)
>
試題詳情
在VB中,下列關(guān)于CommandButton 控件的敘述,正確的是( ?。?/h1>
A.CommandButton 控件的Caption 屬性決定按鈕上顯示的內(nèi)容
B.程序運(yùn)行時(shí)單擊CommandButton按鈕,則系統(tǒng)激發(fā)該控件對(duì)應(yīng)的Change事件
C.CommandButton 控件的name 屬性決定按鈕上顯示的內(nèi)容
D.CommandButton 控件的顏色是不可以改變的
【考點(diǎn)】
對(duì)象的屬性、方法和事件
.
【答案】
A
【解答】
【點(diǎn)評(píng)】
聲明:本試題解析著作權(quán)屬菁優(yōu)網(wǎng)所有,未經(jīng)書面同意,不得復(fù)制發(fā)布。
當(dāng)前模式為游客模式,
立即登錄
查看試卷全部內(nèi)容及下載
發(fā)布:2024/5/27 14:0:0
組卷:9
引用:4
難度:0.7
相似題
1.
角谷靜夫是日本的一位著名學(xué)者,他提出了兩條極簡單的規(guī)則,可以對(duì)任何一個(gè)自然數(shù)進(jìn)行變換,最終使它陷入“4-2-1”的死循環(huán).變換規(guī)則:對(duì)任意一個(gè)大于1的正整數(shù)n,若n是奇數(shù),n的值替換為3n+1,若n是偶數(shù),n的值替換為n/2;重復(fù)以上運(yùn)算,n最終變?yōu)?.后人稱為“角谷猜想”.使用Visual Basic驗(yàn)證這個(gè)猜想.程序界面如圖1所示.在文本框Text1中輸入一個(gè)正整數(shù),單擊“驗(yàn)證”按鈕“Command1”,在列表框List1中輸出每一步的運(yùn)算過程.
(1)要在圖1中的程序界面上添加箭頭指向的對(duì)象,需要在圖2中選擇
(填字母:A/B/C).
(2)為實(shí)現(xiàn)上述功能,請(qǐng)?jiān)跈M線處填入合適的代碼或選項(xiàng).
Private Sub Command1_Click
Dim n As Integer,i As Integer
'(填代碼)
List1.Clear'清除列表框List1中的內(nèi)容
If Int(n)<>n Or n<=1Then
List1.AddItem“請(qǐng)輸入大于1的正整數(shù)!”
Else
i=0
Do While
'(填字母)
If n Mod 2=0Then
n=
'(填字母)
Else
n=n*3+1
End If
i=i+1
List1.AddItem Str(i)+“”+Str(n)
Loop
End If
End Sub
劃線②、③處的選項(xiàng):
A.n\2B.int(n)
C.n<>1D.n=1.
發(fā)布:2024/10/26 17:0:2
組卷:11
引用:1
難度:0.1
解析
2.
編寫VB程序,實(shí)現(xiàn)如下功能:對(duì)于任意一個(gè)正整數(shù),如果是奇數(shù),則乘3加1,如果是偶數(shù),則除以2,得到的結(jié)果再按照上述規(guī)則重復(fù)處理,最終總能夠得到1.如,假定初始整數(shù)為5,計(jì)算過程分別為16、8、4,、2、1.
程序要求輸入一個(gè)整數(shù)到Text1,單擊命令按鈕Command1,將經(jīng)過處理得到1的過程輸出到List1上面,運(yùn)行效果如圖2所示.
(1)如果將窗體左上角標(biāo)題“Form1”改為“角谷猜想”,可將Form1的
屬性的屬性值改為“角谷猜想”.
(2)為實(shí)現(xiàn)上述功能,請(qǐng)?jiān)跈M線處填入合適代碼.
Private Sub Command1_Click ( ?。?br />Dim x As Long
x=Val(Text1.Text)'將text1中的內(nèi)容賦值給x
Do While x<>1
If
Then'x為奇數(shù)的情況
x=x*3+1
Else'x為偶數(shù)的情況
x=
List1.AddItem“x=“& Str(x)'將x的變化添加到list1上
Loop
End Sub
橫線處①應(yīng)填入
,劃線②應(yīng)填入
(3)運(yùn)行程序是,發(fā)下如2圖所示錯(cuò)誤,原因可能是
(選填:程序缺少Do/程序缺少End If).
發(fā)布:2024/10/26 17:0:2
組卷:7
引用:1
難度:0.1
解析
3.
小李想用vb制作一個(gè)分鐘倒計(jì)時(shí)器,界面如圖所示.先在文本框text1中輸入分鐘數(shù),然后在文本框text2中輸入秒鐘數(shù),再點(diǎn)擊“開始倒計(jì)時(shí)”按鈕開始倒計(jì)時(shí).Vb程序如下:
Private Sub Command1_Click ( ?。?br />Timer1.Enabled=
End Sub
Private Sub Timer1_Timer ( ?。?br />sec=Val(Text2.Text)
min=Val(Text1.Text)
If sec>0Then
sec=sec-1
Else
sec=59
If min>0Then
min=min-1
Else
Text1=0
Text2=0
MsgBox“倒計(jì)時(shí)時(shí)間到“
End If
End If
Text1=min
Text2=sec
End Sub
(1)程序中①處應(yīng)該填
.
(2)計(jì)時(shí)器timer1的inteval屬性應(yīng)該設(shè)置為
.
發(fā)布:2024/6/27 10:35:59
組卷:5
引用:1
難度:0.3
解析
把好題分享給你的好友吧~~
商務(wù)合作
服務(wù)條款
走進(jìn)菁優(yōu)
幫助中心
兼職招聘
意見反饋
深圳市菁優(yōu)智慧教育股份有限公司
粵ICP備10006842號(hào)
公網(wǎng)安備44030502001846號(hào)
?2010-2024 jyeoo.com 版權(quán)所有
深圳市市場(chǎng)監(jiān)管
主體身份認(rèn)證
APP開發(fā)者:深圳市菁優(yōu)智慧教育股份有限公司 | 應(yīng)用名稱:菁優(yōu)網(wǎng) | 應(yīng)用版本:4.8.2 |
隱私協(xié)議
第三方SDK
用戶服務(wù)條款
廣播電視節(jié)目制作經(jīng)營許可證
出版物經(jīng)營許可證
網(wǎng)站地圖
本網(wǎng)部分資源來源于會(huì)員上傳,除本網(wǎng)組織的資源外,版權(quán)歸原作者所有,如有侵犯版權(quán),請(qǐng)立刻和本網(wǎng)聯(lián)系并提供證據(jù),本網(wǎng)將在三個(gè)工作日內(nèi)改正