中职电子与信息：VB技能模块模拟考题14.docx
-
资源ID：93851139
资源大小：12.32KB
全文页数：2页
- 资源格式： DOCX
下载积分：15金币
快捷下载
会员登录下载
微信登录下载
三方登录下载：
微信扫一扫登录
|
友情提示
2、PDF文件下载后，可能会被浏览器默认打开，此种情况可以点击浏览器菜单，保存网页到桌面，就可以正常下载了。
3、本站不支持迅雷下载，请使用电脑自带的IE浏览器，或者360浏览器、谷歌浏览器下载即可。
4、本站资源下载后的文档和图纸-无水印,预览文档经过压缩，下载后原文更清晰。
5、试题试卷类文档，如果标题没有明确说明有答案则都视为没有答案，请知晓。
|
中职电子与信息：VB技能模块模拟考题14.docx
VB技能模块模拟考题十四1 .创建如图1的界面，要求足球作上下运动。2 .操作要求：（1）创建图1的界面；设置相关的属性：垂直滚动条的最小值与最大值为50-1000（2）单击“开始”按钮，定时器间隔时间由垂直滚动条的Value的值来决定，定时器工作，并 且命令按钮的标题变成“停止”，单击“停止”，定时器工件停止。（3）定时器事件每按一定时间将作足球上下运动；Dimf%Private Sub Command 1 _Click()Timer 1.Interval =If ThenCommand 1 .Caption = "停止”Timer 1.Enabled = TrueElseCommand 1 .Caption ="开始”End IfEnd SubPrivate Sub Timerl_Timer()If Image l.Top >= Form 1.Height - Image 1.Height ThenElself Image 1 .Top <= 0 Thenf=0End IfIf f = 1 ThenImagel.Top = Imagel.Top - 500ElseImagel.Top =End IfEnd Sub.将一张100元钞票兑换成面值分别为20元、10元和5元的钞票，要求每种至少有一张，共有多 少种不同的换法并输出所有可能的换法。操作要求：（1）创建如图2的界面，设置相关的属性；（2）单击窗体后，在窗体上显示结果如图2所示。白芬举法案例一20元10兀5兀11141212131014156161721102223242531323341一共有16换法2 .求既是回文数又是素数的所有三位整数。操作要求：（1）将文本框设置多行并垂直滚动条；（2）单击“回文数与素数”按钮，在文本框中显示结果3；（完成填空）Dim f%, a%, c%For i = 100 To 999f=For j = 2 To i - 1If Then f = 1: Exit ForNext j a =c =If ThenText!.Text = Text 1.Text + Str(i) End IfNext i
