|
|
发表于 2010-7-22 21:25:22
|
显示全部楼层
来自: 中国江苏苏州
一个 按钮 ,一个TEXTBOX
& x# d" w) F' F# z' s, ~ Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
) J+ b8 g: }1 @4 j, \ pm.Connect()6 k2 \3 z# ~4 F5 F1 Z# n$ @5 P t: ?
pm.Execute("CREATE FOLDER 'Toolpath' ;")
& K. s# G' ^: |% o! q pm.Execute("RENAME FOLDER 'Toolpath\文件夹1'" & TextBox1.Text)
9 K. Y0 h$ f4 U5 ~, H6 I End Sub |
评分
-
查看全部评分
|