首页| JavaScript| HTML/CSS| Matlab| PHP| Python| Java| C/C++/VC++| C#| ASP| 其他|
购买积分 购买会员 激活码充值

您现在的位置是:虫虫源码 > 其他 > VB计算器

VB计算器

  • 资源大小:12.20 kB
  • 上传时间:2021-06-30
  • 下载次数:0次
  • 浏览次数:1次
  • 资源积分:1积分
  • 标      签: VB

资 源 简 介

Dim que(25) As DoublePublic qt As IntegerPublic qh As IntegerPublic memo As DoubleDim dflag As IntegerDim i As IntegerDim opnre As IntegerDim prev As DoubleDim oflag As IntegerDim ind As IntegerFunction fact(num As Long) As Long    If (num < 0 Or num = 0) Then        MsgBox ("输入值错误!")        fact = Val("")    Else        If (num > 12) Then            MsgBox ("输入值太大!")            fact = Val("")        Else            re = 1            While (num > 0)                re = re * num                num = num - 1

文 件 列 表

ssss.frm
ssss.frx
工程1.exe
工程1.vbp
工程1.vbw
MSSCCPRJ.SCC

相 关 资 源

您 可 能 感 兴 趣 的

同 类 别 推 荐

VIP VIP
  • 猕猴桃 1天前 成为了本站会员

  • 11 1天前 成为了本站会员

  • 开心快活人 1天前 成为了本站会员

  • 晋财 1天前 成为了本站会员

  • WYG 2天前 成为了本站会员

  • Shine 2天前 成为了本站会员

  • 柳贻 2天前 成为了本站会员

  • hallelujah_HL 2天前 成为了本站会员

  • 焦昱贺 2天前 成为了本站会员

  • Rubin 2天前 成为了本站会员

0.189443s