代码已测试。
10年积累的网站制作、做网站经验，可以快速应对客户对网站的新想法和需求。提供各种问题对应的解决方案。让选择我们的客户得到更好、更有力的网络服务。我虽然不认识你，你也不认识我。但先做网站后付款的网站建设流程，更有浦北免费网站建设让你可以放心的选择与我们合作。
一、测试需要的INI文件。名称为“setinfo.ini”，存放路径为你解决方案里“Bin“文件夹的”Debug“文件夹里。
内容：
[Location]
pnlTime.Location.X=787
pnlTime.Location.Y=0
[TopMost]
Top=True
二、操作INI文件的类。新建一个类，类中内容为：
Public Class Class1
Public Declare Function GetPrivateProfileString Lib "kernel32" Alias "GetPrivateProfileStringA" _
( _
ByVal lpApplicationName As String, _
ByVal lpKeyName As String, _
ByVal lpDefault As String, _
ByVal lpReturnedString As String, _
ByVal nSize As Int32, _
ByVal lpFileName As String _
) As Int32
End Class
三、界面代码：
Imports System.IO 'for path
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
getINI()
End Sub
Private Sub getINI()
Dim iniclass As New Class1 '
Dim myBf As String 'get set_info 开辟存储的内存
myBf = New String(CChar(""), 256)
Dim myFN As String '配置文件的文件路径
myFN = Path.Combine(My.Application.Info.DirectoryPath, "setinfo.ini")
Dim myAN As String 'Application_NAME,也是Section名称
myAN = Me.TextBox1.Text
Dim myKN As String 'KEY_NAME,关键字名称
myKN = Me.TextBox2.Text
Class1.GetPrivateProfileString(myAN, myKN, "", myBf, myBf.Length, myFN) '调用读取INI文件的操作
TextBox3.Text = Microsoft.VisualBasic.Left(myBf, InStr(myBf, Chr(0)) - 1) '截取有用部分,有必要
End Sub
End Class
四、测试截图如下
“结构”是 Visual Basic 早期版本支持的用户定义类型 (UDT) 的一般化。除字段外，结构还可以公开属性、方法和事件。结构可以实现一个或多个接口，而您可以分别为每个字段声明访问级别。
可以合并不同类型的数据项来创建结构。结构将一个或多个“元素”彼此关联并且将它们与结构本身关联。声明了结构后，它将成为“复合数据类型”，而您可以声明该类型的变量。
想让单个变量持有几个相关信息时结构很有用。例如，您可能想将一个雇员的姓名、电话分机号和薪金放在一起。可以对这些信息使用几个变量，或者可以定义一个结构并将它用于单个雇员变量。当有许多雇员并且因此有该变量的许多实例时，结构的优点变得非常明显。
使用 Structure 语句语句作为结构声明的开始，并使用 EndStructure 语句作为结构声明的结束。在这两条语句之间必须至少声明一个“元素”。元素可以是任何数据类型，但是至少一个必须是非共享变量，或是非共享非自定义事件。
不能在结构声明中初始化任何结构元素。如果将一个变量声明为结构类型，则可以通过变量访问元素来给它们赋值。
声明一个结构：
可以使用 Public、Protected、Friend或Private关键字指定结构的访问级别，或者使用默认值 Public。如：
Private Structure employee
End Structure
向结构体添加元素：
结构必须具有至少一个元素。必须声明结构的每个元素并指定其访问级别。如果使用不含任何关键字的 Dim 语句 (Visual Basic)，则可访问性默认值为 Public。如：
Private Structure employee
Public givenName As String
Public familyName As String
Public phoneExtension As Long
Private salary As Decimal
Public Sub giveRaise(raise As Double)
salary *= raise
End Sub
Public Event salaryReviewTime()
End Structure
－－－－－－－－－－－－－－－－－－－－－－－－－－－
另外，关于你的问题，请参考下面C++/C对自定义类型的比较：
1、在C++中，不需使用typedef
struct Structure1 {
char c;
int i;
float f;
double d;
};
int main() {
struct Structure1 s1, s2;
s1.c = 'a'; // Select an element using a '.'
s1.i = 1;
s1.f = 3.14;
s1.d = 0.00093;
s2.c = 'a';
s2.i = 1;
s2.f = 3.14;
s2.d = 0.00093;
}
2、在C中，需用typedef定义
typedef struct {
char c;
int i;
float f;
double d;
} Structure2;
int main() {
Structure2 s1, s2;
s1.c = 'a';
s1.i = 1;
s1.f = 3.14;
s1.d = 0.00093;
s2.c = 'a';
s2.i = 1;
s2.f = 3.14;
s2.d = 0.00093;
}
很简单，在end select前再多加一种情况case else return "XXXx",因为你只提供了0-9这10种情况
Public Function Zuhe(ByVal qa As String) As String
Select Case qa
Case "0"
Return "1"
Case "1"
Return "3"
Case "2"
Return "4"
Case "3"
Return "6"
Case "4"
Return "2"
Case "5"
Return "8"
Case "6"
Return "9"
Case "7"
Return "7"
Case "8"
Return "5"
Case "9"
Return "0"
Case else
Return "XXXX"
End Select
End Function
1、vb.net的
数组定义与变量定义差不多。可以用
dim
来定义
比如:
dim
a（100）
as
integer。
也可以不定义下标
在程序中
用
redim
来定义。
如：
dim
a()
as
integer
'
'
redim
a(100)
2、vb.net中定义数组可以直接赋值。
如：
dim
a()
as
integer
={1,
2,
3,4}
Net 是一个编程框架。
与函数库不同，编程框架指的是一种更高层的抽象，它使使用它的开发人员可以在不用掌握太多基础编程理论时（当然最好是懂一些）就可以开发产品。.Net Framework 的意义是指 .Net 框架。.NET Framework 是可以用来开发应用软件与托管类库的一个平台；它为你提供在生成、调试以及执行托管应用程序时所需要的编译器及工具。可以说 .NET Framework 为你提供了在 Windows 上开发和运行托管应用程序所需的一切条件。因此 .Net 框架也是一种高层次的抽象，它是一种全面支持以面向对象编程的编程方式来进行开发的运行于 Windows NT 系列操作系统上的高层编程框架。
之所以说应用程序是托管的是因为它们的执行过程是由 .NET Framework 管理的。实际上，.NET Framework 通过提供一个可控的运行时环境来管理这些执行过程，此运行时环境提供众多的服务，比如在应用程序运行时载入应用程序、管理内存、监视和维护安全和资源完整性。
在 .NET（以及Java）之前，应用程序未被托管，因为它们不是由可控的运行时环境来执行的。比如之前提到的 C++、VB6 编程语言所提供的编程环境中，操作系统中没有其他组件来提供 .Net 提供的这些服务，应用程序需要自己管理它们的服务，这在有些时候就导致了错误的代码、安全漏洞，以及数据的丢失。
.NET Framework 提供了众多的工具，比如编译器、调试器、编程语言、执行引擎（名为 Common Language Runtime,CLR,公共语言运行时），开发工具，以及大量的预定义的“功能模块”类库。这些类库被称作 Framework Class Libraries(FCLs)。
.Net 支持众多的编程语言，所有的编程语言编写的代码都将最终交给 CLR 来执行，因此 .Net 是“语言无关”的。目前微软推出的用于 .Net 开发的语言有：VB.NET J# C# F#，现在的 VC++ 也支持托管 .Net 编程。
.Net 编程可应用于很多方面，比如桌面应用程序、WEB应用程序、便携设备应用程序、游戏开发、用户界面开发、富互联网开发等。
通过安装一些插件，也可以在 Linux 等操作系统上运行 .Net 程序。
Property用于标识一个类成员为属性而不是方法.属性可以被获取,属性在被获以的时候利用get句柄返回其值.属性可以被赋值,这个过程是由set句柄完成的.这两个句柄可以不同时存在.如果只有get而没有set,那属性就是只读的.如果只有set而没有get,那属性就是只写的.
就是定义了两个属性：s_name和s_sex
Overridable 表示这个属性可以被重载。