题目详情
当前位置:首页 > 职业培训考试
题目详情:
发布时间:2023-10-22 21:19:10

[填空题]在Visual Basic 程序启动运行中设置一个封面窗口,显示一些有意义的信息,要求显示时间5秒。
Sub dlys(ByVal n As Single)
Dim tl As Single
Dim t2 As Single
t1 = Timer
Do
t2 = Timer
If t2 < t1 Then t2 = t2 + 86400
If t2 - tl > n Then Exit Do
【12】
Loop
End Sub
Sub main( )
Form2. Show
dlys 【13】
【14】
Form1. Show
End Sub

更多"在Visual Basic 程序启动运行中设置一个封面窗口,显示一些有"的相关试题:

[填空题]在Visual Basic 程序启动运行中设置一个封面窗口,显示一些有意义的信息,要求显示时间5秒。
Sub dlys(ByVal n As Single)
Dim tl As Single
Dim t2 As Single
t1 = Timer
Do
t2 = Timer
If t2 < t1 Then t2 = t2 + 86400
If t2 - tl > n Then Exit Do
【12】
Loop
End Sub
Sub main( )
Form2. Show
dlys 【13】
【14】
Form1. Show
End Sub
[单项选择]Visual Basic是开发Windows应用程序的良好工具。Visual Basic是一种 (6) 驱动的程序语言,在程序内必须设计各种 (6) 的处理程序码,当此 (6) 发生时,随即执行相应的程序码。在程序设计时,设计人员可使用Visual Basic所提供的 (7) 建立用户界面,从而大大提高程序设计效率。

A. 指令
B. 事件
C. 数据
D. 过程
[简答题]分析以下Visual Basic程序,其运行结果为______。
Private Sub Form_Click( )
score=Int(Rnd*10)+80
Select Case score
Case Is<60
A$="F"
Case 60 To 69
A$="D"
Case 70 To 79
A$="C"
Case 80 To 89
A$="B"
Case Else
A$="A"
End Select
Print A
End Sub
[填空题]Visual Basic程序在运行过程中,用户可通过按 【8】 键进入中断状态。
[单项选择]

下面程序运行时,若输入“Visual Basic Programming”,则在窗体上输出的是()
  Private Sub Comand1_Click( )
  Dim count(25) As Integer, ch As String
  ch=Ucase(InputBox("请输入字母字符串"))
  For k=1 To Len(ch)
  n=Asc(Mid(ch,k,1))-Asc("A")
  If n>=0 Then
  Count(n)=Count(n)+ 1
  End If
  Next k
  m=count(0)
  For k=1 To 25
  If m< p>
  m=count(k)
  End If
  Next k
  Print m
  End Sub


A. 0
B. 1
C. 2
D. 3
[填空题]在Visual Basic中,要显示程序代码,必须在______窗口;要设计程序的运行界面必须在______窗口。
[填空题]为了把一个Visual Basic应用程序装入内存,只要装入 (11) 文件即可。
[单项选择]下面程序运行时,若输入“Visual Basic Programming”,则在窗体上输出的是( )。
Private Sub Command1_Click( )
Dim count(25) As Integer, ch As String
ch = UCase(InputBox("请输入字母字符串"))
For k=1 To Len(ch)
n = Asc(Mid (ch, k, 1)) - Asc("A")
If n > = 0 Then
count (n) = count (n) + 1
End If
Next k
m = count(0)
For k=1 To 25
If m < count(k) Then
m = count (k)
End If
Next k
Print m
End Sub
A. 0
B. 1
C. 2
D. 3
[单项选择]下面程序运行时,若输入“Visual Basic Prograrmming”,则在窗体上输出的是( )
Private Sub Command1_Click( )
Dim count(25)As Integer,ch As String
ch=Ucase(InputBox("请输入字母字符串"))
For k=1 To Len(ch)
n=Asc(Mid(ch,k,1))-Asc("A")
If n>=0 Then
count(n)一count(n)+1
End If
Next k
m=count(0)
For k=1 To 25
If m<count(k) Then
m=count(k)
End If
Next k
Print m
End Sub
A. 0
B. 1
C. 2
D. 3
[填空题]Visual Basic允许一个变量未加定义直接使用,这样Visual Basic即把它当作______类型的变量;若使用Dim语句定义这种类型的变量,则As后面应该使用______关键字。
[判断题]利用Visual Basic开发程序的基本过程是:建立用户界面对象;为各对象设置属性值;为相关对象的相关事件编制事件驱动程序;运行程序。( )
[填空题]为了把一个Visual Basic应用程序装入内存,只要装入______文件即可。
[单项选择]为了保存一个Visual Basic应用程序,下列说法中正确的是______。
A. 只保存窗体模块文件(.frm)
B. 只保存工程文件(.vbp)
C. 分别保存工程文件和标准模块文件(.has)
D. 分别保存工程文件、窗体文件和标准模块文件
[单项选择]用Visual Basic编写的应用程序的特点是( )。
A. 无须有明显的开头程序和结尾部分
B. 无须编写任何程序代码
C. 必须有明确的开头程序才能启动运行
D. 必须有结尾的程序段才能正常运行

我来回答:

购买搜题卡查看答案
[会员特权] 开通VIP, 查看 全部题目答案
[会员特权] 享免全部广告特权
推荐91天
¥36.8
¥80元
31天
¥20.8
¥40元
365天
¥88.8
¥188元
请选择支付方式
  • 微信支付
  • 支付宝支付
点击支付即表示同意并接受了《购买须知》
立即支付 系统将自动为您注册账号
请使用微信扫码支付

订单号:

请不要关闭本页面,支付完成后请点击【支付完成】按钮
恭喜您,购买搜题卡成功
重要提示:请拍照或截图保存账号密码!
我要搜题网官网:https://www.woyaosouti.com
我已记住账号密码