|
|
发表于 2010-7-22 21:25:22
|
显示全部楼层
来自: 中国江苏苏州
一个 按钮 ,一个TEXTBOX
6 J" e# W+ E, {0 Y F) m* f! E! l Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
. G/ ^5 c7 U; V8 T/ F$ G, a pm.Connect() {$ Q0 r& d" z C5 {
pm.Execute("CREATE FOLDER 'Toolpath' ;")
8 A d1 T/ {& `5 { m, A$ D pm.Execute("RENAME FOLDER 'Toolpath\文件夹1'" & TextBox1.Text)
, ^2 S6 p6 t" u# x: c End Sub |
评分
-
查看全部评分
|