VB 原理与实战
19 0最热 | 最新
- ∴edg好吧…还能你看哈哈好吧
- VB程序设计：第4期 这个系列我好久没更新了
- +5
- 其实工业自动化行业还在用吧！其它的很少看到了，vb 已经掉队了！其实是某些公司特意用的，原因是你学会 VB 只能在他那混日子了！
- 其实工业自动化行业还在用吧！其它的很少看到了，vb 已经掉队了！其实是某些公司特意用的，原因是你学会 VB 只能在他那混日子了！
- 目前在用 C#，对 VB 不了解
- 基础的东西很多都一样 但是稍微高阶点的东西 vb 没有
- 几乎一模一样 写法有些差别 vb 没更新了 很多 c#好用的语法糖都不支持
- 提供了些思路，可以参考看看，以下为具体 demo 代码。 ' 打开需要读取的文件 Dim fso, file Set fso = CreateObject("Scripting.FileSystemObject") Set file = fso.OpenTextFile("input.txt", ForReading) ' 初始化最大值变量 Dim max : max = 0 ' 逐行读取文件内容 Do Until file.AtEndOfStream Dim line : line = file.ReadLine() ' 将每行数据按空格分隔为数组 Dim parts : parts = Split(line, " ") ' 遍历每个数字，找到最大值 Dim num For Each num In parts If num > max Then max = num End If Next Loop ' 关闭输入文件 file.Close ' 创建输出文件 Dim outfile : Set outfile = fso.CreateTextFile("output.txt") ' 将最大值写入输出文件 outfile.WriteLine(max) ' 关闭输出文件 outfile.Close
- 基础的东西很多都一样 但是稍微高阶点的东西 vb 没有