VB的一个程序,求高手帮助,有谁知道选B的原因???
来自: 更新日期:早些时候
求高手帮忙编一个VB的选择题程序~
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”
VB的一个程序,求高手帮助,有谁知道选B的原因???视频
相关评论:15179119042:VB的一个程序,求高手帮助,有谁知道选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 '找出最小的...
15179119042:VB程序编写,求高手帮忙(数据压缩)列如输入100011111,输出11#03#15#
於黎沾1、n=0;2、n=n+1;3、j=j+1;4、i=i+n;
15179119042:vb程序设计题,请高手解答
於黎沾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”,然后还有一个图标,...
电视对人体有害吗?
A 有 B 没有 C 少看一点是可以的,但不能看2小时以上
vb和在vba中同样使用。
既然vba已经完成,不妨封装Dll即可。建议部分封装噢。
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的原因???视频
相关评论:
於黎沾for内的代码循环两次,第一次得出:x = b;y = c;z = b,然后要使用第一次得出的x,y,z去代入第二次循环,得出,x = c;y = b;z = c,所以答案就是B
於黎沾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 <...
於黎沾1.窗体。2.代码。一个编译好的VB程序由:1.窗体。2.数据 3.命令代码。4.资源(包括了窗体、图标、字串、属性等)。一个编译好的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...
於黎沾并将第一个工作单赋予工作单对象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 ...
於黎沾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 '找出最小的...
於黎沾1、n=0;2、n=n+1;3、j=j+1;4、i=i+n;
於黎沾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...
於黎沾这是进行字节运算操作 pass就是一个数组,只有VB是这样表示,在c#之类的都是pass[0]这样表示
於黎沾第一行有字,第三行有字,你复制这段代码,粘贴到第二行: Msgbox "你好!",64,"Hello“ 搞好了以后关闭这个代码编辑窗口(不要关闭VB主程序),然后按F5键运行程序,单击那个东东(Command1),会看到出现一个对话框,上面写着:“你好!”,标题是“Hello”,然后还有一个图标,...