VB6.0 下载地址:http://img.isundae.cn/Visual Basic6.0.zip

一. 日常签到📆

https://docs.qq.com/form/fill/DZUhVeEFwWUlkVnZ6

二. 课程内容🌍

1. 准备好笔记本,练习纸。
2. 手边有电脑的同学可以使用电脑。
3. 坐好!坐好!坐好!

🏆实例一

交换两个变量的数值

实例说明

⭐本实例实现了交换两个变量的数值的功能。

设计过程

  1. 新建一个标准工程
  2. 代码如下:
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
    17
    18
    19
    20
    21
    22
    23
    Option Explicit

    Private Sub Command1_Click()
    Dim a!, b! '类型:单精度
    a = 2
    b = 3

    '不可以
    'a = b
    'b = a

    '算法1
    'Dim c!
    'c = a
    'a = b
    'b = c

    '算法2
    a = a + b 'a: 2 + 3 = 5 b:3
    b = a - b 'b: 5 - 3 = 2 a:5
    a = a - b 'a = 5 - 2 = 3 b:2
    Print a; b
    End Sub

三. 提交作业✅

https://docs.qq.com/form/fill/DZUtxeHRsVUpaaVRJ

四. 下课休息💨

本节课相关问题课在下方留言👇👇👇


 è¯„论


载入天数...载入时分秒...