Re: [低薪徵求]肯長期幫我改檔名重壓alpha7系列的人

[chinoyan (chino)]

DIM ExePath As String, SetupINIPathFile As String

If Right(App.Path, 1) = "\" Then
      ExePath = App.Path
Else
      ExePath = App.Path + "\"
End If

SetupINIPathFile = ExePath + App.EXEName + ".INI"

'INI檔名自動為執行檔檔名.INI
'如: A.EXE,則INI為 A.INI

--
※ 發信站: 批踢踢實業坊(ptt.cc) 
◆ From: 220.133.214.220
推 invalid:alpha好像不是用vb寫的啊...QQ
推 albb0920:我記得是a開頭的語言吧，不過這種功能應該所有語言都有\
推 willy69wu31:AutoIn