1. vb文件读取并输出指定数据
privatesubcommand1_click()
open"c:\123.txt"forinputas#1
n=0
dowhilenoteof(1)
lineinput#1,a
n=n+1
ifn=3then
text1.text=a
exitdo
endif
loop
close#1
endsub
这样就可以了。用n来控制行数。当到达了第三行,就输出到文本框,然后退出循环。
2. vb中读取文件
VB 6中随机访问(Random Access)的单位是定长的记录(例如格式固定的花名册中的一行),Open语句中的Len指的是就是这个长度;
不是任意格式的文件都能通过随机访问方式得到想要的数据。具体来讲,你可以先用PUT语句将一条或多条记录写进文件,然后用文本编辑器打开,此时你看到的格式就是GET语句可以读取的格式;
你应该安装完整的Visual Basic 6.0环境,同时安装相应的MSDN Library。这样你就可以在VB的官方文档里得到准确而权威的解答。另外,Visual Basic 6.0很早之前就不维护了,而且其文档也逐渐不维护了,所以你在互联网上寻找VB 6官方文档应该非常困难。现在只有零散的文档还可以搜到,比如:
Using Random File Access
,而且多数情况下是英文的,如果英文吃力建议你寻找VB 6配套的MSDN Library,这个应该还是相对容易的,而且中文版的翻译还很不错!3. vb输出到文件
用script脚本 直接调用 FTP 命令实现上传文件到FTP服务器。代码如下:
4. vb输出结果
OptionBase1 PrivateSubForm_Load() Dima(10,10)AsInteger Dimj,i Show Fori=1To10 Forj=1To10 Ifi=jOri=11-jThen a(i,j)=1 Else a(i,j)=0 EndIf Nextj Nexti Fori=1To10 Forj=1To10 Printa(i,j); Nextj Print Nexti EndSub
5. vb输出信息的方法有哪些
vb输出可执行程序过程
菜单: 外接程序管理器->打包和展开向导,选择加载选框;
之后选择需要的项目一直下一步;
其中要注意的是,如果有文件在程序里面被用到,在中间一个步骤里一定要把那个程序也加到包;
这样可以生成一个完整的安装文件,可以在其他电脑上直接安装。
6. 在vb中可以用于输入数据
Private Sub Command1_Click()List1.AddItem "xxx"End Sub如果你添加了list1控件,应该可以显示!!
7. vbs输出内容到文本
〔emmm其实我这个也不算用的vb〕
1 新建一个记事本
2 在记事本里用msgbox或inputbox语句写几句(除了你想打的文字,其他都用西文哦)
3 保存后更改文件格式为.vbs(没有显示原来的格式的话,就勾上我的电脑-查看-文件扩展名)
我目前只会这个最简单的对话框啦 以后学了再给我家那位发哈哈哈
8. vb如何输出结果数据
用vb编写程序,把输入的数据逆序显示,如输入4321,输出1234
'//倒叙取出即可Private Sub Form_Click() Dim a As String, i As Integer, s As String a = InputBox("输入一个整数:", "Input", "1234") For i = Len(a) To 1 Step -1 s = s & Mid(a, i, 1) Next Print sEnd Sub


- 相关评论
- 我要评论
-