登录
首页 » VB源码 » VB6.0 使用递归过程实现阶乘运算

VB6.0 使用递归过程实现阶乘运算

于 2022-04-27 发布 文件大小:2.33 kB
0 66
下载积分: 2 下载次数: 1

代码说明:

VB6.0 使用递归过程实现阶乘运算   Function F(n As Integer) As Single    If n > 1 And n

下载说明:请别用迅雷下载,失败请重下,重下不扣分!

发表评论

0 个回复

  • vb串口调试助手,可用于自己做调试测试工具
    1.用易懂的VB语言编程   2.可设置串口号波特率   3.支持十六进或字符形式发送或接收,可定时发送。3,可自己换程序的图片
    2022-07-13 02:02:52下载
    积分:1
  • VB 6.0 在字符串中用一子串替换另一子串
    VB 6.0 在字符串中用一子串替换另一子串,采用VB中内置的Replace函数来实现,类似这种的替换字符串方法,在平时使用十分广泛,在WEB编程的ASP/PHP/ASP.NET中,同样使用广泛。本示例中,主要是替换一个字符串中的指定位字符串,将其替换成其它字符。   关于Replace的用法,请看以下代码片段:   Text3.Text = Replace(Text1, Mid(Text1, 2, 2), Text2)
    2022-01-26 05:32:59下载
    积分:1
  • 一个实现图像旋转效果的VB实例
    一个实现图像的旋转效果实例,由VB6.0编写,前几年的源码,本程序实现图片的逆时针旋转90度,单击窗口中的按钮即可实现旋转功能,这部分代码,可参考如下代码:   逆时针旋转90度   Private Sub Command2_Click()    For j = 0 To h Step 1    For i = 0 To w Step 1    BitBlt Picture2.hDC, i, j, 1, 1, Me.Picture1.hDC, j, i, srCopy    Next i    Next j   End Sub
    2023-07-06 04:55:02下载
    积分:1
  • VB.NET 超市管理系统
    VB.NET 超市管理系统,数据库基于SQLSERVER,使Label透明显示,进货管理、售货管理、价格管理、进货查询、售货查询、增加用户管理等。这个示范代码主要是演示VB与SQLSERVER数据库之间的各种操作,大部分是一些数据的基础应用。测试前请先附加好数据库,否则会弹出出错提示。
    2022-01-26 05:34:54下载
    积分:1
  • Visual basic vb6.0 制作个人调查表窗体
    Visual basic vb6.0 制作个人调查表窗体,这个主要是练习一些VB Form 窗体控件中的元素用法,如果你初学习VB的话,这个例子非常适合你学习。   本例子中主要包括了对VB基本控件元素Check、Option、Text、Label、Button的用法进行了演示,具分享出了具体实现某一功能的代码及设置方法,涉及到光标自动归位、清空文本框、判断用户输入是否正确,断用户选择了哪一项按钮等功能,虽然简单,但对于VB打基础还是挺有帮助的。
    2022-04-18 16:36:31下载
    积分:1
  • vb RTrim()去除字符串行尾空格
    vb 演示如何去除字符串结尾空格,把输入框中的含有空格的字符串,全部过滤掉空格,这个源码似乎有上结简单了,使用RTrim(),一行代码即可搞定:   Private Sub Command1_Click()    Text2.Text = RTrim(Text1)   End Sub   主要是使用了RTrim()函数,这个函数不只是过滤行尾空格,也会将字符串中间空格过滤掉。
    2022-10-07 20:30:03下载
    积分:1
  • VB6.0 Mid判断指定字符串出现的次数
    VB6.0 判断指定字符串出现的次数,判断字符串A在字符串B中出现的次数,使用了VB的Mid函数来判断,如图所示的运行效果,单击按钮即可查看运行结果。代码验证判断部分,采用for循环遍历判断,代码如下:   Dim j As Integer   j = 0   For i = 1 To Len(Text1)    If Mid(Text1, i, Len(Text2)) = Text2 Then    j = j + 1    End If   Next i   Label2.Caption = "出现" & j & "次"
    2022-03-18 12:18:22下载
    积分:1
  • 分享一个VB Excel表格生成模块
    分享一个VB Excel表格生成模块,借助了模块中的ChangeToExcel.ocx组件来生成,使用时需要引入此组件。该组件中具备创建Excel文件、向Excel文件中插入内容、出错处理等功能。   Excel表格生成模块为该组件的源代码文件,你还可以通过源码对组件功能进行调整。   Demo文件夹下是使用此组件导出Excel文件的例子,单击按钮即可生成Excel文件。
    2022-11-26 13:10:03下载
    积分:1
  • VB为Lable标签着色(填充不同颜色)
    VB6.0为Lable标签着色(填充不同颜色),把标签分别填充上不同的颜色,在显示一些统计数据的时候,可清淅的显示出各种数据类型,提升用户浏览体验。   为Lable着色是非常简单的,你可以从本例子中学会用法。
    2022-02-05 08:55:36下载
    积分:1
  • vb 通过程序设置系统日期和时间的格式
    vb 通过程序设置系统日期和时间的格式,设定时可以改变长日期格式,短日期格式,改变时间格式,看着很像是以前Windows XP时候的时间设置窗口的功能。请注意,日期格式设置成功,需要重新启动计算机或注销后可以看到新的短日期格式!以下是改变日期格式其中的一个例子代码,仅供参考:   Dim ret2 As Long   Dim sd As String   ret2 = RegOpenKey(HKEY_CURRENT_USER, "Control PanelInternational", hKey)   If ret2 = 0 Then    sd = Combo1.Text    RegSetValueEx hKey, "sShortDate", "0", REG_SZ, ByVal sd, LenB(StrConv(sd, vbFromUnicode))    MsgBox "日期格式已设置成功,重新启动计算机或注销后可以看到新的短日期格式!", , "提示窗口"   End If
    2023-06-21 17:25:03下载
    积分:1
  • 696518资源总数
  • 104353会员总数
  • 66今日下载