阅读以下应用说明及Visual Basic程序代码,将应填入(n)处的字句写在对应栏内。
【说明】
本应用程序是一个乘法计算器,其运行窗口如图2所示。
在该界面中,“被乘数”、“乘数”以及“积”等文字为标签,相应的3个输入输出数据框为文本框,此外还有3个命令按钮。用户在“被乘数”和“乘数”相应的文本框内输入数据,再单击“运算”按钮,便能在“积”对应的文本框中看到相乘的结果;当用户单击“清除”按钮时,就会清除各文本框中的数据;当用户单击“关闭”按钮时就会关闭该窗口并退出应用程序。用户不能在“积”对应的文本框中输入数据。
【属性设置】
各个对象、有关的属性名以及需要修改的属性值设计如下:
【程序】
Private Sub cmdMultiply_Click( )
txt3. Text =Trim(Str$ ((3)) '加法运算获得和数
End Sub
Private Sub (4) (
txt1. Text=" " '空字符串赋值给文本框txt1的内容
txt2. Text=" " '空字符串赋值给文本框txt2的内容
txt3. Text=" " '空字符串赋值给文本框txt3的内容
End Sub
Private Sub cmdClose_Click( )
(5) '退出应用程序
End Sub
第1题:
●试题八
阅读以下说明及Visual Basic部分程序代码,将应填入(n)处的字句写在答题纸的对应栏内。
【说明】
本程序是一个可进行数制转换的应用程序,图1所示是其运行界面。txtDec为TextBox控件名,Lblkes为转换结果labe1控件名。
【程序代码】
Option Explicit
Private Function convert(pintDec As Intege,pintS As Integer)As String
Dim intCt As Integer,intR As Integer
Dim strCov As String,strRes As String
intR=pintDec Mod pintS
Do While (1)
strCov=strCov & Str(intR)
(2)
intR=pintDec Mod pintS
Loop
For intCt= (3) To 1 Step-1
strRes=strRes & Mid(strCov,intCt,1)
Next intCt
convert=strRes
End Function
Private Sub cmdQuit_Click()′退出
Unload Me
End Sub
Private Sub optBin_Click()′二进制
lblRes.Caption="转换结果:"& (4)
End Sub
Private Sub optHex_Click()′十六进制
lblRes.Caption="转换结果:"& (5)
End Sub
Private Sub optOct_Click()′八进制
lblRes.Caption="转换结果:"&Oct(Val(txtDe
C.Text))
End Sub
第2题:
试题三(共 15 分)
阅读以下说明和 C 程序,将应填入 (n) 处的字句写在答题纸的对应栏内。
第3题:
第4题:
●试题五
阅读以下应用说明、属性设置及Visual Basic程序代码,将应填入(n)处在字句写在答题纸的对应栏内。
【说明】
本应用程序的运行窗口如图2所示。
只要用户单击"闪烁"按钮,文字"欢迎光临"就会以0.3秒消失、0.3秒显示反复进行闪烁;单击"停止"按钮时,闪烁停止,恢复图示的初态。
在开发过程中,需要设置的属性如表1所示。
在开发过程中,需要编写的程序代码如下:
【程序】
Private Sub CmdF_Click()
Timer1. (3) =True
Labe1.Visible=False
End Sub
Private Sub Timer1_Timer()
(4) =not Label.Visible
End Sub
Private Sub CmdT_Click()
Timer1.Enabled= (5)
Labe1.Visible=true
End Sub
●试题五
【答案】(1)false(2)300(3)Enabled(4)Label.Visible(5)false
【解析】单击"闪烁"按钮后,文字才开始闪烁,所以初始时定时器并未启动,(1)处应填false。定时器的时间间隔为0.3秒,即300毫秒,所以(2)处应填300(Interval属性的单位是毫秒)。(3)单击"闪烁"按钮后,应启动定时器,所以修改Timer1的Enable属性为True。(4)定时器到时的时候,应当使Label的是否可见属性(Visible)取反,所以(4)处应填Label.Visible。(5)单击"停止"按钮后,要停止定时器,所以应修改Timer1的Enable属性为false。
第5题: