VB的一个程序,求高手帮助,有谁知道选B的原因???

来自:    更新日期:早些时候
求高手帮忙编一个VB的选择题程序~

电视对人体有害吗?
A 有 B 没有 C 少看一点是可以的,但不能看2小时以上

vb和在vba中同样使用。
既然vba已经完成,不妨封装Dll即可。建议部分封装噢。

for内的代码循环两次,第一次得出:x = b;y = c;z = b,然后要使用第一次得出的x,y,z去代入第二次循环,得出,x = c;y = b;z = c,所以答案就是B

x$="a":y$="b":z$="c" '三个变量里存放的都是小写英文字母,怎么可能结果是大写的?
这个说明,编写的题目本身就不严密???
for j=1 to 2

x$=y$:y$=z$:z$=x$
next j
该循环一共执行2次:x$=y$:y$=z$:z$=x$
第1次:
x$=y$  把y的值赋予x,x里保存"b"
y$=z$  把z的值赋予y,y里保存"c"
z$=x$  把x的值赋予z,z里保存"b"
第2次:
x$=y$  把y的值赋予x,x里保存"c"
y$=z$  把z的值赋予y,y里保存"b"
z$=x$  把x的值赋予z,z里保存"c"
最后,执行
Print x$+y$+z$
x$+y$+z$表示把变量x、y、z的字符连接起来
所以,结果显示:cbc
问问老师看,怎么能显示大写的“CBC”

第一次的Z为什么是B?不是A吗
你想啊,第一个xS=yS,这个时候x就变成了b嘛,所以后面出现的所有的x都是b,包括第三个式子中的x


VB的一个程序,求高手帮助,有谁知道选B的原因???视频

相关评论:
  • 15179119042VB的一个程序,求高手帮助,有谁知道选B的原因???
    於黎沾for内的代码循环两次,第一次得出:x = b;y = c;z = b,然后要使用第一次得出的x,y,z去代入第二次循环,得出,x = c;y = b;z = c,所以答案就是B

  • 15179119042我用vb编了个求一元二次方程根的程序,不知哪里出错了,请求高手帮忙!
    於黎沾1.开平方函数为spr,而不是sptr,应该为m = sqr(d)2 .输出结果有问题, Text4 = "e"这只会输出e字符,而不是e的值,下一句也是 正确为text1.text=e 正确代码 Private Sub Command1_Click()a = Val(Text1)b = Val(Text2)c = Val(Text3)d = b * b - 4 * a * c If d <...

  • 15179119042求高手进~~~我是VB小白!!!一个VB程序有哪两个部分构成
    於黎沾1.窗体。2.代码。一个编译好的VB程序由:1.窗体。2.数据 3.命令代码。4.资源(包括了窗体、图标、字串、属性等)。一个编译好的VB程序很容易被反编汇,所以要加壳。

  • 15179119042请高手帮忙解释一下这段VB小程序
    於黎沾VBA.MsgBox "Node: [" & MenuNodesNodeX.Caption & "] Pop " '这段我不清楚,好象是菜单相关的一点代码 End Sub Private Sub TreeView1_MouseUp(Button As Integer, Shift As Integer, x As Single, y As Single) '鼠标按键弹起时 If Button = vbRightButton Then '如果是右键 If TreeView...

  • 15179119042下面是一段VB程序 请高手指点下每段都是什么意思啊
    於黎沾并将第一个工作单赋予工作单对象eWorksheet 'eWorksheet = eApp.Workbooks.Add.Worksheets(1)'显示Excel表格 'eApp.Visible = True '将data中的数据添充到Excel表格中 For i = 1 To rnum For j = 1 To fldnum '一列列的填入数据 eApp.Cells(i, j) = data(i, j)Next j Next i ...

  • 15179119042如何用VB写一个程序以判断是敲击了左control键还是右control键?请高手指...
    於黎沾MsgBox "请输入第" & Str(i) & "个数:"sngsq(i) = Val(InputBox("请输入")) '将输入的数据转换为数值型 Print sngsq(i);Next Print Print "排序后"'排序 For i = 1 To n - 1 intmin = i '对第i遍排序,初始假定第i个元素最小 For j = i + 1 To n '找出最小的...

  • 15179119042VB程序编写,求高手帮忙(数据压缩)列如输入100011111,输出11#03#15#
    於黎沾1、n=0;2、n=n+1;3、j=j+1;4、i=i+n;

  • 15179119042vb程序设计题,请高手解答
    於黎沾Vb程序代码如下:Private Sub Form_Click()Dim a '定义了一个可变类型的数组 a = Array(1, 3, 5, 7, 9, 11)Dim b b = Array(2, 4, 6, 8, 10, 12, 14, 16, 18)Dim c(1000)pa = 0: pb = 0: pc = 0 ea = UBound(a) '可变数组A的下标的上界和下界可以用函数UBO...

  • 15179119042求一VB高手解释一段程序?高手最好能告诉我你的QQ。。。
    於黎沾这是进行字节运算操作 pass就是一个数组,只有VB是这样表示,在c#之类的都是pass[0]这样表示

  • 15179119042新手玩vb,高手来帮忙!!如题 谢谢了
    於黎沾第一行有字,第三行有字,你复制这段代码,粘贴到第二行: Msgbox "你好!",64,"Hello“ 搞好了以后关闭这个代码编辑窗口(不要关闭VB主程序),然后按F5键运行程序,单击那个东东(Command1),会看到出现一个对话框,上面写着:“你好!”,标题是“Hello”,然后还有一个图标,...

  • 相关主题精彩

    版权声明:本网站为非赢利性站点,内容来自于网络投稿和网络,若有相关事宜,请联系管理员

    Copyright © 喜物网