找回密码
 立即注册→加入我们

QQ登录

只需一步,快速开始

搜索
热搜: 下载 VB C 实现 编写
查看: 2396|回复: 1

【VFB】FreeBASIC语言入门(VFB教程2-1)

[复制链接]
发表于 2018-2-26 20:53:28 | 显示全部楼层 |阅读模式

欢迎访问技术宅的结界,请注册或者登录吧。

您需要 登录 才可以下载或查看,没有账号?立即注册→加入我们

×
此处为VisualFreeBasic编程教程(从零开始学或VB进阶)的子章节部分,全部目录点链接。
此是为了刚开始学的初学者,对于那些刚刚开始学习如何编程和使用FreeBASIC的人来说,是非常必要的。

学习语言
学习编程语言意味着学习写入它们的单词,并知道写入时的意思。我们不需要一下子全部学习。但学习一些重要的话可以帮助我们开始。在这里我们将专注于这些关键字:
  1. Dim

  2. Print

  3. For...Next

  4. If...Then

  5. Do...Loop
复制代码

你好,世界!
  1. Print "你好,世界!"
复制代码

双引号之间的文本是一个文字字符串。Print语句用于将文本输出到显示。如果你可以编辑,编译和执行这个例子,你就在你的路上。
使用变量存储数据
有时在程序中,我们将要存储一些信息,在内存中,然后再使用它。要在内存中存储某些东西,我们使用一个变量。FreeBASIC中的所有变量都是一些特定的类型,如数字或字符串。我们使用Dim语句来声明一个变量名称,并指定我们要存储在哪个类型的信息。
  1. Dim text As String
  2. text = "你好,世界!"
  3. Print text
复制代码

我们正在使用Dim让编译器知道我们想在我们的程序中使用一个名为text 的变量,我们将把String数据放在其中。然后我们将(copy)"你好,世界!"赋值给变量。最后,我们使用Print将其输出到显示器。
在表达式中使用变量
一个【表达式】是描述可以评估的源代码的一部分的通用术语。在【表达式】被评估之后,我们可以用它来做某事,比如赋值(复制)到变量中。
  1. Dim a As String, b As String, text As String
  2. a = "你好"
  3. b = "世界"
  4. text = a + " " + b + "!"
  5. Print text
复制代码

我们为变量a 和b 赋值一些数据。然后,我们在一个表达式中使用变量a 和b ,然后将其赋值给text .最后,我们将结果输出到显示。
做一些数学
变量和表达式不仅限于字符串。大多数早期的语言根本没有处理字符串。写数学表达式与用铅笔和纸写的方法类似。
  1. Dim a As Integer, b As Integer, c As Integer

  2. a = 5
  3. b = 7
  4. c = a + b

  5. Print "a = "; a
  6. Print "a = "; b
  7. Print "a + b = "; c
复制代码

我们为变量a ,b 和c 赋值值。我们使用Integer变量的数据类型。整数可以是正数或负数,但没有任何分数。
重复语句,循环
使用For...Next语句,我们可以让程序重复多次进行某些操作。例如,让我们说我们想将所有的数字从1到100加起来。
  1. Dim total As Integer
  2. Dim number As Integer
  3. total = 0
  4. For number = 1 To 100
  5.   total = total + number
  6. Next
  7. Print "The sum of number from 1 to 100 is "; total
复制代码



作出决定,条件判断
程序可以使用If...Then之类的条件语句来选择要执行的语句。我们可以使用变量的值或表达式的结果来决定是否应该执行或不应该执行一个或多个语句。
  1. Dim number As Integer
  2. number=1
  3. Print "Your number is ";
  4. If number < 0 Then
  5.   Print "negative"
  6. ElseIf number > 0 Then
  7.   Print "positive"
  8. Else
  9.   Print "zero"
  10. End If
复制代码

我们将根据与该语句匹配的条件输出一个字(正,负或零)。
重复语句(再次)
这里我们将使用另一个循环结构Do...Loop重复一些语句。程序如何知道停止重复这些语句?我们将使用If...Then作出决定何时脱离循环。
  1. Dim total As Single, count As Single, number As Single
  2. Dim text As String

  3. Print "This program will calculate the sum and average for a"
  4. Print "list of numbers.  Enter an empty value to end."
  5. Print

  6. Do
  7.   Input "Enter a number : ", text
  8.   If text = "" Then
  9.     Exit Do
  10.   End If

  11.   count = count + 1
  12.   total = total + Val(text)

  13. Loop

  14. Print
  15. Print "You entered "; count; " numbers"
  16. Print "The sum is "; total
  17. If count <> 0 Then
  18.   Print "The average is "; total / count
  19. End If
复制代码

以上是最基本的程序编写流程,一切围绕着 变量、循环、判断及输入数据和输出数据,写出庞大的软件来,

如果软件是人,那么这些代码只能算是分子,分子组成细胞,那就是软件的函数,细胞组成器官,那就是软件的模块。

有人会说了,我们测试学习,上面的代码写在哪里呢?
1518762574227368.jpg
一般我们写这里,
1518762663508760.jpg
然后编译执行
1518762717853337.jpg
就能在黑窗口里看到输出结果
1518762861116125.jpg
也可以写在按钮的单击事件里,可以点1次按钮,看一次结果。



回复

使用道具 举报

发表于 2022-5-17 11:22:30 | 显示全部楼层

如此好贴,必须支持~~~
回复 赞! 靠!

使用道具 举报

本版积分规则

QQ|Archiver|小黑屋|技术宅的结界 ( 滇ICP备16008837号 )|网站地图

GMT+8, 2024-12-22 17:56 , Processed in 0.033096 second(s), 28 queries , Gzip On.

Powered by Discuz! X3.5

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表