vb listview 小问题
CommonDialog1.Filter = "(*.txt)|*.txt"
CommonDialog1.DialogTitle = "浏览"
CommonDialog1.ShowSave
Dim itmx As ListItem
Dim i As Integer
i = 1
Open CommonDialog1.FileName For Input As #1
Do While Not EOF(1)
Line Input #1, temp
Set itmx = Liv_Sound.ListItems.Add()
itmx.Text = temp
Loop
Close #1
打开一个TXT文件按行读到listview中，怎么listview第一行总是空的。怎么解决呢。
if trim(temp) <> "" then
Set itmx = Liv_Sound.ListItems.Add()
itmx.Text = temp
endif
相关问答：
请教一下：我用vb写了一个调用Illustrator的测试程序，代码很简单：Private Sub Command1_Click()
Dim app As New Illustrator.Application
Dim doc As Illustrator.Document
Dim thislayer As Illustrator.Layer ......
vb写的程序编译后,运行若出错,如何知道到在哪一行?
按Ctrl+F5预编译，出错时会跳转到错误行
不是那样的了,我是要求编译成EXE后运行,提示出错能否提示错在哪一行.
我编译后在我的电脑上运行没问题,但� ......
想在warcraft3里进行写屏操作【如对战平台中的胜负提示信息】，效果就像游戏平台中一样，我试过在一窗口中写入文字，然后一直让窗口强制最前，虽然能实现文字显示，但是文字会不断闪烁，而且有不确定BUG，通过论坛搜 ......
要用vb打印一条线，长度是100毫米怎么写？
关注
VB code:
Printer.ScaleMode = vbMillimeters
Printer.Line (10, 10)-(110, 10)
Printer.ScaleMode = vbMillimeters
Print ......
Option Explicit
Private Sub Command1_Click()
WebBrowser1.Navigate "http://mc.qeedoo.com/servers.php"
End Sub
Private Sub WebBrowser1_DocumentComplete(ByVal ......
