爱问 爱问共享资料 爱问分类

执行下列程序,单击窗体,则在窗体上显示的是?

首页

执行下列程序,单击窗体,则在窗体上显示的是?

Option Explicit

Private Sub Form_Click()
Dim a As Integer. b As Integer,c As Integer
b=6:c=6.5
a=b=c
Print a
End Sub

提交回答
好评回答
  • 2019-03-10 15:10:13
      几位说的结果都对,是-1,逻辑运算过程也对,给a赋值为b是否与c相等的boolean值。
    但是大家都忽略了一点,重要的一点:
    dim x as integer
    x=6。5
    msgbox x
    x=7。5
    msgbox x
    这样两次赋值之后输出的分别是6和8,也就是说,直接给整数类型的赋值小数,结果并不是抹零,也不是四舍五入,而是“四舍六入五凑偶”。
      规则:如果小于5则舍,大于5则入,而等于5的话则凑一个偶数。所以6。5~6,而7。5~8。 这道题的考察点有三个:1。四舍六入5凑偶规则;2。“=”的赋值与比较用法的区分(在没有括号的情况下,最左面的一个等号是赋值,其他都是比较。);3。“=”作为比较时候的结果类型为Boolean型,Boolean型转换为整形为true~-1,false~0 关于舍入问题再说一句:如果要想截断尾数的方式取整,要用x=int(7。
      
      5);cint、直接赋值、以及round都遵循四舍六入5凑偶的原则;如果需要四舍五入原则其实很简单:int(7。5+0。5)=8,int(7。4+0。5)=7,就明白了吧?用int与+0。5相结合即可 2楼:b=6:c=6。5冒号没问题。是你没用过。

    黄虚淡

    2019-03-10 15:10:13

其他答案

    2019-03-10 14:46:18
  • 在窗体上显示 -1 
    那是因为由赋值语句 c=6.5 得 c 为 6 (Dim c As Integer),b = c (在这里不是赋值语句)得 True,a = True 得 a 为 -1 .
    还有提醒你一下,程序中的标点符号要注意,比如Dim a As Integer.这句后面的句号应该改为逗号。还有b=6:c=6.5 中间的冒号也不对,不如让 b c 的赋值语句分别占一行。

    周贵济

    2019-03-10 14:46:18

  • 2019-03-10 14:44:02
  • -1。
    Option Explicit 
    Private Sub Form_Click() 
    Dim a As Integer, b As Integer,c As Integer 
    b=6:c=6.5 'a=0,b=6,c=6
    a=b=c '''''b=c a=True(-1)
    Print a '''a=-1
    End Sub 
    

    永橘红

    2019-03-10 14:44:02

类似问题

换一换

相关推荐

  • 李阳"一口气"是什么?

    就是一口气说完整句话,中途不换气。

    外语学习

  • 怎样办国际驾照

    根本就没有正式的国际驾照,如果到国外开车,正式的程序: 1、到公证处办理驾照的公证书,可以要求英文或...

    交规/路况

  • 如何快速减去腰腹部的赘肉?

    目前我们的生活水平必竟非同以往.吃得好休息得好,能量消耗慢,食欲比较旺盛,活动又少,不知不觉脂肪堆积...

    减肥/塑身

  • 3D里发光柱怎么做啊

    光设置自发光是不能看到这种效果的,正确操作步骤如下: 1:在材质编辑器中选择一个新的材质示例球,将其...

    办公软件

  • 察的多音字是什么

    察这个字是一个单音字,它不是多音字,它只读作chá,它的意思是仔细看,调查,中文的姓

    语言学

  • 憋闷是什么意思?

    它和烦闷一个意思,也是一个汉语词汇,它的意思是由于心里有疑团不能解除,或者是因为其他因素而心里感到不...

    语言学

  • 知其心,然后能救其失也。是什么意思?

    这句话的意思是一个人做一件事情做错,需要知道他做这件事的想法才可以弥补这个过失

    语言学

  • 请问“收割灵魂”的人是什么意思??

    收割灵魂的人它是一种网络文化术语,属于褒义词,它是指这个人非常具有人格魅力

    语言学

  • 一不小心有两次还贷逾期了,担心被认定为连...

    建议你咨询下立本信用哦,他们蛮专业的,我之前就在这个公司弄过。

    商业/理财

  • 深圳大梅沙有没有牌具店呢

    根据我的了解深圳大梅沙,就是在去大小梅沙玩的那个公交站牌那里就有一家牌具店啊,店老板还挺年轻的,我再...

    购物

  • 深圳坑梓有没有牌具店呢

    根据我的了解深圳坑梓,就是坑梓地铁站D出口出来旁边那里就有一家牌具店的啊,那个店生意好像很不错的,每...

    购物

  • 深圳西田有没有牌具店呢

    根据我的了解深圳西田,在西田街道办旁边不是就有一家装修很不错的牌具店哦,店名我就不记得了,我以前住那...

    购物

  • 深圳东湖有没有牌具店呢

    根据我的了解深圳东湖,在东湖那个公交站旁边不就有一家牌具店咯,店面不大的,但是里面各种牌具产品还是挺...

    购物

正在加载...

爱问推荐

  • 1-20
  • 21-40
  • 41-60
  • 61-80
  • 81-100
  • 101-120
  • 121-140
  • 141-160
  • 161-180
  • 181-200

热点检索

  • 1-20
  • 21-40
  • 41-60
  • 61-80
  • 81-100
  • 101-120
  • 121-140
  • 141-160
  • 161-180
  • 172-191
返回
顶部
帮助 意见
反馈
关注
爱问

关注爱问微信公众号,开启知识之旅,随时随地了解最新资讯。

确定举报此问题

举报原因(必选):