Merge pull request #4193 from lactobionicAcid/main

Fix #4179

Plain Craft Launcher 2/Modules/Minecraft/ModModpack.vb

@@ -195,7 +195,7 @@ Retry:
                 End If
                 Try
                     Log("[ModPack] 整合包 Forge 版本：" & Id)
-                    ForgeVersion = Id.Split("-")(1)
+                    ForgeVersion = Id.Replace("forge-", "")
                     Exit For
                 Catch ex As Exception
                     Log(ex, "读取整合包 Forge 版本失败：" & Id)
@@ -204,7 +204,7 @@ Retry:
                 'NeoForge 指定
                 Try
                     Log("[ModPack] 整合包 NeoForge 版本：" & Id)
-                    NeoForgeVersion = Id.Split("-")(1)
+                    NeoForgeVersion = Id.Replace("neoforge-", "")
                     Exit For
                 Catch ex As Exception
                     Log(ex, "读取整合包 NeoForge 版本失败：" & Id)
@@ -213,7 +213,7 @@ Retry:
                 'Fabric 指定
                 Try
                     Log("[ModPack] 整合包 Fabric 版本：" & Id)
-                    FabricVersion = Id.Split("-")(1)
+                    FabricVersion = Id.Replace("fabric-", "")
                     Exit For
                 Catch ex As Exception
                     Log(ex, "读取整合包 Fabric 版本失败：" & Id)