共7 条记录, 每页显示 10 条, 页签:
[1]
[浏览完整版]
标题：请教，设置网格线，如何使用变量来取代？
1楼
baoxyang 发表于：2011/1/4 16:24:00dim i as double = 0.26
dim s as string = "DashStyle.Dot"
以下会出现错误，请教应如何写？先谢了！！
rt.Style.GridLines.Horz = New prt.Linedef("& i &", Color.Black,"& s &")
[此贴子已经被作者于2011-1-4 16:24:04编辑过]
2楼
狐狸爸爸 发表于：2011/1/4 16:33:00有个笨办法，用Select Case语句解决。
3楼
baoxyang 发表于：2011/1/4 16:37:00哦，明白了。枚举类型搞混了
4楼
czy 发表于：2011/1/4 16:59:00如果用变量的话，直接用数值型变量，值0到4应该可以的。
5楼
lxl 发表于：2011/1/4 21:14:00直接定义枚举变量
Dim ds as DashStyle= DashStyle.Dot
6楼
lxl 发表于：2011/1/4 22:00:00如果用组合框来选择，就会用到字符 和 枚举类型的转换。
看看下面这个例子：
窗口的AfterLoad事件代码：
Dim names As String() = System.Enum.GetNames(Gettype(VisualStyleEnum))
e.Form.Controls("ComboBox1").Items.AddRange(names)
组合框的ValueChanged 事件代码
VisualStyle = System.Enum.Parse(Gettype(VisualStyleEnum),e.Form.Controls("ComboBox1").Text)
System.Enum是枚举类型基类，foxtable的所有枚举都是从它继承的。
GetNames 和 Parse是枚举的公共方法。也就是不需要new 就能直接使用的方法
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:管理项目1.table |
[此贴子已经被作者于2011-1-4 22:11:21编辑过]
7楼
baoxyang 发表于：2011/1/5 8:53:00谢谢各位帮助，特别感谢LXL版主的详细说明及讲解。
共7 条记录, 每页显示 10 条, 页签:
[1]