Private Sub Form1_Load(sender As Object,e As EventArgs) Handles MyBase.Load Me.CenterToScreen() If My.Computer.FileSystem.FileExists("binPHPPHP.exe") Then Dim PHPRC As String = "" Dim PHP_BINARY As String = "binPHPPHP.exe" Else Dim PHP_BINARY As String = "PHP" End If If My.Computer.FileSystem.FileExists("Pocketmine-MP.phar") Then Dim POCKETmine_FILE As String = "Pocketmine-MP.phar" Else If My.Computer.FileSystem.FileExists("srcpocketminePocketmine.PHP") Then Dim POCKETmine_FILE As String = "srcpocketminePocketmine.PHP" Else MsgBox("Couldn't find a valid Pocketmine-MP installation",MsgBoxStyle.Exclamation,"Pocketmine-MP") End If End If Process.Start("C:UsersdamianDesktopGamesPocketmineInstallerPocketmine-MPbinmintty.exe","-o Columns=88 -o Rows=32 -o AllowBlinking=0 -o FontQuality=3 -o Font='DejaVu Sans Mono' -o FontHeight=10 -o CursorType=0 -o CursorBlinks=1 -h error -t 'Pocketmine-MP' -i bin/pocketmine.ico -w max" & PHP_BINARY & "" & POCKETmine_FILE & "" & "--enable-ansi") End Sub
我一直在得到这个错误
BC30451'PHP_BINARY'未被声明。 由于其保护级别,可能无法访问。
未声明BC30451“POCKETmine_FILE”。 由于其保护级别,可能无法访问。
Git for Windows在<enter>上粘贴剪贴板
打开文件到一个已有的vim会话(Cygwin / mintty)
如何自动化cygwin和mintty
如何在Windows上使用git + mintty + mingw获取彩色输出?
Git(windows); 作为mergetool错误的P4merge
我究竟做错了什么?
(仅供testing使用,仅限于Form1_Load)。
使用python与(Cygwin(mintty)中的(执行命令)进行通信并获取输出
如果在Git bash(mintty)中使用npm脚本,则无法使用控制台颜色
你正在调暗if语句中的两个变量,所以一旦你点击“end if”,你的变量就消失了,或者“超出了范围”。 你当然应该对变量的范围做一些研究…为了解决这个问题,首先在你的if语句之外,在sub的内部声明字符串。 然后使用if语句来改变变量的含义; 这样,当你的进程调用出现时,变量将不会超出范围:
Private Sub Form1_Load(sender As Object,e As EventArgs) Handles MyBase.Load Me.CenterToScreen() Dim PHP_BINARY As String = nothing Dim POCKETmine_FILE As String = nothing If My.Computer.FileSystem.FileExists("binPHPPHP.exe") Then PHP_BINARY = "binPHPPHP.exe" Else PHP_BINARY = "PHP" End If If My.Computer.FileSystem.FileExists("Pocketmine-MP.phar") Then POCKETmine_FILE = "Pocketmine-MP.phar" Else If My.Computer.FileSystem.FileExists("srcpocketminePocketmine.PHP") Then POCKETmine_FILE = "srcpocketminePocketmine.PHP" Else MsgBox("Couldn't find a valid Pocketmine-MP installation","-o Columns=88 -o Rows=32 -o AllowBlinking=0 -o FontQuality=3 -o Font='DejaVu Sans Mono' -o FontHeight=10 -o CursorType=0 -o CursorBlinks=1 -h error -t 'Pocketmine-MP' -i bin/pocketmine.ico -w max" & PHP_BINARY & "" & POCKETmine_FILE & "" & "--enable-ansi") End Sub
版权声明:本文内容由互联网用户自发贡献,该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 [email protected] 举报,一经查实,本站将立刻删除。