- Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2)
---- 请问：下面这段代码如果用狐表写？ (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=145033)
-- 发布时间：2020/1/6 14:35:00
-- 请问：下面这段代码如果用狐表写？
\'Create a collection act like a database
Dim nbStorage = New Notebook() _
{New Notebook With {.Brand = "Lenovo", .Price = 27000, .Type = "X300", .Weight = 1.8} _
, New Notebook With {.Brand = "HP", .Price = 7500, .Type = "V3742TU", .Weight = 2.3} _
, New Notebook With {.Brand = "HP", .Price = 7800, .Type = "DV2730TX", .Weight = 2.2} _
, New Notebook With {.Brand = "DELL", .Price = 7300, .Type = "D630", .Weight = 2.5} _
}
\'Create the query
\'but the query will not execute right way
Dim result1 = From laptop In nbStorage _
Where laptop.Price > 7400
\'Change some value before query executes
nbStorage(0).Price = 26000
\'Execute the query
For Each laptop In result1
Console.WriteLine(laptop.ToString())
Next
-- 发布时间：2020/1/6 14:48:00
--
直接使用即可
-- 发布时间：2020/1/6 14:52:00
--
以下是引用有点蓝在2020/1/6 14:48:00的发言：
直接使用即可
直接使用即可
命令窗口中执行，出现如下提示。
---------------------------
错误
---------------------------
编译错误:Type \'Notebook\' is not defined.
错误代码：Dim nbStorage = New Notebook() _
---------------------------
确定
---------------------------
-- 发布时间：2020/1/6 14:53:00
--
写全命名空间，比如
Dim nbStorage as New xxxx.xxx.Notebook()
-- 发布时间：2020/1/6 15:09:00
--
监版，就是写不来呀
-- 发布时间：2020/1/6 15:20:00
--
从哪里抄来的代码？看源码或者开发文档呀
-- 发布时间：2020/1/6 15:24:00
--
在这里，只是想学习一下。
-- 发布时间：2020/1/6 15:36:00
--
这种最好到vs里学。这些东西都是基于您理解vs的整个开发模式的基础上进行学习的。前提是要先建立Notebook这个名称的实体类，这个类的定义在这里（我们依然借用《VB 9.0新特性之局部类型推理（Local Type Inference）》一文中提到的Notebook类来作说明。）
学习别人的东西看代码其实是次要的，要多看看别人字里行间表示的各种概念和逻辑。
-- 发布时间：2020/1/6 15:46:00
--
