VB程序设计
历年真题
While循环语句先对条件进行测试,然后才决定是否执行循环体,只有条件为False 时,才执行循环体。
数组声明时,必须说明数组的数据类型。
过程 Private Sub PrintOn(y As Integer)不可以被其它模块调用。
可以使用通用对话框 Commondialog的Color方法 设置颜色。
写顺序文件时,用Print#语句和Write#语句,结果是一样的。
框架Frame是一个容器控件,可以放置其它控件。
书写VB表达式有什么要求?
简述VB中标准模块和窗体模块的主要功能。
窗体上有三个文本框(名字分别为Texta, Textb, Textc)和一个名为 Labela的标签。下列程序的功能是输入一元二次方程ax2+bx+c=0(a不为0)的3个系数a、b、c,在标签上显示根的情况。Private Sub Commandl Click()Dim a!,b!,c!,delta!a=Val(TextA.Text):b=Val(TextB.Text):c=(1)____delta=(2)____If delta>0 ThenLabela.Caption=“有两个不相等的实根”ElseIf delta =0 ThenLabela.Caption=“有两个相等的实根”Else(3)____=“没有实根”End IfEnd Sub 窗体上有三个文本框(名字分别为Texta, Textb, Textc)和一个名为 Labela的标签。下列程序的功能是输入一元二次方程ax2+bx+c=0(a不为0)的3个系数a、b、c,在标签上显示根的情况。
下列程序单击窗体后,窗体的输出结果为____。 Private Sub Form_Click() Dim n As Integer, s As Integer n=10 s=0 Do s=s+n n=n-1 Loop While >0 Print s End Sub
«
1
2
3
4
5
6
7
8
...
48
49
»