以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  ftp目录选择  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=68239)
--  作者：qianqian1530
--  发布时间：2015/5/13 9:01:00
--  ftp目录选择
这个是怎么做出来的呢?

还有 用的是什么插件啊?

* 如果可以的话,有没有办法 直接修改 字符呢?
我想改成日语的


图片点击可在新窗口打开查看此主题相关图片如下：360桌面截图20150513095843.jpg
图片点击可在新窗口打开查看
--  作者：Bin
--  发布时间：2015/5/13 9:08:00
--  
完全可以用窗口设计自己设计一个出来.


代码全部用的是这里的代码http://www.foxtable.com/help/topics/1410.htm
--  作者：大红袍
--  发布时间：2015/5/13 9:12:00
--  

 你去做一个计划管理，然后贴入如下代码，就可以控制foxtable窗口的控件了。

 

 思路就是这样，你慢慢消化

 

Dim frm As Object = windows.Forms.Form.activeform
If frm IsNot Nothing Then  
    \'output.show(frm.name & "dd" & frm.text)
    If frm.name = "Class235" Then
        frm.controls("Button1").Visible = False
        frm.controls("Button2").Visible = False
        frm.controls("Button3").Visible = False
        frm.controls("cmbFTPPath").Visible = False
        frm.controls("Label1").Visible = False
        frm.controls("TextBox1").Visible = False
        frm.controls("C1FlexGrid1").height = 380
    Else If frm.name = "Class234" Then
        frm.controls("cmbFTPPath").Visible = False
        frm.controls("Label2").Visible = False
        frm.controls("cmbFTPPath").Visible = False
        frm.controls("btnOpen").Visible = False
        frm.controls("btnOpenLocFolder").Visible = False
        frm.controls("Label1").Visible = False
        frm.controls("btnRefresh").Visible = False
        frm.controls("btnUpload").Visible = False
        frm.controls("btnDownload").Visible = False
        frm.controls("btnMakeDir").Visible = False
        frm.controls("btnRename").Visible = False
        frm.controls("btnDelete").Visible = False
        frm.controls("C1FlexGrid2").Visible = False
        frm.controls("C1FlexGrid1").top = 10
        frm.height = 380
    End If
End If
--  作者：大红袍
--  发布时间：2015/5/13 9:12:00
--  

http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=53388&skin=0