vb编程实例详解，求大神详解！

来源：蜘蛛抓取(WebSpider) 时间：2015-05-20 01:25 标签： 求大神ps
求编程大神救命！！！ VB挂科 下面是补考题 完全不会 求救啊
求编程大神救命！！！ VB挂科 下面是补考题 完全不会 求救啊
问题补充： 3、整型的类型符是_______。4、将p=3.14定义为常量，语句为____________________。5、表达式19\3*3^3/2.4的值是___________。6、与数学式子3b(34+a)对应的vb的表达式是_____。7、函数Int(Rnd()*11)+10的值的范围是____________。8、用下面的语句定义的数组Dim A(-3To 5,3) As Integer As Integer的元素个数是___________。
x=InputBox(____________,______________,10001) 11、以下程序运行后，单击窗体时，显示的结果是
。Private Sub Form_Click()
Dimb as integer b=3
Call mysub(b)
End SubPrivate Submysub(y)
y=1For j = 1 To k
NextjEnd Sub12、阅读程序，写出结果_________Private subform_click()A=10:S=10DOS = S + A A = A +3Loop WhileA&30Print “A=”；AEnd Sub
不区分大小写匿名
这题也完全不会，我不信额，没学VB都表示知道一些
只求答案啊 术业有专攻嘛
能帮我么？
3.&Integer & &，这个不应该不知道哦，很基础的4.const pi=3.14
常量也是编程基础啦5.
这个题考的是运算符优先级哦，^优先级最高 就是最先算的意思19\3*3^3/2.4=19/3*9(3的三次方)/2.46. 3b*34+3b*a & & & VB算数运算不能有括号哦7. 10~21之间 & & &
Rnd 函数返回小于 1 但大于或等于 0 的值，Rnd 取值范围[0,1)8.答案：8 & & & & & & & & & & & & 分别是：（-3，-2，-1，0，1，2，3，3）x=InputBox(”对话框内容“,”对话框标题“,10001)11. 答案：612.答案：33
相关知识等待您来回答
编程领域专家求大神编程vb软件啊 悬赏一千可以吗_百度知道
求大神编程vb软件啊 悬赏一千可以吗
com/zhidao/wh%3D450%2C600/sign=00b5569032adcbeff02eb/8bf0bfa513d.&nbsp：2框不为0时 &nbsp。.hiphotos://a://a;拿2框中的数字除以（100减去1框和3框中的数字 ）取整数加12框为0时 1框中的数字除以3框中的数字得出一个带有小数的结果 &nbsp.jpg" esrc="/zhidao/wh%3D600%2C800/sign=47cafb20aedfed943cc41d95/8bf0bfa513d;小数点后两位乘以一个数字a得出一个靠近100的结果 这个数字a再乘以小数点前的数字再加1 &nbsp.以上是我的要求 &nbsp.hiphotos://a.jpg" target="_blank" title="点击查看大图" class="ikqb_img_alink"><img class="ikqb_img" src=" 跪求大神伸出援手啊。满意的话可以找找我其他的问题统一给分啊<a href="/zhidao/pic/item/8bf0bfa513d.baidu.baidu具体要求如下
提问者采纳
100减去1框和3框中的数字“怎么理解，计算上方的标签按照label1编制的; Y)
S = A * E + 1
Label1; 0 Then
S = Int(C &#47, S As Integer
Dim X As Single, D As Integer、2.Text)
D = Val(Text3.Text)
C = Val(Text2：Private Sub Command1_Click()
Dim A As Integer？是不是先减1框中的数字再减3框中的数字; 100
A = Int(100 &#47.Text)
If C &&gt, B As Integer、text3。程序如下、3分别按照text1; D
E = Int(X)
Y = Int(Y * 100) &#47, E As Integer, Y As Single
B = Val(Text1、text2？下面把框1; (100 - B - D)) + 1
X = B &#47, C As Integer
顺序没关系的 结果对就行
OK，稍等昂。
还有两个小修改的
抱歉了啊1、&#39;拿2框中的数字除以（100减去1框和3框中的数字 ）取整数加1
【（100减去1框和3框中的数字 ）这个得出的数字需要再往前算两个小数点】 例子 100-89.01-5.49=5.5
2框中的数字除以的是0.055的2、最后输出的结果都是要取整数的
小数点后的都不要了额 先睡了 起来再看吧，，，，
又按照你说的内容修改了一下，你看对不对，如果不对再留言：Private Sub Command1_Click()
Dim A As Single, B As Single, C As Single, D As Single, E As Integer, S As Integer
Dim X As Single, Y As Single
B = Val(Text1.Text)
C = Val(Text2.Text)
D = Val(Text3.Text)
If C && 0 Then
S = Int(C &#47; ((100 - B - D) * 0.01)) + 1
X = B &#47; D
E = Int(X)
Y = Int(Y * 100) &#47; 100
A = Int(100 &#47; Y)
S = A * E + 1
Label1.Caption = SEnd Sub
很完善了 不过就是2框为0的时候计算出了问题1框是95.89
2框为0 3框是4.11 你可以试试看 结果应该是70的 显示是6970
又改动了一下，你看这回对了吗?Private Sub Command1_Click()
Dim A As Single, B As Single, C As Single, D As Single, E As Integer, S As Integer
Dim X As Single
B = Val(Text1.Text)
C = Val(Text2.Text)
D = Val(Text3.Text)
If C && 0 Then
S = Int(C &#47; ((100 - B - D) * 0.01)) + 1
X = B &#47; D
E = Int(X)
A = 100 &#92; ((X - E) * 100)
S = A * E + 1
Label1.Caption = SEnd Sub
提问者评价
非常感谢的呢 终于完整解决了
其他类似问题
等待您来回答
下载知道APP
随时随地咨询
出门在外也不愁如图 VB编程 大神们 求解 急！！！_百度知道
提问者采纳
m我学的是C语言;A&#39!= 0
(2) s= s+i(3)
char m = &#39（1） i % 3==0 && i % 5，希望能帮到你，不过应该也是对的
提问者评价
太给力了，你的回答完美地解决了我的问题，非常感谢！
其他类似问题
vb编程的相关知识
等待您来回答
下载知道APP
随时随地咨询
出门在外也不愁求大神用vb做这道题。急 ！急！急！_vb编程吧_百度贴吧
&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&签到排名：今日本吧第个签到，本吧因你更精彩，明天继续来努力！
本吧签到人数：0成为超级会员，使用一键签到本月漏签0次！成为超级会员，赠送8张补签卡连续签到：天&&累计签到：天超级会员单次开通12个月以上，赠送连续签到卡3张
关注：1,267贴子：
求大神用vb做这道题。急 ！急！急！收藏
求九位累进可除数。所谓九位累进可除数就是这样一个数，这个数由1到9折九个数字组成，每个数字刚好只出现一次。这九位数字的前两位能被2整除，前三位能被3整除…….前n位能被n整除，整个九位数能被9整除。
登录百度帐号推荐应用
为兴趣而生，贴吧更懂你。或

我要回帖

更多关于 求大神ps 的文章

 

随机推荐