登录
首页 » VB源码 » VB 值参与变参举例

VB 值参与变参举例

于 2022-07-25 发布 文件大小:2.20 kB
0 66
下载积分: 2 下载次数: 1

代码说明:

VB 值参与变参如何用的小例子源码,这个其实平时有时候也用到了,只是不知道这是值参或是变参,通过这个小实例,你或许对这两者的用法会更熟悉些,以下代码仅供参考:   Private Sub Command2_Click()   Dim a As Integer, b As Integer    a = 10: b = 20    Picture2.Print "交换前:a="; a; " b= "; b    Swap2 a, b    Picture2.Print "交换后:a="; a; " b= "; b   End Sub

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

发表评论

0 个回复

  • vb.net 读取INI文件示例
    vb.net vs2008读取INI文件示例,ini文件名为 Send.ini,代码中包括了一个读ini API函数。   Ini文件说明:   [节名] []中的节名对应此API的第一参数   Name=内容 Name对应此API的第二参数   API的第三参数是没有取到匹配内容时返回的字符串;   API的第四参数是要返回的字符串;   API的第五参数是字符串缓冲的长度,一般255;   API的第六参数是INI文件的路径。
    2022-02-20 08:44:55下载
    积分:1
  • VB 6.0 打印与打印预览功能
    VB 6.0 打印与打印预览功能源码,这个打印预览可以调节预览的放大倍率,在不同的放大状态下预览打印内容,支持打印文字内容和图片的内容,自动调用Windows默认的打印机进行打印,如测试截图所示的效果。
    2023-05-22 11:35:03下载
    积分:1
  • VB6.0 改变扩展名保护Access数据库
    VB6.0 改变扩展名保护Access数据库,也就是让用户修改Access数据库的扩展名,之前可能禁止改变,但本代码介绍的方法允许修改扩展名,以下是本例子核心功能部分的完整源码,仅供参考:   Private Sub Form_Load()    Dim cnnstr As String    cnnstr = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "db_wjgl.bak;Persist Security Info=False"    cn.Open cnnstr    Adodc1.ConnectionString = cnnstr    Set Picture1.DataSource = Adodc1    Picture1.DataField = "文件"   End Sub   Private Sub Form_Unload(Cancel As Integer)    cn.Close   End Sub
    2022-05-16 07:33:58下载
    积分:1
  • visual studio VB 学生信息管理系统
    用visual studio VB语言编写的学生信息管理系统 WINFORM 数据库采用的是ORACLE 
    2022-02-24 12:49:02下载
    积分:1
  • vb6 批量生成证书、房屋等编号
    vb6 批量生成证书、房屋等编号,学会了本例子,是个比较实用的技巧,在一些需要批量生成编号的地方,你都可以借鉴本程序,来实现编号生成,在本例中,是批量生成房屋的编号,用户可选择楼层范围、单元范围等参数后,即可快速生成编号。十分方便哦。这个小程序从界面和功能易用上来说,都设计的都好用的。
    2022-10-19 14:10:03下载
    积分:1
  • VB6.0使用InPutBox显示密输入框
    VB6.0使用InPutBox显示密码输入框,InPutBox大部分情况下是用于输入数据,与用户交互,但这些数据并不是密码类型的,本实例是展示是使用InPutBox作为密码输入框,其实也是挺简单的:   Private Sub Command1_Click()    On Error GoTo Err_Out    Dim lTemp As Long    Dim sTemp As String    lTemp = SetTimer(Me.hwnd, NV_INPUTBOX, 1, AddressOf TimerProc)    sTemp = InputBox("请输入密码", "密码输入框")   Err_Out: End Sub
    2023-02-13 07:30:04下载
    积分:1
  • VB 石头剪刀布猜拳游戏
    VB 石头剪刀布猜拳游戏,游戏操作方法:在窗体左下方的石头、剪子、布图标中,单击用户想要出的一种手势,电脑会自动给出该手势,任一方赢了都会给出相应提示图片信息。游戏结果判定逻辑:   将用户和计算机所选的图片的序号合成一个字符串,根据这个字符串判断用户的输赢   00 石头对石头 重来   01 石头对剪子 用户赢   02 石头对布 用户输   10 剪子对石头 用户输   11 剪子对剪子 重来   12 剪子对布 用户赢   20 布对石头 用户赢   21 布对剪子 用户输   22 布对布 重来
    2023-07-03 14:45:03下载
    积分:1
  • VB6.0仿迅雷悬浮窗口(图标)的实现
    VB6.0仿迅雷悬浮窗口(图标)的实现源码,迅雷的悬浮窗相信大家很熟悉了,其实就是显示一个图标,悬浮在屏幕上,通过这个悬浮图标可单击右键调出菜单,双击图标则会显示主窗口,本源码模拟了悬浮窗口的实现,另外是模拟了悬浮窗口双击显示主窗口的功能。代码中注释不多,不过没有使用过多复杂的代码,对VB新手友好。
    2022-03-24 09:58:35下载
    积分:1
  • VB NET SQLSERVER 酒店客房管理系统
    VB NET SQLSERVER 酒店管理系统,功能模块:基础设置、业务管理、预定管理、入住管理、收钱退房、信息查询、客房管理、预定信息查询、入住信息查询、入住客史查询等,只是一个基础级的酒店客户管理程序,测试前请把Database下的数据库附加,修改数据库连接字符串,然后运行Debug中的exe程序。
    2023-04-22 15:20:03下载
    积分:1
  • Vb.NET 贪吃蛇游戏
    游戏说明:   1、控制键    “回车键”-----新游戏或终止游戏    “5”(数字键区的)----暂停或恢复    方向控制键(数字键区的)    “8、2、4、6”----对应控制“上、下、左、右”移动    “1”-----“左下”移动    “3”-----“右下”移动    “7”-----“左上”移动    “9”-----“右下”移动   2、地图    蓝色方块----食物(吃到食物后,蛇身长度增加一节)    红色方块----炸弹(吃到炸弹,所得分数会减去当前级别数的2倍)    地图上一次出现2个食物和1个炸弹,被蛇吃掉后会随机位置补充    灰色方块----蛇头    绿色方块----蛇身    暗海洋绿方块----奖品    当玩家吃到的食物或者炸弹达到5个时就会随机出现一次奖品,奖品    上的数字表示吃到奖品后会增加的分数。每个奖品的初始分数是20--50    之间的随机数,当奖品出现后就会开始不断的减少,所以玩家要尽快吃    到才能增加到更多的分数。   3、计分方法    每吃到一个食物,增加的分数等于当前级别的数值;    每吃到一个炸弹,扣掉的分数等于当前级别数值的2倍;    玩家的起始分数等于当前的级别数值的2倍加1    例如 等级为3,则玩家起始分数是7分;每吃到一个食物加3分;    每吃到一个炸弹减6分   4、游戏结束    当总分
    2022-03-02 23:06:57下载
    积分:1
  • 696518资源总数
  • 105570会员总数
  • 13今日下载