VB小题求赐教

1.选择题
(1)当文本框的内容发生变化时,必将触发( )事件。
A.LostFocus B.KeyPress
C.Change D.Click
(2)在Visual Basic中,建立一个文本编辑区域,可采用下列( )。
A.命令按钮 B.标签控件
C.文本控件 D.定时器控件
(3)要把光标移到文本框Text1上,以便接收输入数据,正确的命令是( )。
A.Text1.LostFocus B.Text1.GotFocus
C.Text1.SetFocus D.GotFocus.Text1
(4)在VB中,通过改变下面( )属性,可以改变按钮控件上的文字。
A.Caption B.Font
C.ForColor D.Alignment
(5)在Visual Basic中,设置控件的大小,可改变下列( )属性。
A.Height 与Width B.Height 与Top
C.Left 与Top D.Left 与 Width
(6)在Visual Basic中,下列( )程序行是对的。
A.X – 5 = Y = 5 B.A + B = C ^ 3
C.Y = 1 :Y = Y + 1 D.I = 5 ;I = “X10”
(7)要使一个控件在运行时无效,正确的设置是( )。
A. 把属性Enabled设置为True
B. 把属性Enabled设置为False
C. 把属性Visibled设置为True
D. 把属性Visibled设置为False
(8)能够改变标签(Label)控件显示标题的属性是( )。
A.Name B.Text
C.Caption D.Click
(9)为了给x,y,z三个变量赋初值1,下面正确的赋值语句是( )。
A. x=1∶y=1∶z=1 B. x=1,y=1,z=1
C. x=y=z=1 D. xyz=1
(10)使文本框获得焦点的方法是( )
A.Change B.GotFocus
C.SetFocus D.LostFocus`
(11)决定标签内显示内容的属性是( )
A.Text B.Name
C.Alignment D.Caption
(12)阅读下面的程序段:
n1=InputBox("请输入第一个数:")
n2=InputBox("请输入第二个数:")
Print n1+n2
当输入分别为111和222时,程序输出为___ ____。
A. 111222 B. 222 C. 333 D. 程序出错
2.填空题
(1)执行赋值语句a = "123" + "456"后,变量a的值是 。
(2)设置标签边框的属性是 。
(3)要使标签所在处透明显示背景,应把其BackStyle属性设置为 。
(4)任何控件都具有属性 。
(5)在窗体上添加标签控件Label1之后,标签控件的默认的名称Name是 。
(6)在文本框Text1上显示“您好”使用的赋值语句为 。
(6)Private Sub Form_Click()
Form1.Width = 7000
Form1.Height = 3000
Form1.Caption = "Visual Basic 6.0 Window"
Form1.FontName = "幼圆"
Form1.FontSize = 12
Form1.Print
Form1.Print "欢迎使用Visual Basic 6.0 中文企业版!"
End Sub
此题的作用是

1.选择题
(1)当文本框的内容发生变化时,必将触发(C )事件。
A.LostFocus B.KeyPress
C.Change D.Click
(2)在Visual Basic中,建立一个文本编辑区域,可采用下列(C )。
A.命令按钮 B.标签控件
C.文本控件 D.定时器控件
(3)要把光标移到文本框Text1上,以便接收输入数据,正确的命令是( C )。
A.Text1.LostFocus B.Text1.GotFocus
C.Text1.SetFocus D.GotFocus.Text1
(4)在VB中,通过改变下面( A )属性,可以改变按钮控件上的文字。
A.Caption B.Font
C.ForColor D.Alignment
(5)在Visual Basic中,设置控件的大小,可改变下列(A )属性。
A.Height 与Width B.Height 与Top
C.Left 与Top D.Left 与 Width
(6)在Visual Basic中,下列(C )程序行是对的。
A.X – 5 = Y = 5 B.A + B = C ^ 3
C.Y = 1 :Y = Y + 1 D.I = 5 ;I = “X10”
(7)要使一个控件在运行时无效,正确的设置是(B )。
A. 把属性Enabled设置为True
B. 把属性Enabled设置为False
C. 把属性Visibled设置为True
D. 把属性Visibled设置为False
(8)能够改变标签(Label)控件显示标题的属性是(C)。
A.Name B.Text
C.Caption D.Click
(9)为了给x,y,z三个变量赋初值1,下面正确的赋值语句是( A )。
A. x=1∶y=1∶z=1 B. x=1,y=1,z=1
C. x=y=z=1 D. xyz=1
(10)使文本框获得焦点的方法是(C )
A.Change B.GotFocus
C.SetFocus D.LostFocus`
(11)决定标签内显示内容的属性是(D )
A.Text B.Name
C.Alignment D.Caption
(12)阅读下面的程序段:
n1=InputBox("请输入第一个数:")
n2=InputBox("请输入第二个数:")
Print n1+n2
当输入分别为111和222时,程序输出为_C___。/
A. 111222 B. 222 C. 333 D. 程序出错
2.填空题
(1)执行赋值语句a = "123" + "456"后,变量a的值是 "123456" 。
(2)设置标签边框的属性是 Border 。
(3)要使标签所在处透明显示背景,应把其BackStyle属性设置为 Transparent 。
(4)任何控件都具有属性 name 。
(5)在窗体上添加标签控件Label1之后,标签控件的默认的名称Name是 Label2 。
(6)在文本框Text1上显示“您好”使用的赋值语句为 text1.text = "您好" 。
(6)Private Sub Form_Click()
Form1.Width = 7000
Form1.Height = 3000
Form1.Caption = "Visual Basic 6.0 Window"
Form1.FontName = "幼圆"
Form1.FontSize = 12
Form1.Print
Form1.Print "欢迎使用Visual Basic 6.0 中文企业版!"
End Sub
此题的作用是 显示一个欢迎框,内容是以幼圆12号字显示的、窗体大小为7000*3000的欢迎词"欢迎使用Visual Basic 6.0 中文企业版!",标题为"Visual Basic 6.0 Window"
温馨提示:内容为网友见解,仅供参考
第1个回答  2010-05-20
cccaacbcacda,
123456,BorderStyle ,0,name,label1,text1.text="您好",设置窗体大小,并改变标题,然后输入字体大小为12的一行字

