VB 6.0 If x Then Print x Else Print x + 1Dim xIf x Then Print x Else Print x + 1输出结果是1

相关推荐

• VB 6.0 If x Then Print x Else Print x + 1
• VB中判断奇偶 y=IIf(x mod 2,1,0) If y Then Print "奇数" Else Print "偶数" End If
• vb用function编写一个产生随机整数过程,输出n个指定范围的随机整数Sub sj(i%,a%,b%)Dim x%x = Int(Rnd * (b - a + 1)) + aEnd SubPrivate Sub Command1_Click()Dim n%,a%,b%,i%,x%n = InputBox("请输入随机整数的个数n")a = InputBox("请输入取值范围的下限a")b = InputBox("请输入取值范围的上限b")For i = 1 To nCall sj(x,a,b)Print x;Next iEnd Sub为什么运行出来的都是零
• 算法求二次函数y=x^2+2x(x∈[-10,10)最大值的程序x=-10ymax=(-10)*(-10)+2*(-10)DOx=x+1y=x^2+2*xif_ymax＞y______ thenymax=yend ifloop until_x＞＝10_____print ymaxend我觉得这个题有问题,特别是横线上的蛮别扭,如果这个程序是正确的那么最大值就有问题,有不同意见,请填出横线上的空.
• 在窗体上有一个命令按钮Commandl,编写事件代码如下：Private Sub Command1_Click()Dim x As Integer,y As Integerx = 12:y = 32Call Proc(x,y)Debug.Print x; yEnd SubPublic Sub Proc(n As Integer,ByVal m As Integer)n = n Mod 10m = m Mod 10End Sub打开窗体运行后,单击命令按钮,立即窗口上输出的结果是A）2 32 B）12 3 C）2 2 D）12 32
• VB dim x as integer dim i as integer x = 100 for i = 1 to 100 step 5 x = x - i / 6 next i print x 我用手机编的 不好排版 我的答案上是-54
• 1、Function函数的定义格式是什么? 2、Function函数和sub过程的区别是什么? 3、以下关于过程及过程参数后天之前回答,最后一道有过程= =,拜托了1、Function函数的定义格式是什么?2、Function函数和sub过程的区别是什么?3、以下关于过程及过程参数的描述中,正确的是 A 变量作为过程的参数时,只能使用“传地址”方式进行.B 数组作为过程的参数时,只能使用“传地址”方式进行.C 在vb中,允许用户对子过程或函数过程进行嵌套定义.D 只有函数过程能够将过程中处理的信息传回到主调程序中.4、什么是形参?什么是实参?5、读程序.有如下程序：Private Sub Command1_Click() Dim x As Integer, y As Integer x = 5 y = 6 Call mysub(x, y) Print x; "and"; yEnd SubPrivate Sub mysub(ByVal a As Integer, ByRe
• 5、 下列输出语句中,错误的是（）.A) Print x;y B) Print x,y C) Form1.Print x,y D) Print.Form x,y
• 第1题：VB数据类型Integer表示整型数,存储为（ ）位.64 32 8 16 第2题：VB中,以下关于符号常量的声第1题：下列VB程序各赋值语句,语法不正确的是（ ）.x+y=5 BiNumber =15 Label1.caption =time sLength =x+y 第2题：下列VB程序运行后,变量x的值为（ ）.x=2 print x+1 print x+2 3 5 2 8 第3题：下列VB程序语句段 a=3:b=5 t=a:a=b:b=t 执行后,（ ）.a值为3,b值为3 a值为3,b值为5 a值为5,b值为5 a值为5,b值为3 第4题：下列VB程序运行后,变量s=（ ）.Dim a,b,c,s As Integer a=9 b=41 c=2*(a+b) s=a*c 100 50 900 300 第5题：分析下列VB程序 private sub form_click( ) s=11\3+11 mod 3 print s end sub 当单击窗体时s的值是（ ）.3 4 5 6
• 5、 下列输出语句中,错误的是（）.A) Print x;y B) Print x,y C) Form1.Print x,y D) Print.Form x,y
• 1．下面的程序段运行后,显示的结果是 ______.Dim x% if X Then MsgBox(x)1．下面的程序段运行后,显示的结果是 ______.Dim x%if X Then MsgBox(x) Else MsgBox(x+1)(A) 1(B) -1(C) 0(D) 显示错误提示信息
• 已知等腰三角形的周长是18,腰长比底边大3.则这个三角形的腰长为?,底边长?