编写一个vb程序

axios 2024-05-16 12:47:03
最佳回答
在d盘创建一个txt文本文件,名字是fenshu。并在文本文件里面写入分数以英文格式的逗号“,”隔开。如87,76,46,99,100,63创建好之后就可以运行这段代码了。不过不明白的是你是要只统计59分的还是59分及以下,99分那个也是的。我下面写的是包括统计59分及以下的,如果是只统计某一个数,就和100分的那个是一样的。dim m,a(6) as integeropen "d:\fenshu.txt" for input as 1do until eof(1)input #1,mselect case mcase ** <=59a(1)=a(1)+1case 60 to 69a(2)=a(2)+1case 70 to 79a(3)=a(3)+1case 80 to 89a(4)=a(4)+1case 90 to 99a(5)=a(5)+1case 100a(6)=a(6)+1end selectloopclose #1'最后输出print "59分及以下的有" & a(1) & "个;"print "60分到69分的有" & a(2) & "个;"print "70分到79分的有" & a(3) & "个;"print "80分到89分的有" & a(4) & "个;"print "90分到99分的有" & a(5) & "个;"print "100分的有" & a(6) & "个;" 20210311
汇率兑换计算器

类似问答
  • 有人试过编写个程序来炒股吗?
    • 2024-05-16 13:21:54
    • 提问者: 未知
    先选出确定一定量的靠谱的股票,再用历年的数据求出合理范围的买入价格和卖出价格,然后让计算机自己判断…
  • 求vb编写的邮政编码查询系统
    • 2024-05-16 14:57:44
    • 提问者: 未知
    vb写邮编查询系统超简单啊,连数据库都可以不用,一个文本文件就够了。先准备一个文本文件 postcode.txt 内容如下100084,北京,海淀区,清华大学100086,北京,海淀区,学院路010010,**呼和浩特市,新城区,**……vb代码如下private sub from_load() form1.show:form1.autoredraw = true dim pc as stri...
  • 用python编写一个小程序
    • 2024-05-16 21:19:41
    • 提问者: 未知
    def input_1(): a=raw_input('please input something:\n') global st st=l**t(a) print 'now the l**t you just inputted **:\n',st success=true while success: input_1() for i in st: c=st.count(i) if c>=3...
  • 编写程序,输入一个正整数,将它各位数反转输出
    • 2024-05-16 19:22:10
    • 提问者: 未知
    using system;using system.collections.generic;using system.text;namespace consoleappoputnum{ class program { static void main(string[] args) { bool ifright = true; ...
  • vb:编程计算三角形面积
    • 2024-05-16 02:04:09
    • 提问者: 未知
    s end if 扩展资料:注释方式 在vb中,注释有2种方式。1.以rem**开头,并且rem关键...属性(property)属性是指用于描述对象的名称、位置、颜色、字体等特征的一些指标。...
  • 怎么用vc++6.0编写程序
    • 2024-05-16 14:12:14
    • 提问者: 未知
    怎么用vc+6.0编写程序,vc+6.0是微软比较老的c++集成开发环境,是微软viualtudio的一员,一般用于新手学习c++使用,也有人用习惯了vc6.0,只是将其做为一个编辑器,因为新版...
  • 如何用python编写一个求分段函数的值的程序
    • 2024-05-16 23:30:58
    • 提问者: 未知
    假设分段函数y当x>1 时,y=x+2当1>=x>-1时,y=2x+3当 x时,y=3x+4def f(x):if x>1:y=x+2 elif x>-1:y=2*x+3 else:y=3*x+4 return yprint(f(10),f(0),f(-3))
  • vb编写一个过程
    • 2024-05-16 00:48:25
    • 提问者: 未知
    private sub button7_click(byval sender as system.object,byval e as system.eventargs)handles button7.click dim str as string=" str=inputbox("请输入要反转的数字") dim pl as string=strreverse(str) textbox6.text=v...
  • vb编写程序
    • 2024-05-16 21:23:43
    • 提问者: 未知
    试试这个合不合适。自己添加一个文本框控件,一个时间控件,一个串口控件,两个命令按钮控件。private sub command1_click() timer1.enabled = true command1.backcolor = vbgreenend subprivate sub command2_click() text1.text = ""end sub...
  • 有人试过编写个程序来炒股吗?
    • 2024-05-16 14:03:07
    • 提问者: 未知
    专业技能 好理解,基本的编程+投研+一定的数学基础,这样才能想出策略并实现策略。...最大的风险就是策略被别人偷走,因为你的策略是放在**上的,虽然**再三声称策略绝对...
汇率兑换计算器

热门推荐
热门问答
最新问答
推荐问答
新手帮助
常见问题
房贷计算器-九子财经 | 备案号: 桂ICP备19010581号-1 商务联系 企鹅:2790-680461

特别声明:本网为公益网站,人人都可发布,所有内容为会员自行上传发布",本站不承担任何法律责任,如内容有该作者著作权或违规内容,请联系我们清空删除。