VB小题求赐教
1.选择题 (1)当文本框的内容发生变化时,必将触发(C )事件。A.LostFocus B.KeyPress C.Change D.Click (2)在Visual Basic中,建立一个文本编辑区域,可采用下列(C )。A.命令按钮 B.标签控件 C.文本控件 D.定时器控件 (3)要把光标移到文本框Text1上,以便接收输入数据,...

vb基础问题 请教各位路过的高手···请不吝赐教 在这谢过了
语法是没错,不过会死循环。因为那你退出DO 的条件永远不会满足。你应该把dd=dd+1 放如循环内部。说错了,是只会运行一次,因为你把while放下面,所以是先执行后判断,因为你条件不满足所以第二次不会再循环,DO 有几个用法 ,要注意区别 先判断后执行,条件满足不执行 do until loop 先执行执行...

有一个VB的小问题需要请教。。。望高手们不吝赐教!
Function 或 Sub 过程声明使用的过程名和参数列表与以前的声明相同。一个可能的原因是试图重载原始过程。重载过程必须具有不同的参数列表。错误 ID:BC30269 更正此错误 更改过程名或参数列表,或移除重复声明。

如何用VB求出学生五门功课的平均分
运行结果如下:姓名:张浩请输入5门功课中第1门课的成绩:45请输入5门功课中第2门课的成绩:89请输入5门功课中第3门课的成绩:78请输入5门功课中第4门课的成绩:23请输入5门功课中第5门课的成绩:45张浩的平均成绩是:56 各位大神如果觉得有改进的请赐教感激不尽,在此先行致谢。

关于VB的回文数问题
MsgBox "左边文本框的数字要比右边的小!"Exit Sub End If '先清空 List1.Clear '计算回文数并添加到数据库 lblM.Caption = ""For j = M To N If j = Val(StrReverse(j)) Then List1.AddItem j End If DoEvents lblM.Caption = j & ";" & Int((j \/ N) * 100 + 0.5) * ...

求大神赐教VB中的一点问题,关于控件MSCOMCTL.OCX的
估计你要用“管理员身份”运行Cmd才行。其实你也不用手动注册控件,试下这样行不:以“管理员身份”运行VB6,添加部件时,点“浏览”(就是你图中那个消息框挡住了的地方)打开MSCOMCTL.OCX 当然你也可以试下用管理员身份运行Cmd,再用regsvr32注册控件。还有一个问题,就是MSCOMCTL.OCX是32位组件,它...

vb编程输出金字塔型图形,有一处代码有疑问,希望高手不吝赐教
这得看题目要求,我明白你的意思,如果题目的“图案”第3行的2前面没有空格,那么这么写就是错误的,所以你分析的对,源代码不对,应该是Tab(3 - i),你说的"对tab不明白"我就不知道是什么意思了,tab就是输出空格而已,输出几个你自己根据数学公式计算啊,本题就是输出3-i个。不懂请追问,...

VB编程问题,高手进来看看
管道通信问题,调用API函数可解决。PeekNamePipe ReadFile CloseHandle GetStdHandle 这四个即可

VB菜鸟问题(Collection)
不过集合(Collection)的Add方法使用不正确 第二个参数Key应该是一个字符型的变量 可以这样:Cols.Add 20, "0"Cols.Add 30, "1"或 Cols.Add 20, "a"Cols.Add 30, "b"使用:ColT(1) 或 ColT.Item("0") 或 ColT.Item("a")参考资料:http:\/\/www.jhcode.com ...

VB问题,如何比较时间的大小?
上班时间 = "08:30"下班时间 = "17:30"If Now > 0.5 Then If Now < 下班时间 Then MsgBox "下班时间未到,请不要早退!"Else MsgBox "平平安安又一天,明天见!"End If Else If Now > 上班时间 Then MsgBox "上班时间已过,你迟到了。以后要注意。"Else MsgBox "安全第一,预防为主...

相似回答