以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  帮忙看一下  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=57537)
--  作者：jswjyjf
--  发布时间：2014/9/26 10:44:00
--  帮忙看一下
Dim s1 As String
s1=e.Form.Controls("TextBox1").value
Dim s2 As String
s2=e.Form.Controls("TextBox2").value
Dim s3 As String
s3=e.Form.Controls("TextBox3").value
Dim cps As new CustomPaperSize.CustomPaperSize()
cps.SetPrintForm(e.Form.Controls("ComboBox1").Text,s1, 100*s2, 100*s3)
msgbox("添加成功")
这里 s2 s3 可以这样写吗
 
--  作者：Bin
--  发布时间：2014/9/26 10:45:00
--  
100*Val(s2), 100*Val(s3))
--  作者：有点甜
--  发布时间：2014/9/26 10:45:00
--  
 报错还是怎样？
--  作者：jswjyjf
--  发布时间：2014/9/26 10:47:00
--  

跳过 不执行

 
--  作者：有点甜
--  发布时间：2014/9/26 10:50:00
--  
以下是引用jswjyjf在2014-9-26 10:47:00的发言：

跳过 不执行

 

 

呃，不应该，你改成2楼那样试试
--  作者：jswjyjf
--  发布时间：2014/9/26 10:57:00
--  

行了

Dim printers As WinForm.ComboBox = e.Form.Controls("ComboBox1")

Dim xx As WinForm.TextBox = e.Form.Controls("TextBox1")

Dim clist As String = ""
For Each p As String In InstalledPrinters
    clist &= p & "|"
Next
printers.ComboList = clist.TrimEnd("|")
printers.SelectedIndex = 0

 

这里红的看不懂

 
--  作者：有点甜
--  发布时间：2014/9/26 10:58:00
--  
 意思是组成一个下拉列表的内容，如 "打印机1|打印机2|打印机3"
--  作者：jswjyjf
--  发布时间：2014/9/26 11:04:00
--  

格式有点看不懂

应该这样吧

clist=clist & p & "|"
--  作者：有点甜
--  发布时间：2014/9/26 11:05:00
--  
 嗯嗯，是的，一样意思