Delphi代码换成VB代码 急急
type SFPRDA=packed record
czmm:Word; //操作密码。
sqcz:array[1..8] of packed record dm:Byte; mm:Word end;
//8个授权操作员代码和密码。dm代码，mm密码。
sdje:array[0..3] of packed record dz,jz:Word end;
//4个时段的默认定值和记帐金额。dz定值，jz记帐。
open_xffs:Byte; //开机缺省消费方式。0普通，1定值，2记帐。
open_menu:Byte; //开机缺省键盘方式。0金额，1品种。
open_online:Byte; //开机缺省运行方式。0脱机，1联机。
ena_jz:Byte; //1允许记帐，0不允许。
ena_mu:Byte; //1允许品种切换，0不允许。
ena_zk:Byte; //1允许外部折扣，0不允许。
ena_qk:Byte; //1允许取款，0不允许。
ena_glf:Byte; //1允许输入管理费，0不允许。
ena_cont:Byte; //1定值记帐连续刷卡方式，0不连续。
ena_ord:Byte; //1扣款消费显示序数，0不显示。
btph,syrq:Word; //btph补贴批号。syrq同步日期。
xfjb:Byte; //允许消费级别。8位从低到高依此表示是否允许级别0到8的卡消费。
//1允许，0禁止。
max_xf:Word; //每次最大消费金额。0不限制。
max_cz:Integer; //每次最大充值金额。0不限制。 <
相关问答：
为什么C写的DLL文件C、PB能调用VB不能调用？
VB里为什么有的DLL直接通过引用可以使用？有的需要通过declare申明外部函数？这些DLL有什么差别？
1、为什么PB能通过DECLARE声明而VB不行？
2、如果这个dll中的 ......
login.aspx.vb:
Public ReadOnly Property nameT() As String
Get
Return TextBox1.Text
&nb ......
一个查询某信息的ASP网页，提交采用的是post方法，查找结果的网页必须右键点击“查看源文件”才能看到真正查询结果网页的源代码，用浏览器菜单看到的是查询前的源代码
用VB有什么办法可以获取到这个查询后的源代� ......
请教一下：我用vb写了一个调用Illustrator的测试程序，代码很简单：Private Sub Command1_Click()
Dim app As New Illustrator.Application
Dim doc As Illustrator.Document
Dim thislayer As Illustrator.Layer ......
题目描述应该不是很准确。
现状是：假如一个文本文件共100行，那么我循环次数最大就是100×100=10000下，花费时间非常多，请问有没有办法能够提高对文本文件的循环访问速度。非数据库技术。
你要循环做什么� ......
