vb点虐怎样传输文件 vbnet fileopen

vb点虐怎么实现串口传输文件

Imports System

Imports System.IO.Ports

Public Class Form1

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

'获滚散取计算机有效串口

Dim ports As String() = SerialPort.GetPortNames() '必须用命名空间，用颂备基SerialPort,获取计算机的有野谨效串口

Dim port As String

For Each port In ports

portnamebox.Items.Add(port) '向combobox中添加项

Next port

'初始化界面

vb点虐如何上传文件

My.Computer.Network.UploadFile

比如让旁码上传到FTP

My.Computer.Network.UploadFile("d:\1.txt", "ftp:/启启/xxx.xxx.xxx.xxx/1.txt“, "FTP账号", "FTP密码坦哪", True, 100)

新手路过。

vb点虐中怎样数据传递？

分类梁腔: 电脑/网络 程序设计 其他编程语言

问题描述:

问个简单的问题怎样在form2中运用form1中的变量？比如，我在form1中声明了一个变量a 也赋予了一个值，也声明为物亩public了，可在form2中，我用“label1.text=form1.a”却总是显示为0.望高手罩渣森给我这菜鸟解个惑！

解析:

form1要有一个实例才行。

dim f1 as form1

label1.text=f1.a

vb点虐 ftp上传文件

Dim OpenFileDialog As New OpenFileDialog

OpenFileDialog.InitialDirectory = My.Computer.FileSystem.SpecialDirectories.MyDocuments

OpenFileDialog.Filter = "文本文件(*.jpg)|*.jpg|所有御尘槐文件(*.*)|*.*"

If (OpenFileDialog.ShowDialog(Me) = System.Windows.Forms.DialogResult.OK) Then

Dim FileName As String = OpenFileDialog.FileName

' TODO: 在此处添加打开文件的代码。

textbox1.Text = FileName

End If

第一个按钮 上传

Dim filelast As String = fileaddbefore.Text.Substring(fileaddbefore.Text.LastIndexOf("."), fileaddbefore.Text.Length - fileaddbefore.Text.LastIndexOf("."))

MessageBox.Show(filelast)

My.Computer.Network.UploadFile(textbox1.Text, "" 文件名镇友兄巧.Text filelast, "登录名1", "登录密码", True, 100)

第二个按钮

声明：本文内容由网友自发贡献，本站不承担相应法律责任。对本内容有异议或投诉，请联系2913721942#qq.com核实处理，我们将尽快回复您，谢谢合作！