问题1：Select Case判断上，判断用法有问题，感觉你用select的判断好像不熟悉。问题2：map，mx，my，bx，by 赋值方法有问题（不是用and连接而是用英文状态下的冒号 : 连接）还有如果用你这个判断字符串是否="朝廷鹰犬" 等等，需要分割你设置的选项里的字符串。（这个我不细讲了，写法上有错误，不适合这么写）修改部分：//打开地图 之前部分修改内容如下：（不只是能用就了事，要学会这些命令的用法才行）Hwnd = Plugin.Window.GetKeyFocusWnd()sRect = Plugin.Window.GetClientRect(Hwnd)Dim MyArrayMyArray=Split(sRect,"|")Ux = CLng(MyArray(0))Uy = CLng(MyArray(1))//定义地图Dim map, mX, mYV_var1 = Form1.Var1.ListIndexSelect Case var1Case 0 // "龙门客栈" map = "Attachment:\longmenkezhan.bmp" : mX = - 89 : mY = 181Case 1 // "苍龙岭" map = "Attachment:\canglongling.bmp" : mX = - 146 : mY = 111End SelectTracePrint mapTracePrint mXTracePrint mY//定义怪物Dim bX, bYV_var2 = Form1.Var2.ListIndexSelect Case V_var2Case 0 // "朝廷鹰犬" bX=367 : bY=395Case 1 // "锦衣刀客" bX=307 : bY=143Case 2 // "东厂鹰犬" bX=413 : bY=206Case 3 // "红莲邪徒" bX=221 : bY=314Case 4 // "红莲魔女" bX = 246 : bY = 215End SelectTracePrint bxTracePrint by 如果还有什么其他问题，另外留言注：如果不能执行，大概是你QUI界面的下拉选项框的名字不是var1和var2
