下列代码执行后,窗体上显示()。Dim a%, b%a=12: b=30If a>b Thena=a+bElseb=b-aEnd IfForm1.Print b
相似题目
-
执行以下Command1的Click事件过程在窗体上显示() Private Sub Command1_Click() Dim a a = Array(“a”,”b”,”c”,”d”,”e”,”f,”,”g”) Print a(1); a(3); a(5) End Sub
-
在窗体上画一个名称为Command1的命令按钮,然后编写如下程序: Private Sub Command1_Click() Dim I As Integer,j As Integer Dim a(10,10)As Integer For I=1 To 3 For j=1 To 3 a(I,j)=(I-1)*3+j Print a(I,j); Next j Print Next i End Sub 程序运行后,单击命令按钮,窗体上显示的是()。(其中CR表示回车和换行)
-
设有如下程序: Option Base 0 Private Sub Form_Click() Dim a Dim i As Integer a = Array(1,2,3,4,5,6,7,8,9) For i = 0 To 3 Print a(5 – i); Next End Sub 程序运行后,单击窗体,则在窗体上显示的是()
-
下列程序执行完成后屏幕上显示的结果是()a=95;b=85;ifa>b;t=a;a=b;b=t;endif;?a,b,t
-
下列程序段执行后窗体上显示()。https://assets.asklib.com/images/image2/2017120616235128907.jpg
-
设a=10,b=5,c=1,执行语句Printa>b>c后,窗体上显示的是().
-
下列代码执行后,窗体上显示( )。Dim a%, b%,c%,Max%a=3: b=11: c=15If a>b Thenif a>c then Max=a else Max=cElseif b>c then Max=b else Max=cEnd IfForm1.Print Max
-
设 a=4 , b=5 , c=6 ,执行语句 : Print a < b And b < c , 窗体上显示的是 ________ 。
-
设有如下程序代码 : Dim a% Public b%, c% Private Sub Form_Click() Dim b% Print a; b; c End Sub Private Sub Form_Load() Dim a% a = 5 b = 8 c = 10 End Sub 运行程序时单击窗体 , 则在窗体上显示的是 ________ 。
-
假定有如下的Sub过程:Sub fun(x As Single, y As Single)t = xx = t / yy = t Mod yEnd Sub在窗体上画一个命令按钮,然后编写如下事件过程:Private Sub Command1_Click()Dim a As SingleDim b As Singlea = 6b = 4fun a, bPrint a, bEnd Sub程序运行后,单击命令按钮,输出结果为( )。
-
在窗体上添加一个命令按钮(名为Command1),然后编写如下事件过程:Private Sub Command1_Click()Dim b,kFor k=1 to 6b=23+kNext kMsgBox b+kEnd Sub打开窗体后,单击命令按钮,消息框的输出结果是_____。
-
设 a=4 ,b=5,c=6, 执行语句 Print a < b And b < c 后 , 窗体上显示的是 _______ 。
-
在窗体中添加一个命令按钮Command1,编写如下代码:Private Sub Command1_Click()x = 6If x > 6 ThenIf x = 6 ThenPrint \a\ElsePrint \b\End IfElseIf x < 8 ThenPrint \c\ElseIf x = 6 ThenPrint \d\End IfEnd IfEnd IfEnd Sub运行后,单击命令按钮,则在窗体上显示的是( )。
-
下列代码执行后,窗体上显示()。Dim a%, b%a=30: b=12If a>b Thena=a+bElseb=b-aEnd IfForm1.Print b
-
设a=8, b=6, c=-1;执行语句Print a>b>c后,窗体上显示的是()
-
窗体中有一个名为Command1的命令按钮和一个名为Text1的文本框,事件代码如下: Private Sub Command1_Click Dim a(10)As Integer,b(10)As Integer n=3 For i=1 T0 5 a(i)=i b(n)=2*n+i Next i Me!Text1=a(n)+b(n) End Sub 打开窗体,单击命令按钮,文本框Text1中显示的内容是()。
-
在窗体中添加一个名称为Commandl的命令按钮,然后编写如下事件代码。 Private Sub Commandl_Click() Dim a(1 0,10)Form=2 to4Forn=4to5a(m,n=m*nNextnNextmMsgBox a(2,5)+a(3,4)+a(4,5)EndSub窗体打开运行后,单击命令按钮,则消息框的输出结果是()。
-
请问下面程序段执行完毕后,变量c的值是()?<% dim a: a="b": session(a)=1: session("b")=2: c=session(b) %>
-
已知一窗体上命令按钮Command1的Click事件代码如下,则单击Command1后,文本显示的文字为()。
-
窗体上有一个名称为Command1的命令按钮,其单击事件过程代码如下:运行程序后单击命令按钮Command1,窗体上显示的是()
-
下列程序执行后,变量x的值为()。Dim a , b , c , d , x As Single a = 200 : b = 100 : c = 50
-
在窗体上画—个命令按钮,其名称为Command1,然后编写如下程序: Function M(x As Integer,y As Integer)M=IIf(x>y,x,y) End FUNction Private Sub Command1 Click()Dim a As Integer,b As Integera=100b=200Print M(a,B) End Sub 程序运行后,单击命令按钮
-
在某一 VB 程序中有程序代码段:Dim A,B,C As StringA="35"B="53"C=A+B请分析运行该段代码后,C值为()
-
在窗体上画一个命令按钮,其名称为Command1,然后编写如下程序; Function M(x As Integer,y As Integer)M=IIf(x>y,x,y) End Function Private Sub Commandl_Click()Dim a As Integer,b As Integera=100b=200PrintM(a,B) End Sub 程序运行后,单击命令按钮,
推荐题目
- 标志着德国民族鼓励,浪漫主义歌剧的创始人()。
- 中华民族粮食文化萌发在哪个时代?距今约有多少年?
- 在气固色谱中,常用的()为活性炭、氧化铝、硅胶、分子筛、高分子多孔小球等。
- 急性单纯性胃炎的主要病因()
- Dixon检验法用于一组测定值的一致性检验和剔除一组测定值中的异常值,可用于检出一个异常值。
- 江海贸易公司的吊车司机张某在替单位装卸货物时,因操作不慎导致货物坠落,造成行人李某受伤。张某系被东方劳务派遣公司派遣到江海贸易公司工作的。此外,张某应聘时使用了伪造的吊机操作资质证书,但东方劳务派遣公司并未认真审核张某的作业资质。那么,对于李某所受的伤害()
- 关于国家助学贷款风险防范与补偿机制,下列说法正确的是()。
- 上网交往应注意()
- 室内装修材料应采用绿色环保、非延燃材料,机房的耐火等级不应低于二级,并宜设置火灾自动报警系。()
- Q2. FortisⅡ球囊长度都有哪些()