ctrl01 发表于 2006-3-23 16:55:58

请版主帮忙看一下

我要得到的结果是,从下拉选择中选择哪一种,就相应的执行哪个脚本。
具休如下:

Dim cchoices as String
   Dim answer as string
   cchoices="第一种"+Chr$(9)+"第二种"
    Begin Dialog UserDialog 180, 95, "选择对话框"
       ButtonGroup .ButtonGroup1
       Text9, 3, 69, 13, "请选择:", .Text1
       ComboBox9, 17, 111, 41, cchoices, .ComboBox1
       OKButton131, 8, 42, 13
       CancelButton131, 27, 42, 13
       PushButton 132, 48, 42, 13, "Help", .Push1
    End Dialog
   Dim mydialogbox As UserDialog
   answer=mydialogbox.combobox1‘-------------是不是这样写是错的??????
   Select Case answer
      Case "第一种"
         MsgBox "你选择的是"&str(answer)
      Case "第二种"
         MsgBox "你选择的是"&str(answer)

   End Select

请各位前辈指教。。并帮忙修改下。。谢谢!!!

qjwxsd 发表于 2006-3-23 17:55:58

不是已经回过了吗?

速度这么慢?

村上舞!舞!舞 发表于 2006-3-23 19:21:35

sdlkfj

[ 本帖最后由 村上舞!舞!舞 于 2006-3-23 19:29 编辑 ]

ctrl01 发表于 2006-3-24 08:29:24

哈哈。。有看到了。

哈哈。。有看到了。
页: [1]
查看完整版本: 请版主帮忙看一下